CVS: sbcl/tests clos.impure-cload.lisp,1.2,1.3

Update of /cvsroot/sbcl/sbcl/tests
In directory sc8-pr-cvs1:/tmp/cvs-serv19786/tests

Modified Files:
        clos.impure-cload.lisp 
Log Message:
0.pre8.8:
        Partial bugfix for defining methods where some of the 
                specializers are forward-referenced-classes
        ... noted by James Anderson, fixed by Gerd Moellmann


Index: clos.impure-cload.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/tests/clos.impure-cload.lisp,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- clos.impure-cload.lisp      23 Dec 2002 13:53:00 -0000      1.2
+++ clos.impure-cload.lisp      25 Mar 2003 15:39:45 -0000      1.3
@@ -54,5 +54,14 @@
 (class-allocation-writer 4)
 (assert (= (class-allocation-reader) 4))
 
+;;; from James Anderson via Gerd Moellmann: defining methods with
+;;; forward-referenced specializers used not to work (FIXME: and also
+;;; calling said method with an instance of something else
+;;; [SPECIALIZER1, here] should work -- patch forthcoming)
+(defclass specializer1 () ())
+(defclass specializer2 (forward-ref1) ())
+(defmethod baz ((x specializer2)) x)
+(defmethod baz ((x specializer1)) x)
+
 ;;; success
 (sb-ext:quit :unix-status 104)



-------------------------------------------------------
This SF.net email is sponsored by:
The Definitive IT and Networking Event. Be There!
NetWorld+Interop Las Vegas 2003 -- Register today!
http://ads.sourceforge.net/cgi-bin/redirect.pl?keyn0001en