blob: c202d90e7468aed7c1e3826025f67f96fd502a52 (
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
64
65
66
67
68
69
70
71
72
73
74
|
" Vim syntax file
" Language: Modula-3 Quake
" Maintainer: Doug Kearns <dougkearns@gmail.com>
" Last Change: 2021 April 15
if exists("b:current_syntax")
finish
endif
" Keywords
syn keyword m3quakeKeyword else end foreach if in is local or proc readonly
syn keyword m3quakeKeyword return
" Builtin procedures {{{
" Generated from m3-sys/m3quake/src/QMachine.m3
syn keyword m3quakeProcedure arglist cp_if defined empty equal error escape
syn keyword m3quakeProcedure exec cm3_exec file format include make_dir
syn keyword m3quakeProcedure normalize path stale try_exec try_cm3_exec
syn keyword m3quakeProcedure unlink_file write datetime date datestamp
syn keyword m3quakeProcedure TRACE_INSTR eval_func hostname
syn keyword m3quakeProcedure pushd popd cd getwd
syn keyword m3quakeProcedure quake
syn keyword m3quakeProcedure q_exec q_exec_put q_exec_get
syn keyword m3quakeProcedure fs_exists fs_readable fs_writable fs_executable
syn keyword m3quakeProcedure fs_isdir fs_isfile fs_contents fs_putfile
syn keyword m3quakeProcedure fs_mkdir fs_touch fs_lsdirs fs_lsfiles fs_rmdir
syn keyword m3quakeProcedure fs_rmfile fs_rmrec fs_cp
syn keyword m3quakeProcedure pn_valid pn_decompose pn_compose pn_absolute
syn keyword m3quakeProcedure pn_prefix pn_last pn_base pn_lastbase pn_lastext
syn keyword m3quakeProcedure pn_join pn_join2 pn_replace_ext pn_parent
syn keyword m3quakeProcedure pn_current
syn keyword m3quakeProcedure len
syn keyword m3quakeProcedure split sub skipl skipr squeeze compress pos
syn keyword m3quakeProcedure tcontains bool encode decode subst_chars
syn keyword m3quakeProcedure del_chars subst subst_env add_prefix add_suffix
" }}}
" Identifiers
syn match m3quakeEnvVariable "$\h\w\+"
" Operators
syn match m3quakeOperator "&"
syn match m3quakeOperator "\<\%(contains\|not\|and\|or\)\>"
" Strings
syn match m3quakeEscape "\\[\\nrtbf"]" contained display
syn region m3quakeString start=+"+ end=+"+ contains=m3quakeEscape
" Comments
syn keyword m3quakeTodo TODO FIXME XXX contained
syn region m3quakeComment start="%" end="$" contains=m3quakeTodo,@Spell
syn region m3quakeComment start="/\*" end="\*/" contains=m3quakeTodo,@Spell
" Default highlighting
hi def link m3quakeCommand Statement
hi def link m3quakeComment Comment
hi def link m3quakeEnvVariable Identifier
hi def link m3quakeEscape Special
hi def link m3quakeKeyword Keyword
hi def link m3quakeOperator Operator
hi def link m3quakeProcedure Function
hi def link m3quakeString String
hi def link m3quakeTodo Todo
let b:current_syntax = "m3quake"
" vim: nowrap sw=2 sts=2 ts=8 noet fdm=marker:
|