Use `ensure-gethash`
author |
Steve Losh <steve@stevelosh.com> |
date |
Tue, 23 Aug 2016 23:28:04 +0000 |
parents |
5977919552ee |
children |
b784df2de049 |
(asdf:defsystem #:temperance
:name "temperance"
:description "A logic programming library for Common Lisp."
:author "Steve Losh <steve@stevelosh.com>"
:maintainer "Steve Losh <steve@stevelosh.com>"
:license "MIT/X11"
:version "0.0.1"
:depends-on (#:trivial-types
#:cl-arrows
#:policy-cond)
:in-order-to ((asdf:test-op (asdf:test-op #:temperance-test)))
:serial t
:components ((:module "vendor"
:serial t
:components ((:file "quickutils")))
(:file "package")
(:module "src"
:serial t
:components
((:file "utils")
(:file "circle")
(:file "constants")
(:file "types")
(:file "bytecode")
(:file "wam")
(:module "compiler"
:serial t
:components ((:file "0-data")
(:file "1-parsing")
(:file "2-register-allocation")
(:file "3-flattening")
(:file "4-tokenization")
(:file "5-precompilation")
(:file "6-optimization")
(:file "7-rendering")
(:file "8-ui")))
(:file "vm")
(:file "dump")
(:file "ui")
(:file "temperance")))))
(asdf:defsystem #:temperance-test
:name "temperance-test"
:description "Test suite for Temperance."
:author "Steve Losh <steve@stevelosh.com>"
:license "MIT/X11"
:depends-on (#:temperance
#:1am)
:perform (asdf:test-op
(op system)
(uiop:symbol-call :temperance-test :run-tests))
:serial t
:components ((:file "package-test")
(:module "test"
:serial t
:components ((:file "temperance")
(:file "utils")
(:file "circle")
(:file "wam")
(:file "99")
(:file "taop")))))