lalr-parser-generator.asd

   1 ;; -*- Lisp -*-
   2
   3 (defpackage #:lalr-pargen-system (:use #:cl #:asdf))
   4 (in-package #:lalr-pargen-system)
   5
   6 (defsystem lalr-parser-generator
   7   :depends-on (:anaphora)
   8   :author "Julian Squires <julian@cipht.net>"
   9   :version "alpha zero"
  10   :components
  11   ((:file "package")
  12    (:file "macros")
  13    (:file "prediction")
  14    (:file "parser"))
  15   :serial t)
  16
  17 (defsystem lalr-parser-generator-tests
  18   :depends-on (:lalr-parser-generator :rt)
  19   :components
  20   ((:file "tests")))
  21
  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))
  25
  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"))))