X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-aclrepl%2Fsb-aclrepl.asd;h=4fbae1d5477c0748750a3b8cb1f5dff61d5f7a92;hb=f7e3e709f7c2207f1923375942f7fb1c092f92b0;hp=c53f5c34581df5afacdb24f56dc3d0d3c3d690e4;hpb=399b44c202b4160118049bb13a3cdd36ab469819;p=sbcl.git

diff --git a/contrib/sb-aclrepl/sb-aclrepl.asd b/contrib/sb-aclrepl/sb-aclrepl.asd
index c53f5c3..4fbae1d 100644
--- a/contrib/sb-aclrepl/sb-aclrepl.asd
+++ b/contrib/sb-aclrepl/sb-aclrepl.asd
@@ -6,9 +6,15 @@
 (defsystem sb-aclrepl
     :author "Kevin Rosenberg <kevin@rosenberg.net>"
     :description "An AllegroCL compatible REPL"
-    :components ((:file "repl")
-		 (:file "inspect" :depends-on ("repl"))
-		 (:file "debug" :depends-on ("repl"))))
+    #+sb-building-contrib :pathname
+    #+sb-building-contrib "SYS:CONTRIB;SB-ACLREPL;"
+    :components ((:file "toplevel")
+                 (:file "repl" :depends-on ("toplevel"))
+                 (: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)