376 lines
10 KiB
JSON
376 lines
10 KiB
JSON
{
|
|
"displayName": "Scheme",
|
|
"fileTypes": [
|
|
"scm",
|
|
"ss",
|
|
"sch",
|
|
"rkt"
|
|
],
|
|
"name": "scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#comment"
|
|
},
|
|
{
|
|
"include": "#block-comment"
|
|
},
|
|
{
|
|
"include": "#sexp"
|
|
},
|
|
{
|
|
"include": "#string"
|
|
},
|
|
{
|
|
"include": "#language-functions"
|
|
},
|
|
{
|
|
"include": "#quote"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
],
|
|
"repository": {
|
|
"block-comment": {
|
|
"begin": "#\\|",
|
|
"contentName": "comment",
|
|
"end": "\\|#",
|
|
"name": "comment",
|
|
"patterns": [
|
|
{
|
|
"include": "#block-comment",
|
|
"name": "comment"
|
|
}
|
|
]
|
|
},
|
|
"comment": {
|
|
"begin": "(^[\\t ]+)?(?=;)",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "punctuation.whitespace.comment.leading.scheme"
|
|
}
|
|
},
|
|
"end": "(?!\\G)",
|
|
"patterns": [
|
|
{
|
|
"begin": ";",
|
|
"beginCaptures": {
|
|
"0": {
|
|
"name": "punctuation.definition.comment.scheme"
|
|
}
|
|
},
|
|
"end": "\\n",
|
|
"name": "comment.line.semicolon.scheme"
|
|
}
|
|
]
|
|
},
|
|
"constants": {
|
|
"patterns": [
|
|
{
|
|
"match": "#[ft|]",
|
|
"name": "constant.language.boolean.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=[(\\s])((#[ei])?[0-9]+(\\.[0-9]+)?|(#x)\\h+|(#o)[0-7]+|(#b)[01]+)(?=[]\"'(),;\\[\\s])",
|
|
"name": "constant.numeric.scheme"
|
|
}
|
|
]
|
|
},
|
|
"illegal": {
|
|
"match": "[]()\\[]",
|
|
"name": "invalid.illegal.parenthesis.scheme"
|
|
},
|
|
"language-functions": {
|
|
"patterns": [
|
|
{
|
|
"match": "(?<=([(\\[\\s]))(do|or|and|else|quasiquote|begin|if|case|set!|cond|let|unquote|define|let\\*|unquote-splicing|delay|letrec)(?=([(\\s]))",
|
|
"name": "keyword.control.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=([(\\s]))(char-alphabetic|char-lower-case|char-numeric|char-ready|char-upper-case|char-whitespace|(?:char|string)(?:-ci)?(?:=|<=?|>=?)|atom|boolean|bound-identifier=|char|complex|identifier|integer|symbol|free-identifier=|inexact|eof-object|exact|list|(?:in|out)put-port|pair|real|rational|zero|vector|negative|odd|null|string|eq|equal|eqv|even|number|positive|procedure)(\\?)(?=([(\\s]))",
|
|
"name": "support.function.boolean-test.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=([(\\s]))(char->integer|exact->inexact|inexact->exact|integer->char|symbol->string|list->vector|list->string|identifier->symbol|vector->list|string->list|string->number|string->symbol|number->string)(?=([(\\s]))",
|
|
"name": "support.function.convert-type.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=([(\\s]))(set-c[ad]r|(?:vector|string)-(?:fill|set))(!)(?=([(\\s]))",
|
|
"name": "support.function.with-side-effects.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=([(\\s]))(>=?|<=?|[-*+/=])(?=([(\\s]))",
|
|
"name": "keyword.operator.arithmetic.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=([(\\s]))(append|apply|approximate|call-with-current-continuation|call/cc|catch|construct-identifier|define-syntax|display|foo|for-each|force|format|cd|gen-counter|gen-loser|generate-identifier|last-pair|length|let-syntax|letrec-syntax|list|list-ref|list-tail|load|log|macro|magnitude|map|map-streams|max|member|memq|memv|min|newline|nil|not|peek-char|rationalize|read|read-char|return|reverse|sequence|substring|syntax|syntax-rules|transcript-off|transcript-on|truncate|unwrap-syntax|values-list|write|write-char|cons|c([ad]){1,4}r|abs|acos|angle|asin|assoc|assq|assv|atan|ceiling|cos|floor|round|sin|sqrt|tan|(?:real|imag)-part|numerator|denominatormodulo|expt??|remainder|quotient|lcm|call-with-(?:in|out)put-file|c(?:lose|urrent)-(?:in|out)put-port|with-(?:in|out)put-from-file|open-(?:in|out)put-file|char-(?:downcase|upcase|ready)|make-(?:polar|promise|rectangular|string|vector)string(?:-(?:append|copy|length|ref))?|vector-(?:length|ref))(?=([(\\s]))",
|
|
"name": "support.function.general.scheme"
|
|
}
|
|
]
|
|
},
|
|
"quote": {
|
|
"patterns": [
|
|
{
|
|
"captures": {
|
|
"1": {
|
|
"name": "punctuation.section.quoted.symbol.scheme"
|
|
}
|
|
},
|
|
"match": "(')\\s*(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*)",
|
|
"name": "constant.other.symbol.scheme"
|
|
},
|
|
{
|
|
"captures": {
|
|
"1": {
|
|
"name": "punctuation.section.quoted.empty-list.scheme"
|
|
},
|
|
"2": {
|
|
"name": "meta.expression.scheme"
|
|
},
|
|
"3": {
|
|
"name": "punctuation.section.expression.begin.scheme"
|
|
},
|
|
"4": {
|
|
"name": "punctuation.section.expression.end.scheme"
|
|
}
|
|
},
|
|
"match": "(')\\s*((\\()\\s*(\\)))",
|
|
"name": "constant.other.empty-list.schem"
|
|
},
|
|
{
|
|
"begin": "(')\\s*",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "punctuation.section.quoted.scheme"
|
|
}
|
|
},
|
|
"end": "(?=[()\\s])|(?<=\\n)",
|
|
"name": "string.other.quoted-object.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#quoted"
|
|
}
|
|
]
|
|
}
|
|
]
|
|
},
|
|
"quote-sexp": {
|
|
"begin": "(?<=\\()\\s*(quote)\\s+",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "keyword.control.quote.scheme"
|
|
}
|
|
},
|
|
"contentName": "string.other.quote.scheme",
|
|
"end": "(?=[)\\s])|(?<=\\n)",
|
|
"patterns": [
|
|
{
|
|
"include": "#quoted"
|
|
}
|
|
]
|
|
},
|
|
"quoted": {
|
|
"patterns": [
|
|
{
|
|
"include": "#string"
|
|
},
|
|
{
|
|
"begin": "(\\()",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "punctuation.section.expression.begin.scheme"
|
|
}
|
|
},
|
|
"end": "(\\))",
|
|
"endCaptures": {
|
|
"1": {
|
|
"name": "punctuation.section.expression.end.scheme"
|
|
}
|
|
},
|
|
"name": "meta.expression.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#quoted"
|
|
}
|
|
]
|
|
},
|
|
{
|
|
"include": "#quote"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
]
|
|
},
|
|
"sexp": {
|
|
"begin": "(\\()",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "punctuation.section.expression.begin.scheme"
|
|
}
|
|
},
|
|
"end": "(\\))(\\n)?",
|
|
"endCaptures": {
|
|
"1": {
|
|
"name": "punctuation.section.expression.end.scheme"
|
|
},
|
|
"2": {
|
|
"name": "meta.after-expression.scheme"
|
|
}
|
|
},
|
|
"name": "meta.expression.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#comment"
|
|
},
|
|
{
|
|
"begin": "(?<=\\()(define)\\s+(\\()(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*)((\\s+(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*|[._]))*)\\s*(\\))",
|
|
"captures": {
|
|
"1": {
|
|
"name": "keyword.control.scheme"
|
|
},
|
|
"2": {
|
|
"name": "punctuation.definition.function.scheme"
|
|
},
|
|
"3": {
|
|
"name": "entity.name.function.scheme"
|
|
},
|
|
"4": {
|
|
"name": "variable.parameter.function.scheme"
|
|
},
|
|
"7": {
|
|
"name": "punctuation.definition.function.scheme"
|
|
}
|
|
},
|
|
"end": "(?=\\))",
|
|
"name": "meta.declaration.procedure.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#comment"
|
|
},
|
|
{
|
|
"include": "#sexp"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
]
|
|
},
|
|
{
|
|
"begin": "(?<=\\()(lambda)\\s+(\\()((?:(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*|[._])\\s+)*(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*|[._])?)(\\))",
|
|
"captures": {
|
|
"1": {
|
|
"name": "keyword.control.scheme"
|
|
},
|
|
"2": {
|
|
"name": "punctuation.definition.variable.scheme"
|
|
},
|
|
"3": {
|
|
"name": "variable.parameter.scheme"
|
|
},
|
|
"6": {
|
|
"name": "punctuation.definition.variable.scheme"
|
|
}
|
|
},
|
|
"end": "(?=\\))",
|
|
"name": "meta.declaration.procedure.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#comment"
|
|
},
|
|
{
|
|
"include": "#sexp"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
]
|
|
},
|
|
{
|
|
"begin": "(?<=\\()(define)\\s(\\p{alnum}[!$%\\&*-/:<-@^_~[:alnum:]]*)\\s*.*?",
|
|
"captures": {
|
|
"1": {
|
|
"name": "keyword.control.scheme"
|
|
},
|
|
"2": {
|
|
"name": "variable.other.scheme"
|
|
}
|
|
},
|
|
"end": "(?=\\))",
|
|
"name": "meta.declaration.variable.scheme",
|
|
"patterns": [
|
|
{
|
|
"include": "#comment"
|
|
},
|
|
{
|
|
"include": "#sexp"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
]
|
|
},
|
|
{
|
|
"include": "#quote-sexp"
|
|
},
|
|
{
|
|
"include": "#quote"
|
|
},
|
|
{
|
|
"include": "#language-functions"
|
|
},
|
|
{
|
|
"include": "#string"
|
|
},
|
|
{
|
|
"include": "#constants"
|
|
},
|
|
{
|
|
"match": "(?<=[(\\s])(#\\\\)(space|newline|tab)(?=[)\\s])",
|
|
"name": "constant.character.named.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=[(\\s])(#\\\\)x[0-9A-F]{2,4}(?=[)\\s])",
|
|
"name": "constant.character.hex-literal.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=[(\\s])(#\\\\).(?=[)\\s])",
|
|
"name": "constant.character.escape.scheme"
|
|
},
|
|
{
|
|
"match": "(?<=[ ()])\\.(?=[ ()])",
|
|
"name": "punctuation.separator.cons.scheme"
|
|
},
|
|
{
|
|
"include": "#sexp"
|
|
},
|
|
{
|
|
"include": "#illegal"
|
|
}
|
|
]
|
|
},
|
|
"string": {
|
|
"begin": "(\")",
|
|
"beginCaptures": {
|
|
"1": {
|
|
"name": "punctuation.definition.string.begin.scheme"
|
|
}
|
|
},
|
|
"end": "(\")",
|
|
"endCaptures": {
|
|
"1": {
|
|
"name": "punctuation.definition.string.end.scheme"
|
|
}
|
|
},
|
|
"name": "string.quoted.double.scheme",
|
|
"patterns": [
|
|
{
|
|
"match": "\\\\.",
|
|
"name": "constant.character.escape.scheme"
|
|
}
|
|
]
|
|
}
|
|
},
|
|
"scopeName": "source.scheme"
|
|
}
|