From 64c917b53fbe04d770186fdece1e594e07929781 Mon Sep 17 00:00:00 2001
From: Brit Butler <redline6561@gmail.com>
Date: Wed, 2 Sep 2015 13:41:39 -0500
Subject: [PATCH] Initial switch to prove, travis and quicklisp badges.

---
 .gitignore       |  1 +
 .travis.yml      | 22 ++++++++++++++++++++++
 README.md        |  3 +++
 coleslaw.asd     | 22 +++++++++-------------
 tests/tests.lisp | 11 +++++++++++
 5 files changed, 46 insertions(+), 13 deletions(-)
 create mode 100644 .travis.yml
 create mode 100644 tests/tests.lisp

diff --git a/.gitignore b/.gitignore
index 021dbdc..57cb5b1 100644
--- a/.gitignore
+++ b/.gitignore
@@ -5,3 +5,4 @@ ignore/
 generated/
 .curr
 .prev
+build/
diff --git a/.travis.yml b/.travis.yml
new file mode 100644
index 0000000..e908e8a
--- /dev/null
+++ b/.travis.yml
@@ -0,0 +1,22 @@
+language: common-lisp
+sudo: false
+
+env:
+  global:
+    - PATH=~/.roswell/bin:$PATH
+    - ROSWELL_INSTALL_DIR=$HOME/.roswell
+  matrix:
+    - LISP=sbcl-bin
+    - LISP=ccl-bin
+
+install:
+  - curl -L https://raw.githubusercontent.com/snmsts/roswell/release/scripts/install-for-ci.sh | sh
+  - ros install prove
+
+cache:
+  directories:
+    - $HOME/.roswell
+    - $HOME/.config/common-lisp
+
+script:
+  - run-prove coleslaw-test.asd
diff --git a/README.md b/README.md
index 45074f1..e7907d0 100644
--- a/README.md
+++ b/README.md
@@ -1,5 +1,8 @@
 # coleslaw
 
+[![Build Status](https://travis-ci.org/kingcons/coleslaw.svg?branch=master)](https://travis-ci.org/kingcons/coleslaw)
+[![Quicklisp](http://quickdocs.org/badge/<project name>.svg)](http://quickdocs.org/<project name>/)
+
 <img src="https://raw.github.com/redline6561/coleslaw/master/themes/hyde/css/logo_medium.jpg" alt="coleslaw logo" align="right"/>
 
 > [Czeslaw Milosz](http://blog.redlinernotes.com/tag/milosz.html) was the writer-in-residence at UNC c. 1992.
diff --git a/coleslaw.asd b/coleslaw.asd
index 77e69c3..e60816a 100644
--- a/coleslaw.asd
+++ b/coleslaw.asd
@@ -26,23 +26,19 @@
                (:file "indexes")
                (:file "feeds")
                (:file "coleslaw"))
-  :in-order-to ((test-op (load-op coleslaw-tests)))
-  :perform (test-op :after (op c)
-                    (funcall (intern "RUN!" :coleslaw-tests)
-                             (intern "COLESLAW-TESTS" :coleslaw-tests))))
+  :in-order-to ((test-op (test-op coleslaw-test))))
 
-(defsystem #:coleslaw-tests
+(defsystem #:coleslaw-test
   :description "A test suite for coleslaw."
   :license "BSD"
   :author "Brit Butler <redline6561@gmail.com>"
-  :depends-on (coleslaw stefil)
-  :pathname "tests/"
-  :serial t
-  :components ())
-
-(defmethod operation-done-p ((op test-op)
-                             (c (eql (find-system :coleslaw))))
-  (values nil))
+  :depends-on (:coleslaw :prove)
+  :defsystem-depends-on (:prove-asdf)
+  :components ((:module "tests"
+                :components
+                        ((:test-file "tests"))))
+  :perform (test-op :after (op c)
+                    (funcall (intern #.(string :run) :prove) c)))
 
 (defpackage #:coleslaw-conf (:export #:*basedir*))
 (defparameter coleslaw-conf:*basedir*
diff --git a/tests/tests.lisp b/tests/tests.lisp
new file mode 100644
index 0000000..79e0106
--- /dev/null
+++ b/tests/tests.lisp
@@ -0,0 +1,11 @@
+(defpackage :coleslaw-tests
+  (:use :cl :prove))
+
+(in-package :coleslaw-tests)
+
+(plan nil)
+
+(deftest 1-is-a-number
+  (is-type 1 'fixnum))
+
+(finalize)