suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix datalog colorer for specials

Browse Source 
closes PR 13991
This commit is contained in:
Robby Findler 2013-09-14 17:44:41 -05:00
parent 8b2b3c767d
commit 28e2d6098b
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/datalog/tool/syntax-color.rkt
View File

@ -33,4 +33,6 @@
[(:or "!=" #\= #\? #\~ #\. #\, ":-") (syn-val lexeme 'parenthesis #f start-pos end-pos)] [(:or "!=" #\= #\? #\~ #\. #\, ":-") (syn-val lexeme 'parenthesis #f start-pos end-pos)]
[(eof) (syn-val lexeme 'eof #f start-pos end-pos)] [(eof) (syn-val lexeme 'eof #f start-pos end-pos)]
[#\" ((colorize-string start-pos) input-port)] [#\" ((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)]))