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

*** empty log message ***

Browse Source 
original commit: 0962f9b8511a605fa83e1e6156380a4b21471f14
This commit is contained in:
Scott Owens 2003-11-09 23:38:01 +00:00
parent 8ba1181bd5
commit 571266c919
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/framework/private/color.ss
View File

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