close Warning: Can't synchronize with repository "(default)" ("(default)" is not readable or not a Git repository.). Look in the Trac log for more information.

Opened 15 years ago

Closed 15 years ago

#33 closed defect (fixed)

get-dispatch-macro-character doesn't signal errors in compiled code

Reported by: Raymond Toy Owned by: somebody
Priority: minor Milestone:
Component: Core Version: 19f
Keywords: Cc:

Description

This example is from the clisp mailing list

* (defun dispatch-macro-char-p (char rt)
  (handler-case (prog1 t 
		  (get-dispatch-macro-character char #\x rt))
    (error () nil)))
DISPATCH-MACRO-CHAR-P
* (dispatch-macro-char-p #\$ (copy-readtable nil))
NIL
* (compile 'dispatch-macro-char-p)
DISPATCH-MACRO-CHAR-P
NIL
NIL
* (dispatch-macro-char-p #\$ (copy-readtable nil))
T

I think this is because get-dispatch-macro-character is declared to be flushable. I think that's wrong since get-dispatch-macro-character is supposed to signal errors.

Change History (1)

comment:1 Changed 15 years ago by Raymond Toy

Resolution: fixed
Status: newclosed

Fixed. Should be available in the next snapshot (2009-11).

Note: See TracTickets for help on using tickets.