Steel Bank Common Lisp

DEFINE-CONDITION and constant :DEFAULT-INITARGS

Reported by Nikodemus Siivola on 2010-03-16
6
This bug affects 1 person
Affects Status Importance Assigned to Milestone
SBCL
Medium
Unassigned

Bug Description

CL-USER> (defconstant +foo+ (lambda () (error "oops")))
+FOO+
CL-USER> (define-condition test () ((xxx :initarg :xxx)) (:default-initargs :xxx +foo+))
TEST
CL-USER> (progn (make-condition 'test) t)

 ...gives the error "oops"!

Jan Moringen (scymtym) wrote :
Changed in sbcl:
status: Confirmed → Fix Committed
Changed in sbcl:
status: Fix Committed → Fix Released
To post a comment you must log in.
This report contains Public information  Edit
Everyone can see this information.

Other bug subscribers