*** empty log message ***

original commit: 0962f9b8511a605fa83e1e6156380a4b21471f14
This commit is contained in:
Scott Owens 2003-11-09 23:38:01 +00:00
parent 8ba1181bd5
commit 571266c919

View File

@ -5,6 +5,7 @@
(lib "mred.ss" "mred")
(lib "token-tree.ss" "syntax-color")
(lib "paren-tree.ss" "syntax-color")
(lib "default-lexer.ss" "syntax-color")
"sig.ss"
"../macro.ss")
@ -388,7 +389,7 @@
;;
;; matches is a list of lists of matching paren types.
;; For example, '((|(| |)|) (|[| |]|))
(init-field get-token prefix (matches null))
(init-field (get-token default-lexer) (prefix 'default) (matches null))
(rename (super-on-disable-surrogate on-disable-surrogate))
(define/override (on-disable-surrogate text)