Changeset 13432

Timestamp:

08/01/11 21:34:43 (12 years ago)

Author:

Mark Evenson

Message:

Fix the ABCL-ASDF:*ADDED-TO-CLASSPATH* to actually record additions.

The use of this variable is perhaps slightly obsolescent with the use
of JAVA:DUMP-CLASSPATH, but provides a convenient shortcut to
quickly find out what has been added by JAVA:ADD-TO-CLASSPATH.

Location:

trunk/abcl/contrib/abcl-asdf

Files:

• abcl-asdf.asd (modified) (1 diff)
• asdf-jar.lisp (modified) (1 diff)

trunk/abcl/contrib/abcl-asdf/abcl-asdf.asd

@@ -4 +4 @@
 (defsystem :abcl-asdf
   :author "Mark Evenson"
-  :version "0.3.1"
+  :version "0.3.2"
   :depends-on ("jss") 
   :components 

trunk/abcl/contrib/abcl-asdf/asdf-jar.lisp

@@ -27 +27 @@
                 (return-from need-to-add-directory-jar? t)))
   nil)
+
+(defmethod java:add-to-classpath :around ((uri-or-uris t) &optional classloader)
+  (declare (ignore classloader))
+  (call-next-method)
+  (if (listp uri-or-uris)
+      (dolist (uri uri-or-uris)
+        (pushnew uri *added-to-classpath*))
+      (pushnew uri-or-uris *added-to-classpath*)))
 
 (in-package :asdf)