JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
php.vim: show syntax error on invalid chars in "$a[]"
[vim-syntax.git] / chuck.vim
1 " Vim syntax file
2 " Language:     ChucK
3 " Maintained:   Eduard Aylon <eduard.aylon@gmail.com>
4 " Last Change:  28/02/2006
5 " Filenames:    *.ck
6 " Version:      0.1
7 " Adapted by Eduard Aylon <eduard.aylon@gmail.com> from the c.vim syntax file from Bram Moolenar <Bram@vim.org>
8
9 " NOTE: in order to obtain syntax highlighting in Chuck programs just follow the
10 "       steps below or in case you don't have root privileges follow Graham Percival's tip : 
11 "       1. copy this file into /usr/share/vim/vim62/syntax.
12 "       2. add the following line in /usr/share/vim/filetype.vim, 
13 "       
14 "               au BufNewFile,BufRead *.ck          setf ck
15 "               
16
17
18 "Tip from Graham Percival:
19 " If you cannot write to /usr/share/  (lacking root privileges),
20     "   enter these commands:
21     "     $ echo "syntax on" >> ~/.vimrc
22     "     $ mkdir ~/.vim
23     "     $ mkdir ~/.vim/syntax
24     "     $ cp ck.vim ~/.vim/syntax/
25     "     $ echo "if exists(\"did_load_filetypes\")
26     "           finish
27     "         endif
28     "         augroup filetypedetect
29     "          au! BufNewFile,BufRead *.ck setf ck
30     "          augroup END" >> ~/.vim/filetype.vim
31
32
33
34
35 " For version 5.x: Clear all syntax items
36 " For version 6.x: Quit when a syntax file was already loaded
37 if version < 600
38   syntax clear
39 elseif exists("b:current_syntax")
40   finish
41 endif
42
43 "catch errors caused by wrong parenthesis and brackets
44 " also accept <% for {, %> for }, <: for [ and :> for ] (C99)
45 syn cluster     cParenGroup contains=cParenError,cIncluded,cSpecial,cCommentSkip,cCommentString,cComment2String,@cCommentGroup,cCommentStartError,cUserCont,cUserLabel,cBitField,cCommentSkip,cOctalZero,cCppOut,cCppOut2,cCppSkip,cFormat,cNumber,cFloat,cOctal,cOctalError,cNumbersCom
46 if exists("c_no_bracket_error")
47   syn region    cParen          transparent start='(' end=')' contains=ALLBUT,@cParenGroup,cCppParen,cCppString
48   " cCppParen: same as cParen but ends at end-of-line; used in cDefine
49   syn region    cCppParen       transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@cParenGroup,cParen,cString
50   syn match     cParenError     display ")"
51   syn match     cErrInParen     display contained "[{}]\|<%\|%>"
52 else
53   syn region    cParen          transparent start='(' end=')' contains=ALLBUT,@cParenGroup,cCppParen,cErrInBracket,cCppBracket,cCppString
54   " cCppParen: same as cParen but ends at end-of-line; used in cDefine
55   syn region    cCppParen       transparent start='(' skip='\\$' excludenl end=')' end='$' contained contains=ALLBUT,@cParenGroup,cErrInBracket,cParen,cBracket,cString
56   syn match     cParenError     display "[\])]"
57   syn match     cErrInParen     display contained "[\]{}]\|<%\|%>"
58   syn region    cBracket        transparent start='\[\|<:' end=']\|:>' contains=ALLBUT,@cParenGroup,cErrInParen,cCppParen,cCppBracket,cCppString
59   " cCppBracket: same as cParen but ends at end-of-line; used in cDefine
60   syn region    cCppBracket     transparent start='\[\|<:' skip='\\$' excludenl end=']\|:>' end='$' contained contains=ALLBUT,@cParenGroup,cErrInParen,cParen,cBracket,cString
61   syn match     cErrInBracket   display contained "[);{}]\|<%\|%>"
62 endif
63
64
65
66 if exists("c_no_cformat")
67   syn region    cString         start=+L\="+ skip=+\\\\\|\\"+ end=+"+ contains=cSpecial
68   " cCppString: same as cString, but ends at end of line
69   syn region    cCppString      start=+L\="+ skip=+\\\\\|\\"\|\\$+ excludenl end=+"+ end='$' contains=cSpecial
70 else
71   syn match     cFormat         display "%\(\d\+\$\)\=[-+' #0*]*\(\d*\|\*\|\*\d\+\$\)\(\.\(\d*\|\*\|\*\d\+\$\)\)\=\([hlL]\|ll\)\=\([diuoxXDOUfeEgGcCsSpn]\|\[\^\=.[^]]*\]\)" contained
72   syn match     cFormat         display "%%" contained
73   syn region    cString         start=+L\="+ skip=+\\\\\|\\"+ end=+"+ contains=cSpecial,cFormat
74   " cCppString: same as cString, but ends at end of line
75   syn region    cCppString      start=+L\="+ skip=+\\\\\|\\"\|\\$+ excludenl end=+"+ end='$' contains=cSpecial,cFormat
76 endif
77
78
79 if exists("c_comment_strings")
80   " A comment can contain cString, cCharacter and cNumber.
81   " But a "*/" inside a cString in a cComment DOES end the comment!  So we
82   " need to use a special type of cString: cCommentString, which also ends on
83   " "*/", and sees a "*" at the start of the line as comment again.
84   " Unfortunately this doesn't very well work for // type of comments :-(
85   syntax match  cCommentSkip    contained "^\s*\*\($\|\s\+\)"
86   syntax region cCommentString  contained start=+L\=\\\@<!"+ skip=+\\\\\|\\"+ end=+"+ end=+\*/+me=s-1 contains=cSpecial,cCommentSkip
87   syntax region cComment2String contained start=+L\=\\\@<!"+ skip=+\\\\\|\\"+ end=+"+ end="$" contains=cSpecial
88   syntax region  cCommentL      start="//" skip="\\$" end="$" keepend  contains=@cCommentGroup,cComment2String,cCharacter,cNumbersCom,cSpaceError
89   syntax region cComment        matchgroup=cCommentStart start="/\*" end="\*/" contains=@cCommentGroup,cCommentStartError,cCommentString,cCharacter,cNumbersCom,cSpaceError
90 else
91   syn region    cCommentL       start="//" skip="\\$" end="$" keepend contains=@cCommentGroup,cSpaceError
92   syn region    cComment        matchgroup=cCommentStart start="/\*" end="\*/" contains=@cCommentGroup,cCommentStartError,cSpaceError
93 endif
94
95
96 syn match ckNone                "\w\+\.\w\+"
97 syn match   ckNumber      "\<0x\x\+[Ll]\=\>"
98 syn match   ckNumber      "\<\d\+[LljJ]\=\>"
99 syn match   ckNumber      "\.\d\+\([eE][+-]\=\d\+\)\=[jJ]\=\>"
100 syn match   ckNumber      "\<\d\+\.\([eE][+-]\=\d\+\)\=[jJ]\=\>"
101 syn match   ckNumber      "\<\d\+\.\d\+\([eE][+-]\=\d\+\)\=[jJ]\=\>"
102
103
104 " CHUCK extentions
105 syn keyword ckStatement         new goto break return continue spork 
106 syn keyword ckConditional       if else switch
107 syn keyword ckLoop              while for do until
108 syn keyword ckNow               now 
109 syn keyword ckType              dur time Shred UGen Event Object 
110 syn keyword cType               int float string void
111 syn keyword ckAccess            public protected private
112 syn keyword ckOperator          and bitor or xor compl bitand and_eq or_eq xor_eq not not_eq
113 syn match ckCast               "\s*\$\s*\(int\|float\)\s"
114 syn keyword ckStructure         class fun 
115 syn keyword ckUgen              gain noise impulse step phasor sinosc pulseosc triosc sqrosc sawosc halfrec fullrect zerox delayp sndbuf pan2      
116 syn keyword ckSDK               bandedWG blowbotl BlowHole Bowed Brass Clarinet Flute Mandolin ModalBar Moog Saxofony Shakers Sitar StifKarp VoicForm FM BeeThree FMVoices HevyMetl PercFlut Rhodey TubeBell Wurley Delay DelayA DelayL Echo Envelope ADSR biquad Filter OnePole TwoPole OneZero TwoZero PoleZero JCRev NRev PRCRev Chorus Modulate PitShift SubNoise WvIn WvOut WaveLoop
117 syn keyword ckBoolean           true false
118 syn keyword ckShreds            me machine
119 syn keyword ckInheritance       subClass extends 
120 syn keyword ckIO                dac adc blackhole 
121 syn keyword ckNetwork           netin netout
122 syn keyword ckCommunication     MidiIn MidiOut MidiMsg OSC_Recv OSC_Addr OSC_Send
123 syn keyword ckConstants         pi
124 syn match   ckOperator          "\s*=\(>\|<\)\s*"          
125
126 " The minimum and maximum operators in GNU C++
127 syn match cppMinMax "[<>]?"
128
129 " Default highlighting
130 if version >= 508 || !exists("did_cpp_syntax_inits")
131   if version < 508
132     let did_cpp_syntax_inits = 1
133     command -nargs=+ HiLink hi link <args>
134   else
135     command -nargs=+ HiLink hi def link <args>
136   endif
137
138   HiLink ckCommunication        Special
139   HiLink ckNetwork              Special
140   HiLink cCommentL              cComment
141   HiLink cCommentStart          cComment
142   HiLink cComment               Comment
143   HiLink cCppString             cString
144   HiLink cString                String
145   HiLink ckConditional          Conditional
146   HiLink ckLoop                 Repeat
147   HiLink ckAccess               ckStatement
148   HiLink ckUgen                 ckType
149   HiLink ckSDK                  ckType
150   HiLink ckStatement            Statement
151   HiLink ckCast                 ckStatement
152   HiLink ckNow                  Special
153   HiLink ckType                 Type
154   HiLink cType                  Type
155   HiLink ckStructure            Structure
156   HiLink ckOperator             Operator        
157   HiLink ckShreds               ckStatement
158   HiLink ckInheritance          ckStatement
159   HiLink ckBoolean              Boolean
160   HiLink ckIO                   Include
161   HiLink cParenError            cError
162   HiLink cErrInBracket          cError
163   HiLink cErrInParen            cError
164   HiLink cParen                 cError
165   HiLink cCppParen              cError
166   HiLink cBracket               cError
167   HiLink cCppBracket            cError
168   HiLink cError                 Error
169   HiLink ckNumber               Number
170   HiLink ckConstants            Constant
171   
172   delcommand HiLink
173 endif
174
175 let b:current_syntax = "ck"
176
177 " vim: ts=8