blob: 6eb8d66a9b4d5c5fff39a2356748c668d943cd36 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
" Vim syntax file
" Language: Mathematica
" Maintainer: Wolfgang Waltenberger <wwalten@ben.tuwien.ac.at>
" Last Change: Thu 26 Apr 2001 13:20:03 CEST
if version < 600
syntax clear
elseif exists("b:current_syntax")
finish
endif
syn match mmaError "\*)"
syn match mmaFixme "FIXME"
syn region mmaComment start=+(\*+ end=+\*)+ skipempty contains=mmaFixme
syn match mmaMessage "\a*::\a*"
syn region mmaString start=+'+ end=+'+
syn region mmaString start=+"+ end=+"+
syn region mmaString start=+\\\"+ end=+\"+
syn region mmaString start=+\"+ end=+\"+
syn match mmaVariable "$\a*"
syn match mmaPattern "[A-Za-z01-9`]*_\{1,3}"
syn match mmaPattern "[A-Za-z01-9`]*_\{1,3}\(Integer\|Real\|Pattern\|Symbol\)"
syn match mmaPattern "[A-Za-z01-9`]*_\{1,3}\(Rational\|Complex\|Head\)"
syn match mmaPattern "[A-Za-z01-9`]*_\{1,3}?[A-Za-z01-9`]*"
" prefix/infix/postfix notations
syn match mmaGenericFunction "[A-Za-z01-9`]*\s*\(\[\|@\)"he=e-1
syn match mmaGenericFunction "[A-Za-z01-9`]*\s*\(/@\|@@\)"he=e-2
syn match mmaGenericFunction "\~\s*[A-Za-z01-9`]*\s*\~"hs=s+1,he=e-1
syn match mmaGenericFunction "//\s*[A-Za-z01-9`]*"hs=s+2
syn match mmaOperator "/;"
syn match mmaPureFunction "#\d*"
syn match mmaPureFunction "&"
syn match mmaUnicode "\\\[[a-zA-Z01-9]*\]"
if version >= 508 || !exists("did_mma_syn_inits")
if version < 508
let did_mma_syn_inits = 1
command -nargs=+ HiLink hi link <args>
else
command -nargs=+ HiLink hi def link <args>
endif
HiLink mmaOperator Operator
HiLink mmaVariable Identifier
HiLink mmaString String
HiLink mmaUnicode String
HiLink mmaMessage Identifier
HiLink mmaPattern Identifier
HiLink mmaGenericFunction Function
HiLink mmaError Error
HiLink mmaFixme Error
HiLink mmaComment Comment
HiLink mmaPureFunction Operator
delcommand HiLink
endif
let b:current_syntax = "mma"
|