|
7
|
1 " Vim syntax file
|
|
|
2 " Language: ART-IM and ART*Enterprise
|
|
|
3 " Maintainer: Dorai Sitaram <ds26@gte.com>
|
|
|
4 " URL: http://www.ccs.neu.edu/~dorai/vimplugins/vimplugins.html
|
|
|
5 " Last Change: Nov 6, 2002
|
|
|
6
|
|
|
7 if exists("b:current_syntax")
|
|
|
8 finish
|
|
|
9 endif
|
|
|
10
|
|
|
11 syn case ignore
|
|
|
12
|
|
|
13 syn keyword artspform => and assert bind
|
|
|
14 syn keyword artspform declare def-art-fun deffacts defglobal defrule defschema do
|
|
|
15 syn keyword artspform else for if in$ not or
|
|
|
16 syn keyword artspform progn retract salience schema test then while
|
|
|
17
|
|
|
18 syn match artvariable "?[^ \t";()|&~]\+"
|
|
|
19
|
|
|
20 syn match artglobalvar "?\*[^ \t";()|&~]\+\*"
|
|
|
21
|
|
|
22 syn match artinstance "![^ \t";()|&~]\+"
|
|
|
23
|
|
|
24 syn match delimiter "[()|&~]"
|
|
|
25
|
|
|
26 syn region string start=/"/ skip=/\\[\\"]/ end=/"/
|
|
|
27
|
|
|
28 syn match number "\<[-+]\=\([0-9]\+\(\.[0-9]*\)\=\|\.[0-9]\+\)\>"
|
|
|
29
|
|
|
30 syn match comment ";.*$"
|
|
|
31
|
|
|
32 syn match comment "#+:\=ignore" nextgroup=artignore skipwhite skipnl
|
|
|
33
|
|
|
34 syn region artignore start="(" end=")" contained contains=artignore,comment
|
|
|
35
|
|
|
36 syn region artignore start=/"/ skip=/\\[\\"]/ end=/"/ contained
|
|
|
37
|
|
|
38 hi def link artinstance type
|
|
|
39 hi def link artglobalvar preproc
|
|
|
40 hi def link artignore comment
|
|
|
41 hi def link artspform statement
|
|
|
42 hi def link artvariable function
|
|
|
43
|
|
|
44 let b:current_syntax = "art"
|
