Mercurial > hg > RemoteEditor > vim7

comparison runtime/syntax/elmfilt.vim @ 0:76efa0be13f1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial revision
author atsuki
date Sat, 10 Nov 2007 15:07:22 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:76efa0be13f1
1 " Vim syntax file
2 " Language: Elm Filter rules
3 " Maintainer: Dr. Charles E. Campbell, Jr. <NdrOchipS@PcampbellAfamily.Mbiz>
4 " Last Change: Sep 11, 2006
5 " Version: 5
6 " URL: http://mysite.verizon.net/astronaut/vim/index.html#vimlinks_syntax
7
8 " For version 5.x: Clear all syntax items
9 " For version 6.x: Quit when a syntax file was already loaded
10 if version < 600
11 syntax clear
12 elseif exists("b:current_syntax")
13 finish
14 endif
15
16 syn cluster elmfiltIfGroup contains=elmfiltCond,elmfiltOper,elmfiltOperKey,,elmfiltNumber,elmfiltOperKey
17
18 syn match elmfiltParenError "[()]"
19 syn match elmfiltMatchError "/"
20 syn region elmfiltIf start="\<if\>" end="\<then\>" contains=elmfiltParen,elmfiltParenError skipnl skipwhite nextgroup=elmfiltAction
21 syn region elmfiltParen contained matchgroup=Delimiter start="(" matchgroup=Delimiter end=")" contains=elmfiltParen,@elmfiltIfGroup,elmfiltThenError
22 syn region elmfiltMatch contained matchgroup=Delimiter start="/" skip="\\/" matchgroup=Delimiter end="/" skipnl skipwhite nextgroup=elmfiltOper,elmfiltOperKey
23 syn match elmfiltThenError "\<then.*$"
24 syn match elmfiltComment "^#.*$" contains=@Spell
25
26 syn keyword elmfiltAction contained delete execute executec forward forwardc leave save savecopy skipnl skipwhite nextgroup=elmfiltString
27 syn match elmfiltArg contained "[^\\]%[&0-9dDhmrsSty&]"lc=1
28
29 syn match elmfiltOperKey contained "\<contains\>" skipnl skipwhite nextgroup=elmfiltString
30 syn match elmfiltOperKey contained "\<matches\s" nextgroup=elmfiltMatch,elmfiltSpaceError
31 syn keyword elmfiltCond contained cc bcc lines always subject sender from to lines received skipnl skipwhite nextgroup=elmfiltString
32 syn match elmfiltNumber contained "\d\+"
33 syn keyword elmfiltOperKey contained and not skipnl skipwhite nextgroup=elmfiltOper,elmfiltOperKey,elmfiltString
34 syn match elmfiltOper contained "\~" skipnl skipwhite nextgroup=elmfiltMatch
35 syn match elmfiltOper contained "<=\|>=\|!=\|<\|<\|=" skipnl skipwhite nextgroup=elmfiltString,elmfiltCond,elmfiltOperKey
36 syn region elmfiltString contained start='"' skip='"\(\\\\\)*\\["%]' end='"' contains=elmfiltArg skipnl skipwhite nextgroup=elmfiltOper,elmfiltOperKey,@Spell
37 syn region elmfiltString contained start="'" skip="'\(\\\\\)*\\['%]" end="'" contains=elmfiltArg skipnl skipwhite nextgroup=elmfiltOper,elmfiltOperKey,@Spell
38 syn match elmfiltSpaceError contained "\s.*$"
39
40 " Define the default highlighting.
41 " For version 5.7 and earlier: only when not done already
42 " For version 5.8 and later: only when an item doesn't have highlighting yet
43 if version >= 508 || !exists("did_elmfilt_syntax_inits")
44 if version < 508
45 let did_elmfilt_syntax_inits = 1
46 command -nargs=+ HiLink hi link <args>
47 else
48 command -nargs=+ HiLink hi def link <args>
49 endif
50
51 HiLink elmfiltAction Statement
52 HiLink elmfiltArg Special
53 HiLink elmfiltComment Comment
54 HiLink elmfiltCond Statement
55 HiLink elmfiltIf Statement
56 HiLink elmfiltMatch Special
57 HiLink elmfiltMatchError Error
58 HiLink elmfiltNumber Number
59 HiLink elmfiltOper Operator
60 HiLink elmfiltOperKey Type
61 HiLink elmfiltParenError Error
62 HiLink elmfiltSpaceError Error
63 HiLink elmfiltString String
64 HiLink elmfiltThenError Error
65
66 delcommand HiLink
67 endif
68
69 let b:current_syntax = "elmfilt"
70 " vim: ts=9