3 (defpackage #:lalr-pargen-system (:use #:cl #:asdf))
4 (in-package #:lalr-pargen-system)
6 (defsystem lalr-parser-generator
7 :depends-on (:anaphora)
8 :author "Julian Squires <julian@cipht.net>"
17 (defsystem lalr-parser-generator-tests
18 :depends-on (:lalr-parser-generator :rt)
22 (defmethod perform ((o test-op) (c (eql (find-system :lalr-parser-generator))))
23 (operate 'load-op :lalr-parser-generator-tests)
24 (operate 'test-op :lalr-parser-generator-tests :force t))
26 (defmethod perform ((o test-op) (c (eql (find-system :lalr-parser-generator-tests))))
27 (let ((*package* (find-package "LALR-PARSER-GENERATOR-TESTS")))
28 (or (funcall (intern "DO-TESTS" :rt))
29 (error "test-op failed"))))