Mercurial > hg > RemoteEditor > vim7
comparison runtime/syntax/sather.vim @ 0:76efa0be13f1
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: Sather/pSather | |
3 " Maintainer: Claudio Fleiner <claudio@fleiner.com> | |
4 " URL: http://www.fleiner.com/vim/syntax/sather.vim | |
5 " Last Change: 2003 May 11 | |
6 | |
7 " Sather is a OO-language developped at the International Computer Science | |
8 " Institute (ICSI) in Berkeley, CA. pSather is a parallel extension to Sather. | |
9 " Homepage: http://www.icsi.berkeley.edu/~sather | |
10 " Sather files use .sa as suffix | |
11 | |
12 " For version 5.x: Clear all syntax items | |
13 " For version 6.x: Quit when a syntax file was already loaded | |
14 if version < 600 | |
15 syntax clear | |
16 elseif exists("b:current_syntax") | |
17 finish | |
18 endif | |
19 | |
20 " keyword definitions | |
21 syn keyword satherExternal extern | |
22 syn keyword satherBranch break continue | |
23 syn keyword satherLabel when then | |
24 syn keyword satherConditional if else elsif end case typecase assert with | |
25 syn match satherConditional "near$" | |
26 syn match satherConditional "far$" | |
27 syn match satherConditional "near *[^(]"he=e-1 | |
28 syn match satherConditional "far *[^(]"he=e-1 | |
29 syn keyword satherSynchronize lock guard sync | |
30 syn keyword satherRepeat loop parloop do | |
31 syn match satherRepeat "while!" | |
32 syn match satherRepeat "break!" | |
33 syn match satherRepeat "until!" | |
34 syn keyword satherBoolValue true false | |
35 syn keyword satherValue self here cluster | |
36 syn keyword satherOperator new "== != & ^ | && || | |
37 syn keyword satherOperator and or not | |
38 syn match satherOperator "[#!]" | |
39 syn match satherOperator ":-" | |
40 syn keyword satherType void attr where | |
41 syn match satherType "near *("he=e-1 | |
42 syn match satherType "far *("he=e-1 | |
43 syn keyword satherStatement return | |
44 syn keyword satherStorageClass static const | |
45 syn keyword satherExceptions try raise catch | |
46 syn keyword satherMethodDecl is pre post | |
47 syn keyword satherClassDecl abstract value class include | |
48 syn keyword satherScopeDecl public private readonly | |
49 | |
50 | |
51 syn match satherSpecial contained "\\\d\d\d\|\\." | |
52 syn region satherString start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=satherSpecial | |
53 syn match satherCharacter "'[^\\]'" | |
54 syn match satherSpecialCharacter "'\\.'" | |
55 syn match satherNumber "-\=\<\d\+L\=\>\|0[xX][0-9a-fA-F]\+\>" | |
56 syn match satherCommentSkip contained "^\s*\*\($\|\s\+\)" | |
57 syn region satherComment2String contained start=+"+ skip=+\\\\\|\\"+ end=+$\|"+ contains=satherSpecial | |
58 syn match satherComment "--.*" contains=satherComment2String,satherCharacter,satherNumber | |
59 | |
60 | |
61 syn sync ccomment satherComment | |
62 | |
63 " Define the default highlighting. | |
64 " For version 5.7 and earlier: only when not done already | |
65 " For version 5.8 and later: only when an item doesn't have highlighting yet | |
66 if version >= 508 || !exists("did_sather_syn_inits") | |
67 if version < 508 | |
68 let did_sather_syn_inits = 1 | |
69 command -nargs=+ HiLink hi link <args> | |
70 else | |
71 command -nargs=+ HiLink hi def link <args> | |
72 endif | |
73 | |
74 HiLink satherBranch satherStatement | |
75 HiLink satherLabel satherStatement | |
76 HiLink satherConditional satherStatement | |
77 HiLink satherSynchronize satherStatement | |
78 HiLink satherRepeat satherStatement | |
79 HiLink satherExceptions satherStatement | |
80 HiLink satherStorageClass satherDeclarative | |
81 HiLink satherMethodDecl satherDeclarative | |
82 HiLink satherClassDecl satherDeclarative | |
83 HiLink satherScopeDecl satherDeclarative | |
84 HiLink satherBoolValue satherValue | |
85 HiLink satherSpecial satherValue | |
86 HiLink satherString satherValue | |
87 HiLink satherCharacter satherValue | |
88 HiLink satherSpecialCharacter satherValue | |
89 HiLink satherNumber satherValue | |
90 HiLink satherStatement Statement | |
91 HiLink satherOperator Statement | |
92 HiLink satherComment Comment | |
93 HiLink satherType Type | |
94 HiLink satherValue String | |
95 HiLink satherString String | |
96 HiLink satherSpecial String | |
97 HiLink satherCharacter String | |
98 HiLink satherDeclarative Type | |
99 HiLink satherExternal PreCondit | |
100 delcommand HiLink | |
101 endif | |
102 | |
103 let b:current_syntax = "sather" | |
104 | |
105 " vim: ts=8 |