Mercurial > vim
annotate runtime/syntax/snobol4.vim @ 11181:13544aa85dc0 v8.0.0477
patch 8.0.0477: the client-server test may hang when failing
commit https://github.com/vim/vim/commit/42205551b140bee8b419b24abe210f56bb80b35e
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Mar 18 19:42:22 2017 +0100
patch 8.0.0477: the client-server test may hang when failing
Problem: The client-server test may hang when failing.
Solution: Set a timer. Add assert_report()
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sat, 18 Mar 2017 19:45:05 +0100 |
| parents | 46763b01cd9a |
| children | 371ceeebbdaa |
| rev | line source |
|---|---|
| 7 | 1 " Vim syntax file |
| 2 " Language: SNOBOL4 | |
| 3 " Maintainer: Rafal Sulejman <rms@poczta.onet.pl> | |
| 857 | 4 " Site: http://rms.republika.pl/vim/syntax/snobol4.vim |
| 1624 | 5 " Last change: 2006 may 10 |
| 857 | 6 " Changes: |
| 1624 | 7 " - strict snobol4 mode (set snobol4_strict_mode to activate) |
| 8 " - incorrect HL of dots in strings corrected | |
| 9 " - incorrect HL of dot-variables in parens corrected | |
| 10 " - one character labels weren't displayed correctly. | |
| 857 | 11 " - nonexistent Snobol4 keywords displayed as errors. |
| 7 | 12 |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
13 " quit when a syntax file was already loaded |
|
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
14 if exists("b:current_syntax") |
| 7 | 15 finish |
| 16 endif | |
| 17 | |
| 18 syntax case ignore | |
| 1624 | 19 |
| 20 " Snobol4 keywords | |
| 21 syn keyword snobol4Keyword any apply arb arbno arg array | |
| 22 syn keyword snobol4Keyword break | |
| 23 syn keyword snobol4Keyword char clear code collect convert copy | |
| 24 syn keyword snobol4Keyword data datatype date define detach differ dump dupl | |
| 25 syn keyword snobol4Keyword endfile eq eval | |
| 26 syn keyword snobol4Keyword field | |
| 27 syn keyword snobol4Keyword ge gt ident | |
| 28 syn keyword snobol4Keyword input integer item | |
| 29 syn keyword snobol4Keyword le len lgt local lpad lt | |
| 30 syn keyword snobol4Keyword ne notany | |
| 31 syn keyword snobol4Keyword opsyn output | |
| 32 syn keyword snobol4Keyword pos prototype | |
| 33 syn keyword snobol4Keyword remdr replace rpad rpos rtab rewind | |
| 34 syn keyword snobol4Keyword size span stoptr | |
| 35 syn keyword snobol4Keyword tab table time trace trim terminal | |
| 36 syn keyword snobol4Keyword unload | |
| 37 syn keyword snobol4Keyword value | |
| 38 | |
| 7 | 39 " CSNOBOL keywords |
| 1624 | 40 syn keyword snobol4ExtKeyword breakx |
| 41 syn keyword snobol4ExtKeyword char chop | |
| 42 syn keyword snobol4ExtKeyword date delete | |
| 43 syn keyword snobol4ExtKeyword exp | |
| 44 syn keyword snobol4ExtKeyword freeze function | |
| 45 syn keyword snobol4ExtKeyword host | |
| 46 syn keyword snobol4ExtKeyword io_findunit | |
| 47 syn keyword snobol4ExtKeyword label lpad leq lge lle llt lne log | |
| 48 syn keyword snobol4ExtKeyword ord | |
| 49 syn keyword snobol4ExtKeyword reverse rpad rsort rename | |
| 50 syn keyword snobol4ExtKeyword serv_listen sset set sort sqrt substr | |
| 51 syn keyword snobol4ExtKeyword thaw | |
| 52 syn keyword snobol4ExtKeyword vdiffer | |
| 7 | 53 |
| 1624 | 54 syn region snobol4String matchgroup=Quote start=+"+ end=+"+ |
| 55 syn region snobol4String matchgroup=Quote start=+'+ end=+'+ | |
| 56 syn match snobol4BogusStatement "^-[^ ][^ ]*" | |
| 57 syn match snobol4Statement "^-\(include\|copy\|module\|line\|plusopts\|case\|error\|noerrors\|list\|unlist\|execute\|noexecute\|copy\)" | |
| 58 syn match snobol4Constant /"[^a-z"']\.[a-z][a-z0-9\-]*"/hs=s+1 | |
| 59 syn region snobol4Goto start=":[sf]\{0,1}(" end=")\|$\|;" contains=ALLBUT,snobol4ParenError | |
| 857 | 60 syn match snobol4Number "\<\d*\(\.\d\d*\)*\>" |
| 1624 | 61 syn match snobol4BogusSysVar "&\w\{1,}" |
| 857 | 62 syn match snobol4SysVar "&\(abort\|alphabet\|anchor\|arb\|bal\|case\|code\|dump\|errlimit\|errtext\|errtype\|fail\|fence\|fnclevel\|ftrace\|fullscan\|input\|lastno\|lcase\|maxlngth\|output\|parm\|rem\|rtntype\|stcount\|stfcount\|stlimit\|stno\|succeed\|trace\|trim\|ucase\)" |
| 1624 | 63 syn match snobol4ExtSysVar "&\(gtrace\|line\|file\|lastline\|lastfile\)" |
| 64 syn match snobol4Label "\(^\|;\)[^-\.\+ \t\*\.]\{1,}[^ \t\*\;]*" | |
| 65 syn match snobol4Comment "\(^\|;\)\([\*\|!;#].*$\)" | |
| 66 | |
| 7 | 67 " Parens matching |
| 68 syn cluster snobol4ParenGroup contains=snobol4ParenError | |
| 69 syn region snobol4Paren transparent start='(' end=')' contains=ALLBUT,@snobol4ParenGroup,snobol4ErrInBracket | |
| 70 syn match snobol4ParenError display "[\])]" | |
| 71 syn match snobol4ErrInParen display contained "[\]{}]\|<%\|%>" | |
| 72 syn region snobol4Bracket transparent start='\[\|<:' end=']\|:>' contains=ALLBUT,@snobol4ParenGroup,snobol4ErrInParen | |
| 857 | 73 syn match snobol4ErrInBracket display contained "[){}]\|<%\|%>" |
| 7 | 74 |
| 75 " optional shell shebang line | |
| 1624 | 76 " syn match snobol4Comment "^\#\!.*$" |
| 7 | 77 |
| 78 " Define the default highlighting. | |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
79 " Only when an item doesn't have highlighting yet |
| 7 | 80 |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
81 hi def link snobol4Constant Constant |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
82 hi def link snobol4Label Label |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
83 hi def link snobol4Goto Repeat |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
84 hi def link snobol4Conditional Conditional |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
85 hi def link snobol4Repeat Repeat |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
86 hi def link snobol4Number Number |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
87 hi def link snobol4Error Error |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
88 hi def link snobol4Statement PreProc |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
89 hi def link snobol4BogusStatement snobol4Error |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
90 hi def link snobol4String String |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
91 hi def link snobol4Comment Comment |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
92 hi def link snobol4Special Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
93 hi def link snobol4Todo Todo |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
94 hi def link snobol4Keyword Keyword |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
95 hi def link snobol4Function Function |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
96 hi def link snobol4MathsOperator Operator |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
97 hi def link snobol4ParenError snobol4Error |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
98 hi def link snobol4ErrInParen snobol4Error |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
99 hi def link snobol4ErrInBracket snobol4Error |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
100 hi def link snobol4SysVar Keyword |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
101 hi def link snobol4BogusSysVar snobol4Error |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
102 if exists("snobol4_strict_mode") |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
103 hi def link snobol4ExtSysVar WarningMsg |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
104 hi def link snobol4ExtKeyword WarningMsg |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
105 else |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
106 hi def link snobol4ExtSysVar snobol4SysVar |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
107 hi def link snobol4ExtKeyword snobol4Keyword |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
1624
diff
changeset
|
108 endif |
| 7 | 109 |
| 110 | |
| 111 let b:current_syntax = "snobol4" | |
| 112 " vim: ts=8 |