|
0
|
1 " Vim syntax file
|
|
|
2 " Language: MEL (Maya Extension Language)
|
|
|
3 " Maintainer: Robert Minsk <egbert@centropolisfx.com>
|
|
|
4 " Last Change: May 27 1999
|
|
|
5 " Based on: Bram Moolenaar <Bram@vim.org> C syntax file
|
|
|
6
|
|
|
7 " For version 5.x: Clear all syntax items
|
|
|
8 " For version 6.x: Quit when a syntax file was already loaded
|
|
|
9 if version < 600
|
|
|
10 syntax clear
|
|
|
11 elseif exists("b:current_syntax")
|
|
|
12 finish
|
|
|
13 endif
|
|
|
14
|
|
|
15 " when wanted, highlight trailing white space and spaces before tabs
|
|
|
16 if exists("mel_space_errors")
|
|
|
17 sy match melSpaceError "\s\+$"
|
|
|
18 sy match melSpaceError " \+\t"me=e-1
|
|
|
19 endif
|
|
|
20
|
|
|
21 " A bunch of usefull MEL keyworks
|
|
|
22 sy keyword melBoolean true false yes no on off
|
|
|
23
|
|
|
24 sy keyword melFunction proc
|
|
|
25 sy match melIdentifier "\$\(\a\|_\)\w*"
|
|
|
26
|
|
|
27 sy keyword melStatement break continue return
|
|
|
28 sy keyword melConditional if else switch
|
|
|
29 sy keyword melRepeat while for do in
|
|
|
30 sy keyword melLabel case default
|
|
|
31 sy keyword melOperator size eval env exists whatIs
|
|
|
32 sy keyword melKeyword alias
|
|
|
33 sy keyword melException catch error warning
|
|
|
34
|
|
|
35 sy keyword melInclude source
|
|
|
36
|
|
|
37 sy keyword melType int float string vector matrix
|
|
|
38 sy keyword melStorageClass global
|
|
|
39
|
|
|
40 sy keyword melDebug trace
|
|
|
41
|
|
|
42 sy keyword melTodo contained TODO FIXME XXX
|
|
|
43
|
|
|
44 " MEL data types
|
|
|
45 sy match melCharSpecial contained "\\[ntr\\"]"
|
|
|
46 sy match melCharError contained "\\[^ntr\\"]"
|
|
|
47
|
|
|
48 sy region melString start=+"+ skip=+\\"+ end=+"+ contains=melCharSpecial,melCharError
|
|
|
49
|
|
|
50 sy case ignore
|
|
|
51 sy match melInteger "\<\d\+\(e[-+]\=\d\+\)\=\>"
|
|
|
52 sy match melFloat "\<\d\+\(e[-+]\=\d\+\)\=f\>"
|
|
|
53 sy match melFloat "\<\d\+\.\d*\(e[-+]\=\d\+\)\=f\=\>"
|
|
|
54 sy match melFloat "\.\d\+\(e[-+]\=\d\+\)\=f\=\>"
|
|
|
55 sy case match
|
|
|
56
|
|
|
57 sy match melCommaSemi contained "[,;]"
|
|
|
58 sy region melMatrixVector start=/<</ end=/>>/ contains=melInteger,melFloat,melIdentifier,melCommaSemi
|
|
|
59
|
|
|
60 sy cluster melGroup contains=melFunction,melStatement,melConditional,melLabel,melKeyword,melStorageClass,melTODO,melCharSpecial,melCharError,melCommaSemi
|
|
|
61
|
|
|
62 " catch errors caused by wrong parenthesis
|
|
|
63 sy region melParen transparent start='(' end=')' contains=ALLBUT,@melGroup,melParenError,melInParen
|
|
|
64 sy match melParenError ")"
|
|
|
65 sy match melInParen contained "[{}]"
|
|
|
66
|
|
|
67 " comments
|
|
|
68 sy region melComment start="/\*" end="\*/" contains=melTodo,melSpaceError
|
|
|
69 sy match melComment "//.*" contains=melTodo,melSpaceError
|
|
|
70 sy match melCommentError "\*/"
|
|
|
71
|
|
|
72 sy region melQuestionColon matchgroup=melConditional transparent start='?' end=':' contains=ALLBUT,@melGroup
|
|
|
73
|
|
|
74 if !exists("mel_minlines")
|
|
|
75 let mel_minlines=15
|
|
|
76 endif
|
|
|
77 exec "sy sync ccomment melComment minlines=" . mel_minlines
|
|
|
78
|
|
|
79 " Define the default highlighting.
|
|
|
80 " For version 5.7 and earlier: only when not done already
|
|
|
81 " For version 5.8 and later: only when an item doesn't have highlighting yet
|
|
|
82 if version >= 508 || !exists("did_mel_syntax_inits")
|
|
|
83 if version < 508
|
|
|
84 let did_mel_syntax_inits = 1
|
|
|
85 command -nargs=+ HiLink hi link <args>
|
|
|
86 else
|
|
|
87 command -nargs=+ HiLink hi def link <args>
|
|
|
88 endif
|
|
|
89
|
|
|
90 HiLink melBoolean Boolean
|
|
|
91 HiLink melFunction Function
|
|
|
92 HiLink melIdentifier Identifier
|
|
|
93 HiLink melStatement Statement
|
|
|
94 HiLink melConditional Conditional
|
|
|
95 HiLink melRepeat Repeat
|
|
|
96 HiLink melLabel Label
|
|
|
97 HiLink melOperator Operator
|
|
|
98 HiLink melKeyword Keyword
|
|
|
99 HiLink melException Exception
|
|
|
100 HiLink melInclude Include
|
|
|
101 HiLink melType Type
|
|
|
102 HiLink melStorageClass StorageClass
|
|
|
103 HiLink melDebug Debug
|
|
|
104 HiLink melTodo Todo
|
|
|
105 HiLink melCharSpecial SpecialChar
|
|
|
106 HiLink melString String
|
|
|
107 HiLink melInteger Number
|
|
|
108 HiLink melFloat Float
|
|
|
109 HiLink melMatrixVector Float
|
|
|
110 HiLink melComment Comment
|
|
|
111 HiLink melError Error
|
|
|
112 HiLink melSpaceError melError
|
|
|
113 HiLink melCharError melError
|
|
|
114 HiLink melParenError melError
|
|
|
115 HiLink melInParen melError
|
|
|
116 HiLink melCommentError melError
|
|
|
117
|
|
|
118 delcommand HiLink
|
|
|
119 endif
|
|
|
120
|
|
|
121 let b:current_syntax = "mel"
|
