X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=contrib%2Fsb-grovel%2Fsb-grovel.asd;h=b1ade293fc678af2573bfb8bb5a9e3f9a6bec309;hb=32c8edbd49ca77907154987e28e8d3f81f61dabc;hp=9f29c2b051ab962adcfd291af43398c01e325c84;hpb=1de341cf0652fb0eb8354f64d95acb0899811173;p=sbcl.git

diff --git a/contrib/sb-grovel/sb-grovel.asd b/contrib/sb-grovel/sb-grovel.asd
index 9f29c2b..b1ade29 100644
--- a/contrib/sb-grovel/sb-grovel.asd
+++ b/contrib/sb-grovel/sb-grovel.asd
@@ -5,11 +5,16 @@
 
 (defsystem sb-grovel
     :version "0.01"
+    #+sb-building-contrib :pathname
+    #+sb-building-contrib "SYS:CONTRIB;SB-GROVEL;"
     :components ((:file "defpackage")
 		 (:file "def-to-lisp" :depends-on ("defpackage"))
 		 (:file "foreign-glue" :depends-on ("defpackage"))
 		 (:file "array-data" :depends-on ("defpackage"))))
 
+(defmethod perform :after ((o load-op) (c (eql (find-system :sb-grovel))))
+  (provide 'sb-grovel))
+
 (defmethod perform ((o test-op) (c (eql (find-system :sb-grovel))))
   t)