X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-aclrepl%2Fsb-aclrepl.asd;h=8a18b3988802f71a0d2c09aaf052d9736614e4d3;hb=4ed3f0d08c3a57a6762018d9622f253ab9d0f2b6;hp=0c5b8f81fa251add763b604da073af9b9de68d5e;hpb=541c9393cf9d9b61271c5f087020d34547603a34;p=sbcl.git

diff --git a/contrib/sb-aclrepl/sb-aclrepl.asd b/contrib/sb-aclrepl/sb-aclrepl.asd
index 0c5b8f8..8a18b39 100644
--- a/contrib/sb-aclrepl/sb-aclrepl.asd
+++ b/contrib/sb-aclrepl/sb-aclrepl.asd
@@ -6,11 +6,16 @@
 (defsystem sb-aclrepl
     :author "Kevin Rosenberg <kevin@rosenberg.net>"
     :description "An AllegroCL compatible 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)
   (oos 'test-op 'sb-aclrepl-tests))