Support ASDF instead of Mudballs.
Annotate for file smoke.asd
2009-12-13 tobias 1 (defpackage smoke-system
12:43:58 ' 2 (:use :cl :asdf))
' 3
' 4 (in-package smoke-system)
' 5
' 6 (asdf:defsystem :smoke
' 7 :name :smoke
' 8 :version (0 0 1)
' 9 :author "Tobias Rautenkranz"
' 10 :license "GPL with linking exception"
' 11 :description "Smoke bindings. Provides the base functionality to
' 12 implement bindings using the various Smoke modules."
' 13 :depends-on
' 14 (:cffi :closer-mop :alexandria :trivial-garbage :bordeaux-threads)
' 15
' 16 :components
' 17 ((:module :src :components
' 18 ((:file "package")
' 19 (:file "using-type" :depends-on ("package"))
' 20 (:file "overload-resolution" :depends-on ("package" "smoke" "using-type"))
' 21 #+sbcl (:file "sb-optimize" :depends-on ("overload-resolution"))
' 22 (:file "smoke" :depends-on (:smoke-c :objects "clos"))
' 23 (:file "object-map" :depends-on (:objects :utils))
' 24 (:file "class-map" :depends-on ("package"))
' 25 (:file "bindings" :depends-on ("package"))
' 26 (:file "cxx-method" :depends-on ("package"))
' 27 (:file "clos" :depends-on
' 28 (:smoke-c "cxx-method" :objects "object-map" "class-map" "bindings"))
' 29 (:file "smoke-to-clos" :depends-on ("clos" "overload-resolution"))
' 30 (:module :objects
' 31 :serial t
' 32 :depends-on (:smoke-c :utils "bindings")
' 33 :components
' 34 ((:file "object") (:file "enum" :depends-on ("object"))
' 35 (:file "type" :depends-on ("enum"))
' 36 (:file "method" :depends-on ("type"))
' 37 (:file "class" :depends-on ("method"))
' 38 (:file "instance" :depends-on ("class"))
' 39 (:file "stack" :depends-on ("instance"))))
' 40 (:module :smoke-c
' 41 :depends-on ("package")
' 42 :components
' 43 ((:file "smoke-c") (:file "class" :depends-on ("smoke-c"))
' 44 (:file "stack" :depends-on ("class"))
' 45 (:file "method" :depends-on ("stack"))
' 46 (:file "type" :depends-on ("method"))))
' 47 (:module :utils
' 48 :depends-on ("package")
' 49 :components
' 50 ((:file "get-value")
' 51 #+sbcl (:file "sbcl-bundle")
' 52 (:module :image :components
' 53 ((:file "image" :depends-on (:impl))
' 54 (:module :impl
' 55 :components
' 56 (#+sbcl (:file "sbcl")
' 57 #+openmcl (:file "ccl")
' 58 #+(not (or sbcl openmcl))
' 59 (:file "not-implemented")))))))))))
' 60
' 61 (defmethod asdf:perform ((operation test-op) (c (eql (find-system :smoke))))
' 62 (operate 'asdf:load-op :qt)
' 63 (operate 'asdf:test-op :qt))