Opened 11 years ago

Closed 10 years ago

#321 closed defect (fixed)

Style-warning can't be used from user program

Reported by: lenst Owned by: gb
Priority: major Milestone:
Component: ANSI CL Compliance Version:
Keywords: Cc: S11001001

Description

Doing

 (princ (make-condition 'style-warning))

Results in a strange error:

 Slot CCL::WARNING-TYPE is unbound in #<STYLE-WARNING #x896DB36>

Style-warning has no standard slots.

Attachments (1)

ccl.subtype-style-warning.diff (1.2 KB) - added by S11001001 11 years ago.
fix for this issue

Download all attachments as: .zip

Change History (3)

Changed 11 years ago by S11001001

fix for this issue

comment:1 Changed 11 years ago by S11001001

  • Cc S11001001 added

I have also encountered this issue while using a condition inheriting from style-warning; with the patch I just attached:

? (define-condition my-style-warning (style-warning) ())
MY-STYLE-WARNING
? (warn 'my-style-warning)
; Compiler warning: In a toplevel form: Nonspecific warning
; While executing: CCL::TOPLEVEL-EVAL, in process listener(1).
NIL

comment:2 Changed 10 years ago by gb

  • Resolution set to fixed
  • Status changed from new to closed

Finally checked in the patch (thanks); mistakenly thought that that had been done many months ago.

Note: See TracTickets for help on using tickets.