Lisp HUG Maillist Archive

LOAD-TIME-VALUE in :DEFAULT-INITARGS: bug or feature?

Hi!

Why LOAD-TIME-VALUE doesn't work in :DEFAULT-INITARGS?  LispWorks 4.3
for MS Windows.  Everything is OK in CMU CL.

======================================================================
CL-USER 16 : Inspect 1 > (defclass test ()
                           ((s1 :initarg :s1))
                           (:default-initargs :s1 (+ 1 2)))
#<STANDARD-CLASS TEST 2066EC3C>

CL-USER 17 : Inspect 1 > (inspect (make-instance 'test))

#<TEST 20671ECC> is a TEST
S1      3

CL-USER 18 : Inspect 2 > (defclass test ()
                           ((s1 :initarg :s1))
                           (:default-initargs :s1 (load-time-value (+ 1 2))))
#<STANDARD-CLASS TEST 2066EC3C>

CL-USER 19 : Inspect 2 > (inspect (make-instance 'test))

#<TEST 20668D24> is a TEST
S1      (LOAD-TIME-VALUE (+ 1 2))
======================================================================

-- 
Ivan Boldyrev


Re: LOAD-TIME-VALUE in :DEFAULT-INITARGS: bug or feature?

Unable to parse email body. Email id is 3158

Updated at: 2020-12-10 08:54 UTC