I'm trying out the 2003-12 snapshot, and think I may have encountered
a bug. Below is a small test case. Wrapping the defclass in
test.lisp with an eval-when, or setting
pcl::*optimize-inline-slot-access-p* to nil makes it work.
Thanks for everyone's work on cmucl.
Todd
(This is on RH 8.0)
----------------------------------------
[EMAIL PROTECTED] ~]{218} cat test.lisp
(defclass foo ()
((bar :accessor bar)))
(defmethod initialize-instance :after ((obj foo) &rest init-args)
(declare (ignore init-args))
(format t "~A~%" (bar obj)))
[EMAIL PROTECTED] ~]{219} lisp -noinit -nositeinit
CMU Common Lisp CVS snapshot 2003-12, running on localhost.localdomain
With core: /usr/lib/cmucl/lib/lisp.core
Dumped on: Sun, 2003-11-30 09:00:10-05:00 on lorien.users.earthlink.net
See <http://www.cons.org/cmucl/> for support information.
Loaded subsystems:
Python 1.1, target Intel x86
CLOS based on Gerd's PCL 2003/06/18 09:23:09
* (defclass foo () ())
#<STANDARD-CLASS FOO {48017B15}>
* (compile-file "test")
; Python version 1.1, VM version Intel x86 on 09 JAN 04 12:32:30 am.
; Compiling: /home/tas/test.lisp 08 JAN 04 11:44:37 pm
;
; Error: (during macroexpansion)
; Error in FDEFINITION: the function BAR is undefined.
;
; Byte Compiling Top-Level Form:
; Compilation unit finished.
; 1 error
; test.x86f written.
; Compilation finished in 0:00:00.
#p"/home/tas/test.x86f"
T
T
*
--
Todd Sabin <[EMAIL PROTECTED]>
