X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/048d0b2d143b6a491ac73eed6ab972e97774391c..23e44cba8fe33e8cdde22d1ae14d78d992b9f8bb:/src/lexer-impl.lisp diff --git a/src/lexer-impl.lisp b/src/lexer-impl.lisp index 6fc6fcc..ba1f7c1 100644 --- a/src/lexer-impl.lisp +++ b/src/lexer-impl.lisp @@ -39,9 +39,6 @@ (defmethod make-scanner-stream ((scanner sod-token-scanner)) ;;;-------------------------------------------------------------------------- ;;; Indicators and error messages. -(defvar *indicator-map* (make-hash-table) - "Hash table mapping indicator objects to human-readable descriptions.") - (defun show-char (stream char &optional colonp atsignp) "Format CHAR to STREAM in a readable way.