X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-grovel%2Fsb-grovel.asd;h=864671f0c2c71a000ec861316649ff0b7e30534d;hb=8aaa977f8614614517e62e212914fdbd19c1b7e9;hp=13d5a40f4161b2be8b73e08a1463fe9e83ca969f;hpb=a09b213e5812edd1ef3e88c18bde6bd1294da547;p=sbcl.git

diff --git a/contrib/sb-grovel/sb-grovel.asd b/contrib/sb-grovel/sb-grovel.asd
index 13d5a40..864671f 100644
--- a/contrib/sb-grovel/sb-grovel.asd
+++ b/contrib/sb-grovel/sb-grovel.asd
@@ -5,8 +5,14 @@
 
 (defsystem sb-grovel
     :version "0.01"
+    #+sb-building-contrib :pathname
+    #+sb-building-contrib #p"SYS:CONTRIB;SB-GROVEL;"
     :components ((:file "defpackage")
-		 (:file "def-to-lisp" :depends-on ("defpackage"))))
+                 (:file "def-to-lisp" :depends-on ("defpackage"))
+                 (:file "foreign-glue" :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)