[mcclim-cvs] CVS update: mcclim/mcclim.asd mcclim/patch.lisp

[Christophe Rhodes]

Update of /project/mcclim/cvsroot/mcclim
In directory common-lisp.net:/tmp/cvs-serv32041

Modified Files:
	mcclim.asd patch.lisp 
Log Message:
SBCL / OpenMCL(?) build fixes

Fix the perennially annoying duplicate component error in the
Scigraph defsystem (name the components by the full namestring, which 
should be unique)

While I'm at it, fix the annoyance over static / dynamic packages: for
sbcl, clim-lisp-patch and clim-mop are dynamic packages, so they 
shouldn't be created by DEFPACKAGE (because reevaluating the defpackage 
subsequently, say by recompiling stuff, then invokes undefined 
behaviour)

Date: Fri Aug 19 23:34:42 2005
Author: crhodes

Index: mcclim/mcclim.asd
diff -u mcclim/mcclim.asd:1.5 mcclim/mcclim.asd:1.6
--- mcclim/mcclim.asd:1.5	Wed Apr 20 00:35:42 2005
+++ mcclim/mcclim.asd	Fri Aug 19 23:34:41 2005
@@ -78,7 +78,7 @@
 			   (parse-namestring c)
 			   (make-pathname :type "lisp"
 					  :defaults *clim-directory*))
-		  collect `(:file ,(pathname-name p) :pathname ,p))))))
+		  collect `(:file ,(namestring p) :pathname ,p))))))
 
 (defsystem :clim-lisp
     :components


Index: mcclim/patch.lisp
diff -u mcclim/patch.lisp:1.4 mcclim/patch.lisp:1.5
--- mcclim/patch.lisp:1.4	Mon Nov 15 05:47:41 2004
+++ mcclim/patch.lisp	Fri Aug 19 23:34:41 2005
@@ -1,6 +1,10 @@
 (in-package :cl-user)
 
-(defpackage :clim-lisp-patch
-    (:use)
-    (:export #:describe #:describe-object #:interactive-stream-p))
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (unless (find-package :clim-lisp-patch)
+    (make-package :clim-lisp-patch :use nil)))
 
+(export '(clim-lisp-patch::describe 
+          clim-lisp-patch::describe-object 
+          clim-lisp-patch::interactive-stream-p) 
+        :clim-lisp-patch)