fix datalog colorer for specials

closes PR 13991

original commit: 28e2d6098b112c47c20430423504ba5f6e62bcf8
This commit is contained in:
Robby Findler 2013-09-14 17:44:41 -05:00
parent 05f2a2b25b
commit 0d174b701c

View File

@ -33,4 +33,6 @@
[(:or "!=" #\= #\? #\~ #\. #\, ":-") (syn-val lexeme 'parenthesis #f start-pos end-pos)]
[(eof) (syn-val lexeme 'eof #f start-pos end-pos)]
[#\" ((colorize-string start-pos) input-port)]
[any-char (syn-val lexeme 'error #f start-pos end-pos)]))
[any-char (syn-val lexeme 'error #f start-pos end-pos)]
[(special) (syn-val lexeme 'error #f start-pos end-pos)]
[(special-comment) (syn-val lexeme 'error #f start-pos end-pos)]))