minor minor patch for proxy.lisp in cmucl

Hello,

I was trying to build CLG today, with the CMUCL from Debian/Sid (that
being: "CMU Common Lisp CVS release-18e-branch + minimal debian
patches"); I was encountering some errors during compilation, due to
this CMUCL's more "picky" (heh) handling of the 'defclass' form, which
seems to be:  CMUCL now wants _all_ of the 'requird' arguments for
'defclass', including the slots-definition part -- so if there are no
slots to define, then to just include () instead, in the
slots-defintion spot.

I've patched proxy.lisp for this; I haven't got to any other files,
yet -- ran into another error, while building clg in this cmucl, and
which I'll be sending a message about, next. 

I'm including the patch for proxy.lisp though

I'll tweak any other files for this, as cmucl encounters them -- going
step-by-step with the build.



Thanks for the clg, 


--
Sean





cvs diff: Diffing .
Index: proxy.lisp
===================================================================
RCS file: /cvsroot/clg/clg/glib/proxy.lisp,v
retrieving revision 1.7
diff -p -u -r1.7 proxy.lisp
--- proxy.lisp	20 Jan 2002 14:52:04 -0000	1.7
+++ proxy.lisp	28 Jul 2004 02:23:36 -0000
@@ -23,14 +23,16 @@
 ;;;; Superclass for all metaclasses implementing some sort of virtual slots
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-  (defclass virtual-slot-class (pcl::standard-class))
+  (defclass virtual-slot-class (pcl::standard-class)
+    ())
 
   (defclass direct-virtual-slot-definition (standard-direct-slot-definition)
     ((setter :reader slot-definition-setter :initarg :setter)
      (getter :reader slot-definition-getter :initarg :getter)))
   
   (defclass effective-virtual-slot-definition
-    (standard-effective-slot-definition)))
+    (standard-effective-slot-definition)
+    ()))
   
 
 (defmethod direct-slot-definition-class ((class virtual-slot-class) initargs)
@@ -214,7 +216,8 @@
     ((offset :reader slot-definition-offset)))
   
   (defclass effective-virtual-alien-slot-definition
-    (effective-virtual-slot-definition))
+    (effective-virtual-slot-definition)
+    ())
 
 
   (defmethod most-specific-proxy-superclass ((class proxy-class))


-------------------------------------------------------
This SF.Net email is sponsored by BEA Weblogic Workshop
FREE Java Enterprise J2EE developer tools!
Get your free copy of BEA WebLogic Workshop 8.1 today.
http://ads.osdn.com/?ad_id=4721&alloc_id=10040&op=click