annotate runtime/syntax/scheme.vim @ 9246:6ee88fa405b3 v7.4.1906

commit https://github.com/vim/vim/commit/5f1032d2a55b9417a0a6fa225e35089c98a5a419 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jun 7 22:16:36 2016 +0200 patch 7.4.1906 Problem: Collapsing channel buffers and searching for NL does not work properly. (Xavier de Gary, Ramel Eshed) Solution: Do not assume the buffer contains a NUL or not. Change NUL bytes to NL to avoid the string is truncated.
author Christian Brabandt <cb@256bit.org>
date Tue, 07 Jun 2016 22:30:06 +0200
parents bc38030aec7d
children 43efa4f5a8ea
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 " Vim syntax file
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
2 " Language: Scheme (R5RS + some R6RS extras)
9116
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
3 " Last Change: 2016 May 23
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
4 " Maintainer: Sergey Khorev <sergey.khorev@gmail.com>
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
5 " Original author: Dirk van Deun <dirk@igwe.vub.ac.be>
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 " This script incorrectly recognizes some junk input as numerals:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 " parsing the complete system of Scheme numerals using the pattern
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 " language is practically impossible: I did a lax approximation.
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
10
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
11 " MzScheme extensions can be activated with setting is_mzscheme variable
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 " Suggestions and bug reports are solicited by the author.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 " Initializing:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17 " For version 5.x: Clear all syntax items
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18 " For version 6.x: Quit when a syntax file was already loaded
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
19 if version < 600
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20 syntax clear
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
21 elseif exists("b:current_syntax")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
22 finish
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
23 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
24
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
25 let s:cpo_save = &cpo
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
26 set cpo&vim
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
27
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
28 syn case ignore
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
29
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30 " Fascist highlighting: everything that doesn't fit the rules is an error...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
31
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
32 syn match schemeError ![^ \t()\[\]";]*!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
33 syn match schemeError ")"
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
34
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
35 " Quoted and backquoted stuff
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
36
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
37 syn region schemeQuoted matchgroup=Delimiter start="['`]" end=![ \t()\[\]";]!me=e-1 contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
38
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
39 syn region schemeQuoted matchgroup=Delimiter start="['`](" matchgroup=Delimiter end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
40 syn region schemeQuoted matchgroup=Delimiter start="['`]#(" matchgroup=Delimiter end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
41
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
42 syn region schemeStrucRestricted matchgroup=Delimiter start="(" matchgroup=Delimiter end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
43 syn region schemeStrucRestricted matchgroup=Delimiter start="#(" matchgroup=Delimiter end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
44
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
45 " Popular Scheme extension:
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
46 " using [] as well as ()
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
47 syn region schemeStrucRestricted matchgroup=Delimiter start="\[" matchgroup=Delimiter end="\]" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
48 syn region schemeStrucRestricted matchgroup=Delimiter start="#\[" matchgroup=Delimiter end="\]" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
49
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
50 syn region schemeUnquote matchgroup=Delimiter start="," end=![ \t\[\]()";]!me=e-1 contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
51 syn region schemeUnquote matchgroup=Delimiter start=",@" end=![ \t\[\]()";]!me=e-1 contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
52
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
53 syn region schemeUnquote matchgroup=Delimiter start=",(" end=")" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
54 syn region schemeUnquote matchgroup=Delimiter start=",@(" end=")" contains=ALL
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
55
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
56 syn region schemeUnquote matchgroup=Delimiter start=",#(" end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
57 syn region schemeUnquote matchgroup=Delimiter start=",@#(" end=")" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
58
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
59 syn region schemeUnquote matchgroup=Delimiter start=",\[" end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
60 syn region schemeUnquote matchgroup=Delimiter start=",@\[" end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
61
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
62 syn region schemeUnquote matchgroup=Delimiter start=",#\[" end="\]" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
63 syn region schemeUnquote matchgroup=Delimiter start=",@#\[" end="\]" contains=ALLBUT,schemeStruc,schemeSyntax,schemeFunc
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
64
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
65 " R5RS Scheme Functions and Syntax:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
66
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
67 if version < 600
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
68 set iskeyword=33,35-39,42-58,60-90,94,95,97-122,126,_
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
69 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
70 setlocal iskeyword=33,35-39,42-58,60-90,94,95,97-122,126,_
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
71 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
72
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
73 syn keyword schemeSyntax lambda and or if cond case define let let* letrec
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
74 syn keyword schemeSyntax begin do delay set! else =>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
75 syn keyword schemeSyntax quote quasiquote unquote unquote-splicing
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
76 syn keyword schemeSyntax define-syntax let-syntax letrec-syntax syntax-rules
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
77 " R6RS
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
78 syn keyword schemeSyntax define-record-type fields protocol
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
79
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
80 syn keyword schemeFunc not boolean? eq? eqv? equal? pair? cons car cdr set-car!
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
81 syn keyword schemeFunc set-cdr! caar cadr cdar cddr caaar caadr cadar caddr
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
82 syn keyword schemeFunc cdaar cdadr cddar cdddr caaaar caaadr caadar caaddr
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83 syn keyword schemeFunc cadaar cadadr caddar cadddr cdaaar cdaadr cdadar cdaddr
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
84 syn keyword schemeFunc cddaar cddadr cdddar cddddr null? list? list length
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
85 syn keyword schemeFunc append reverse list-ref memq memv member assq assv assoc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
86 syn keyword schemeFunc symbol? symbol->string string->symbol number? complex?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
87 syn keyword schemeFunc real? rational? integer? exact? inexact? = < > <= >=
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
88 syn keyword schemeFunc zero? positive? negative? odd? even? max min + * - / abs
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
89 syn keyword schemeFunc quotient remainder modulo gcd lcm numerator denominator
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
90 syn keyword schemeFunc floor ceiling truncate round rationalize exp log sin cos
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
91 syn keyword schemeFunc tan asin acos atan sqrt expt make-rectangular make-polar
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
92 syn keyword schemeFunc real-part imag-part magnitude angle exact->inexact
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
93 syn keyword schemeFunc inexact->exact number->string string->number char=?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
94 syn keyword schemeFunc char-ci=? char<? char-ci<? char>? char-ci>? char<=?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
95 syn keyword schemeFunc char-ci<=? char>=? char-ci>=? char-alphabetic? char?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
96 syn keyword schemeFunc char-numeric? char-whitespace? char-upper-case?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 syn keyword schemeFunc char-lower-case?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98 syn keyword schemeFunc char->integer integer->char char-upcase char-downcase
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
99 syn keyword schemeFunc string? make-string string string-length string-ref
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
100 syn keyword schemeFunc string-set! string=? string-ci=? string<? string-ci<?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
101 syn keyword schemeFunc string>? string-ci>? string<=? string-ci<=? string>=?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
102 syn keyword schemeFunc string-ci>=? substring string-append vector? make-vector
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
103 syn keyword schemeFunc vector vector-length vector-ref vector-set! procedure?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
104 syn keyword schemeFunc apply map for-each call-with-current-continuation
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 syn keyword schemeFunc call-with-input-file call-with-output-file input-port?
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 syn keyword schemeFunc output-port? current-input-port current-output-port
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
107 syn keyword schemeFunc open-input-file open-output-file close-input-port
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 syn keyword schemeFunc close-output-port eof-object? read read-char peek-char
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109 syn keyword schemeFunc write display newline write-char call/cc
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 syn keyword schemeFunc list-tail string->list list->string string-copy
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
111 syn keyword schemeFunc string-fill! vector->list list->vector vector-fill!
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
112 syn keyword schemeFunc force with-input-from-file with-output-to-file
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
113 syn keyword schemeFunc char-ready? load transcript-on transcript-off eval
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
114 syn keyword schemeFunc dynamic-wind port? values call-with-values
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115 syn keyword schemeFunc scheme-report-environment null-environment
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
116 syn keyword schemeFunc interaction-environment
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
117 " R6RS
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
118 syn keyword schemeFunc make-eq-hashtable make-eqv-hashtable make-hashtable
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
119 syn keyword schemeFunc hashtable? hashtable-size hashtable-ref hashtable-set!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
120 syn keyword schemeFunc hashtable-delete! hashtable-contains? hashtable-update!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
121 syn keyword schemeFunc hashtable-copy hashtable-clear! hashtable-keys
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
122 syn keyword schemeFunc hashtable-entries hashtable-equivalence-function hashtable-hash-function
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
123 syn keyword schemeFunc hashtable-mutable? equal-hash string-hash string-ci-hash symbol-hash
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
124 syn keyword schemeFunc find for-all exists filter partition fold-left fold-right
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
125 syn keyword schemeFunc remp remove remv remq memp assp cons*
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
126
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 " ... so that a single + or -, inside a quoted context, would not be
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 " interpreted as a number (outside such contexts, it's a schemeFunc)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
129
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
130 syn match schemeDelimiter !\.[ \t\[\]()";]!me=e-1
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
131 syn match schemeDelimiter !\.$!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
132 " ... and a single dot is not a number but a delimiter
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
133
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
134 " This keeps all other stuff unhighlighted, except *stuff* and <stuff>:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
135
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
136 syn match schemeOther ,[a-z!$%&*/:<=>?^_~+@#%-][-a-z!$%&*/:<=>?^_~0-9+.@#%]*,
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
137 syn match schemeError ,[a-z!$%&*/:<=>?^_~+@#%-][-a-z!$%&*/:<=>?^_~0-9+.@#%]*[^-a-z!$%&*/:<=>?^_~0-9+.@ \t\[\]()";]\+[^ \t\[\]()";]*,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
138
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
139 syn match schemeOther "\.\.\."
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
140 syn match schemeError !\.\.\.[^ \t\[\]()";]\+!
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
141 " ... a special identifier
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
142
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
143 syn match schemeConstant ,\*[-a-z!$%&*/:<=>?^_~0-9+.@]\+\*[ \t\[\]()";],me=e-1
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
144 syn match schemeConstant ,\*[-a-z!$%&*/:<=>?^_~0-9+.@]\+\*$,
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
145 syn match schemeError ,\*[-a-z!$%&*/:<=>?^_~0-9+.@]*\*[^-a-z!$%&*/:<=>?^_~0-9+.@ \t\[\]()";]\+[^ \t\[\]()";]*,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
146
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
147 syn match schemeConstant ,<[-a-z!$%&*/:<=>?^_~0-9+.@]*>[ \t\[\]()";],me=e-1
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
148 syn match schemeConstant ,<[-a-z!$%&*/:<=>?^_~0-9+.@]*>$,
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
149 syn match schemeError ,<[-a-z!$%&*/:<=>?^_~0-9+.@]*>[^-a-z!$%&*/:<=>?^_~0-9+.@ \t\[\]()";]\+[^ \t\[\]()";]*,
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
150
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
151 " Non-quoted lists, and strings:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
152
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
153 syn region schemeStruc matchgroup=Delimiter start="(" matchgroup=Delimiter end=")" contains=ALL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
154 syn region schemeStruc matchgroup=Delimiter start="#(" matchgroup=Delimiter end=")" contains=ALL
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
155
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
156 syn region schemeStruc matchgroup=Delimiter start="\[" matchgroup=Delimiter end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
157 syn region schemeStruc matchgroup=Delimiter start="#\[" matchgroup=Delimiter end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
158
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
159 " Simple literals:
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
160 syn region schemeString start=+\%(\\\)\@<!"+ skip=+\\[\\"]+ end=+"+ contains=@Spell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
161
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
162 " Comments:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
164 syn match schemeComment ";.*$" contains=@Spell
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
165
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
166
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
167 " Writing out the complete description of Scheme numerals without
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
168 " using variables is a day's work for a trained secretary...
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
169
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
170 syn match schemeOther ![+-][ \t\[\]()";]!me=e-1
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
171 syn match schemeOther ![+-]$!
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
172 "
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
173 " This is a useful lax approximation:
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
174 syn match schemeNumber "[-#+.]\=[0-9][-#+/0-9a-f@i.boxesfdl]*"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
175 syn match schemeError ![-#+0-9.][-#+/0-9a-f@i.boxesfdl]*[^-#+/0-9a-f@i.boxesfdl \t\[\]()";][^ \t\[\]()";]*!
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
176
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
177 syn match schemeBoolean "#[tf]"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
178 syn match schemeError !#[tf][^ \t\[\]()";]\+!
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
179
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
180 syn match schemeCharacter "#\\"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
181 syn match schemeCharacter "#\\."
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
182 syn match schemeError !#\\.[^ \t\[\]()";]\+!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
183 syn match schemeCharacter "#\\space"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
184 syn match schemeError !#\\space[^ \t\[\]()";]\+!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
185 syn match schemeCharacter "#\\newline"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
186 syn match schemeError !#\\newline[^ \t\[\]()";]\+!
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
187
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
188 " R6RS
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
189 syn match schemeCharacter "#\\x[0-9a-fA-F]\+"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
190
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
191
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
192 if exists("b:is_mzscheme") || exists("is_mzscheme")
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
193 " MzScheme extensions
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
194 " multiline comment
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
195 syn region schemeComment start="#|" end="|#" contains=@Spell
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
196
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
197 " #%xxx are the special MzScheme identifiers
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
198 syn match schemeOther "#%[-a-z!$%&*/:<=>?^_~0-9+.@#%]\+"
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
199 " anything limited by |'s is identifier
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
200 syn match schemeOther "|[^|]\+|"
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
201
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
202 syn match schemeCharacter "#\\\%(return\|tab\)"
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
203
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
204 " Modules require stmt
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
205 syn keyword schemeExtSyntax module require dynamic-require lib prefix all-except prefix-all-except rename
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
206 " modules provide stmt
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
207 syn keyword schemeExtSyntax provide struct all-from all-from-except all-defined all-defined-except
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
208 " Other from MzScheme
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
209 syn keyword schemeExtSyntax with-handlers when unless instantiate define-struct case-lambda syntax-case
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
210 syn keyword schemeExtSyntax free-identifier=? bound-identifier=? module-identifier=? syntax-object->datum
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
211 syn keyword schemeExtSyntax datum->syntax-object
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
212 syn keyword schemeExtSyntax let-values let*-values letrec-values set!-values fluid-let parameterize begin0
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
213 syn keyword schemeExtSyntax error raise opt-lambda define-values unit unit/sig define-signature
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
214 syn keyword schemeExtSyntax invoke-unit/sig define-values/invoke-unit/sig compound-unit/sig import export
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
215 syn keyword schemeExtSyntax link syntax quasisyntax unsyntax with-syntax
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
216
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
217 syn keyword schemeExtFunc format system-type current-extension-compiler current-extension-linker
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
218 syn keyword schemeExtFunc use-standard-linker use-standard-compiler
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
219 syn keyword schemeExtFunc find-executable-path append-object-suffix append-extension-suffix
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
220 syn keyword schemeExtFunc current-library-collection-paths current-extension-compiler-flags make-parameter
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
221 syn keyword schemeExtFunc current-directory build-path normalize-path current-extension-linker-flags
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
222 syn keyword schemeExtFunc file-exists? directory-exists? delete-directory/files delete-directory delete-file
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
223 syn keyword schemeExtFunc system compile-file system-library-subpath getenv putenv current-standard-link-libraries
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
224 syn keyword schemeExtFunc remove* file-size find-files fold-files directory-list shell-execute split-path
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
225 syn keyword schemeExtFunc current-error-port process/ports process printf fprintf open-input-string open-output-string
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
226 syn keyword schemeExtFunc get-output-string
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
227 " exceptions
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
228 syn keyword schemeExtFunc exn exn:application:arity exn:application:continuation exn:application:fprintf:mismatch
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
229 syn keyword schemeExtFunc exn:application:mismatch exn:application:type exn:application:mismatch exn:break exn:i/o:filesystem exn:i/o:port
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
230 syn keyword schemeExtFunc exn:i/o:port:closed exn:i/o:tcp exn:i/o:udp exn:misc exn:misc:application exn:misc:unsupported exn:module exn:read
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
231 syn keyword schemeExtFunc exn:read:non-char exn:special-comment exn:syntax exn:thread exn:user exn:variable exn:application:mismatch
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
232 syn keyword schemeExtFunc exn? exn:application:arity? exn:application:continuation? exn:application:fprintf:mismatch? exn:application:mismatch?
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
233 syn keyword schemeExtFunc exn:application:type? exn:application:mismatch? exn:break? exn:i/o:filesystem? exn:i/o:port? exn:i/o:port:closed?
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
234 syn keyword schemeExtFunc exn:i/o:tcp? exn:i/o:udp? exn:misc? exn:misc:application? exn:misc:unsupported? exn:module? exn:read? exn:read:non-char?
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
235 syn keyword schemeExtFunc exn:special-comment? exn:syntax? exn:thread? exn:user? exn:variable? exn:application:mismatch?
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
236 " Command-line parsing
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
237 syn keyword schemeExtFunc command-line current-command-line-arguments once-any help-labels multi once-each
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
238
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
239 " syntax quoting, unquoting and quasiquotation
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
240 syn region schemeUnquote matchgroup=Delimiter start="#," end=![ \t\[\]()";]!me=e-1 contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
241 syn region schemeUnquote matchgroup=Delimiter start="#,@" end=![ \t\[\]()";]!me=e-1 contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
242 syn region schemeUnquote matchgroup=Delimiter start="#,(" end=")" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
243 syn region schemeUnquote matchgroup=Delimiter start="#,@(" end=")" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
244 syn region schemeUnquote matchgroup=Delimiter start="#,\[" end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
245 syn region schemeUnquote matchgroup=Delimiter start="#,@\[" end="\]" contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
246 syn region schemeQuoted matchgroup=Delimiter start="#['`]" end=![ \t()\[\]";]!me=e-1 contains=ALL
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
247 syn region schemeQuoted matchgroup=Delimiter start="#['`](" matchgroup=Delimiter end=")" contains=ALL
9116
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
248
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
249 " Identifiers are very liberal in MzScheme/Racket
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
250 syn match schemeOther ![^()[\]{}",'`;#|\\ ]\+!
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
251
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
252 " Language setting
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
253 syn match schemeLang "#lang [-+_/A-Za-z0-9]\+\>"
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
254
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
255 " Various number forms
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
256 syn match schemeNumber "[-+]\=[0-9]\+\(\.[0-9]*\)\=\(e[-+]\=[0-9]\+\)\=\>"
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
257 syn match schemeNumber "[-+]\=\.[0-9]\+\(e[-+]\=[0-9]\+\)\=\>"
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
258 syn match schemeNumber "[-+]\=[0-9]\+/[0-9]\+\>"
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
259 syn match schemeNumber "\([-+]\=\([0-9]\+\(\.[0-9]*\)\=\(e[-+]\=[0-9]\+\)\=\|\.[0-9]\+\(e[-+]\=[0-9]\+\)\=\|[0-9]\+/[0-9]\+\)\)\=[-+]\([0-9]\+\(\.[0-9]*\)\=\(e[-+]\=[0-9]\+\)\=\|\.[0-9]\+\(e[-+]\=[0-9]\+\)\=\|[0-9]\+/[0-9]\+\)\=i\>"
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
260 endif
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
261
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
262
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
263 if exists("b:is_chicken") || exists("is_chicken")
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
264 " multiline comment
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
265 syntax region schemeMultilineComment start=/#|/ end=/|#/ contains=@Spell,schemeMultilineComment
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
266
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
267 syn match schemeOther "##[-a-z!$%&*/:<=>?^_~0-9+.@#%]\+"
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
268 syn match schemeExtSyntax "#:[-a-z!$%&*/:<=>?^_~0-9+.@#%]\+"
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
269
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
270 syn keyword schemeExtSyntax unit uses declare hide foreign-declare foreign-parse foreign-parse/spec
36
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
271 syn keyword schemeExtSyntax foreign-lambda foreign-lambda* define-external define-macro load-library
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
272 syn keyword schemeExtSyntax let-values let*-values letrec-values ->string require-extension
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
273 syn keyword schemeExtSyntax let-optionals let-optionals* define-foreign-variable define-record
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
274 syn keyword schemeExtSyntax pointer tag-pointer tagged-pointer? define-foreign-type
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
275 syn keyword schemeExtSyntax require require-for-syntax cond-expand and-let* receive argc+argv
125e80798a85 updated for version 7.0021
vimboss
parents: 26
diff changeset
276 syn keyword schemeExtSyntax fixnum? fx= fx> fx< fx>= fx<= fxmin fxmax
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
277 syn keyword schemeExtFunc ##core#inline ##sys#error ##sys#update-errno
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
278
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
279 " here-string
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
280 syn region schemeString start=+#<<\s*\z(.*\)+ end=+^\z1$+ contains=@Spell
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
281
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
282 if filereadable(expand("<sfile>:p:h")."/cpp.vim")
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
283 unlet! b:current_syntax
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
284 syn include @ChickenC <sfile>:p:h/cpp.vim
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
285 syn region ChickenC matchgroup=schemeOther start=+(\@<=foreign-declare "+ end=+")\@=+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
286 syn region ChickenC matchgroup=schemeComment start=+foreign-declare\s*#<<\z(.*\)$+hs=s+15 end=+^\z1$+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
287 syn region ChickenC matchgroup=schemeOther start=+(\@<=foreign-parse "+ end=+")\@=+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
288 syn region ChickenC matchgroup=schemeComment start=+foreign-parse\s*#<<\z(.*\)$+hs=s+13 end=+^\z1$+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
289 syn region ChickenC matchgroup=schemeOther start=+(\@<=foreign-parse/spec "+ end=+")\@=+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
290 syn region ChickenC matchgroup=schemeComment start=+foreign-parse/spec\s*#<<\z(.*\)$+hs=s+18 end=+^\z1$+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
291 syn region ChickenC matchgroup=schemeComment start=+#>+ end=+<#+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
292 syn region ChickenC matchgroup=schemeComment start=+#>?+ end=+<#+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
293 syn region ChickenC matchgroup=schemeComment start=+#>!+ end=+<#+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
294 syn region ChickenC matchgroup=schemeComment start=+#>\$+ end=+<#+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
295 syn region ChickenC matchgroup=schemeComment start=+#>%+ end=+<#+ contains=@ChickenC
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
296 endif
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
297
1619
b9740fb41986 updated for version 7.2a
vimboss
parents: 36
diff changeset
298 " suggested by Alex Queiroz
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
299 syn match schemeExtSyntax "#![-a-z!$%&*/:<=>?^_~0-9+.@#%]\+"
3513
1b584a6f446c Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 3356
diff changeset
300 syn region schemeString start=+#<#\s*\z(.*\)+ end=+^\z1$+ contains=@Spell
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
301 endif
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
302
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
303 " Synchronization and the wrapping up...
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
304
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
305 syn sync match matchPlace grouphere NONE "^[^ \t]"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
306 " ... i.e. synchronize on a line that starts at the left margin
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
307
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
308 " Define the default highlighting.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
309 " For version 5.7 and earlier: only when not done already
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
310 " For version 5.8 and later: only when an item doesn't have highlighting yet
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
311 if version >= 508 || !exists("did_scheme_syntax_inits")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
312 if version < 508
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
313 let did_scheme_syntax_inits = 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
314 command -nargs=+ HiLink hi link <args>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
315 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
316 command -nargs=+ HiLink hi def link <args>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
317 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
318
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
319 HiLink schemeSyntax Statement
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
320 HiLink schemeFunc Function
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
321
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
322 HiLink schemeString String
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1619
diff changeset
323 HiLink schemeCharacter Character
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
324 HiLink schemeNumber Number
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
325 HiLink schemeBoolean Boolean
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
326
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
327 HiLink schemeDelimiter Delimiter
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
328 HiLink schemeConstant Constant
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
329
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
330 HiLink schemeComment Comment
17
9be87deaeb52 updated for version 7.0009
vimboss
parents: 7
diff changeset
331 HiLink schemeMultilineComment Comment
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
332 HiLink schemeError Error
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
333
26
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
334 HiLink schemeExtSyntax Type
404aac550f35 updated for version 7.0017
vimboss
parents: 17
diff changeset
335 HiLink schemeExtFunc PreProc
9116
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
336
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
337 HiLink schemeLang PreProc
bc38030aec7d commit https://github.com/vim/vim/commit/26852128a2b713ef49341a0c18daba928444e7eb
Christian Brabandt <cb@256bit.org>
parents: 3513
diff changeset
338
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
339 delcommand HiLink
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
340 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
341
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
342 let b:current_syntax = "scheme"
3356
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
343
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
344 let &cpo = s:cpo_save
b37888de599c Update runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
345 unlet s:cpo_save