Fix scheme comments

This commit is contained in:
masad-frost 2018-06-09 02:03:41 -07:00
parent 520915ef46
commit 29bee2f3ef

View file

@ -77,7 +77,13 @@ export const language = <ILanguage>{
[/#[xXoObB][0-9a-fA-F]+/, 'number.hex'],
[/[+-]?\d+(?:(?:\.\d*)?(?:[eE][+-]?\d+)?)?/, 'number.float'],
[/(?:\b(?:(define|define-syntax|define-macro))\b)(\s+)((?:\w|\-|\!|\?)*)/, ['keyword', 'white', 'variable']],
[
/(?:\b(?:(define|define-syntax|define-macro))\b)(\s+)((?:\w|\-|\!|\?)*)/,
['keyword', 'white', 'variable'],
],
{ include: '@whitespace' },
{ include: '@strings' },
[
/[a-zA-Z_#][a-zA-Z0-9_\-\?\!\*]*/,
@ -90,21 +96,18 @@ export const language = <ILanguage>{
},
},
],
{ include: '@whitespace' },
{ include: '@strings' },
],
comment: [
[/[^\|#]+/, 'comment'],
[/\|\#/, 'comment', '@push'],
[/#\|/, 'comment', '@pop'],
[/#\|/, 'comment', '@push'],
[/\|#/, 'comment', '@pop'],
[/[\|#]/, 'comment'],
],
whitespace: [
[/[ \t\r\n]+/, 'white'],
[/\|\#/, 'comment', '@comment'],
[/#\|/, 'comment', '@comment'],
[/;.*$/, 'comment'],
],