(defpackage #:sb-aclrepl-system (:use #:asdf #:cl))
(in-package #:sb-aclrepl-system)
-;; Work-around for optimization note from EQL specializer
-(declaim (optimize (sb-ext:inhibit-warnings 3)))
-
(defsystem sb-aclrepl
:author "Kevin Rosenberg <kevin@rosenberg.net>"
:description "An AllegroCL compatible REPL"
(:file "inspect" :depends-on ("repl"))
(:file "debug" :depends-on ("repl"))))
+(defmethod perform :after ((o load-op) (c (eql (find-system :sb-aclrepl))))
+ (provide 'sb-aclrepl))
+
(defmethod perform ((o test-op) (c (eql (find-system :sb-aclrepl))))
(oos 'load-op 'sb-aclrepl-tests)
(oos 'test-op 'sb-aclrepl-tests))
(defmethod perform ((o test-op) (c (eql (find-system :sb-aclrepl-tests))))
(or (funcall (intern "DO-TESTS" (find-package "SB-RT")))
(error "test-op failed")))
-
-(declaim (optimize (sb-ext:inhibit-warnings 0)))