Coerce *db* parameters to 'simple-string.
[cl-trane.git] / trane-common.asd
blob7677322dcdddbdb15d3bf01171d98ef96b1f05d2
1 ;;; -*- lisp -*-
3 ;;;; Copyright (c) 2008, Maciej Pasternacki <maciej@pasternacki.net>
4 ;;;; All rights reserved.  This file is available on the terms
5 ;;;; detailed in COPYING file included with it.
7 (defpackage #:trane-common.system
8   (:use #:common-lisp #:asdf))
9 (in-package #:trane-common.system)
11 (defsystem #:trane-common
12   :name "Common parts of CL-Trane"
13   :description "trane-common"
14   :author "Maciej Pasternacki <maciej@pasternacki.net>"
15   :licence "BSD sans advertising clause, see file COPYING for details"
16   :components ((:module #:src :components ((:file "common"))))
17   :depends-on (#:postmodern #:hunchentoot #:puri #:iterate #:py-configparser #:cl-base64 #:cl-qprint #:md5))
19 ;;; Needs to be loaded AFTER cl-postgres and postmodern.  LAME!
20 (defmethod perform :after ((op load-op)
21                            (system (eql (find-system :cl-postgres))))
22   (operate 'load-op :simple-date))
24 (defsystem #:trane-common.test
25   :description "Test suite for trane-common"
26   :components ((:module #:t :components ((:file "common"))))
27   :depends-on (#:trane-common #:fiveam))
29 (defmethod perform ((op asdf:test-op)
30                     (system (eql (find-system :trane-common))))
31   "Perform unit tests for trane-common"
32   (asdf:operate 'asdf:load-op :trane-common.test)
33   (funcall (intern (string :run!) (string :it.bese.fiveam)) :trane-common))