Posted on Sep 22, 2009 by
Happy Lion
;;; The specification is not totally clear about it, but I think ;;; SET-SYNTAX-FROM-CHAR should clear a character's associated ;;; dispatch tables when the FROM character is not a ;;; dispatch macro character.
;;; I.e. the following should signal an error.
(let ((rt (copy-readtable nil))) (set-syntax-from-char ## #\A rt (copy-readtable nil)) (get-dispatch-macro-character ## #\x rt))
Status: Accepted
Labels:
Type-Defect
Priority-Medium