Mercurial > hg > RemoteEditor > vim7

comparison runtime/syntax/ptcap.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: printcap/termcap database
3 " Maintainer: Haakon Riiser <hakonrk@fys.uio.no>
4 " URL: http://folk.uio.no/hakonrk/vim/syntax/ptcap.vim
5 " Last Change: 2001 May 15
6
7 " For version 5.x: Clear all syntax items
8 " For version 6.x: Quit when a syntax file was already loaded
9 if version < 600
10 syn clear
11 elseif exists("b:current_syntax")
12 finish
13 endif
14
15 " Since I only highlight based on the structure of the databases, not
16 " specific keywords, case sensitivity isn't required
17 syn case ignore
18
19 " Since everything that is not caught by the syntax patterns is assumed
20 " to be an error, we start parsing 20 lines up, unless something else
21 " is specified
22 if exists("ptcap_minlines")
23 exe "syn sync lines=".ptcap_minlines
24 else
25 syn sync lines=20
26 endif
27
28 " Highlight everything that isn't caught by the rules as errors,
29 " except blank lines
30 syn match ptcapError "^.*\S.*$"
31
32 syn match ptcapLeadBlank "^\s\+" contained
33
34 " `:' and `|' are delimiters for fields and names, and should not be
35 " highlighted. Hence, they are linked to `NONE'
36 syn match ptcapDelimiter "[:|]" contained
37
38 " Escaped characters receive special highlighting
39 syn match ptcapEscapedChar "\\." contained
40 syn match ptcapEscapedChar "\^." contained
41 syn match ptcapEscapedChar "\\\o\{3}" contained
42
43 " A backslash at the end of a line will suppress the newline
44 syn match ptcapLineCont "\\$" contained
45
46 " A number follows the same rules as an integer in C
47 syn match ptcapNumber "#\(+\|-\)\=\d\+"lc=1 contained
48 syn match ptcapNumberError "#\d*[^[:digit:]:\\]"lc=1 contained
49 syn match ptcapNumber "#0x\x\{1,8}"lc=1 contained
50 syn match ptcapNumberError "#0x\X"me=e-1,lc=1 contained
51 syn match ptcapNumberError "#0x\x\{9}"lc=1 contained
52 syn match ptcapNumberError "#0x\x*[^[:xdigit:]:\\]"lc=1 contained
53
54 " The `@' operator clears a flag (i.e., sets it to zero)
55 " The `#' operator assigns a following number to the flag
56 " The `=' operator assigns a string to the preceding flag
57 syn match ptcapOperator "[@#=]" contained
58
59 " Some terminal capabilites have special names like `#5' and `@1', and we
60 " need special rules to match these properly
61 syn match ptcapSpecialCap "\W[#@]\d" contains=ptcapDelimiter contained
62
63 " If editing a termcap file, an entry in the database is terminated by
64 " a (non-escaped) newline. Otherwise, it is terminated by a line which
65 " does not start with a colon (:)
66 if exists("b:ptcap_type") && b:ptcap_type[0] == 't'
67 syn region ptcapEntry start="^\s*[^[:space:]:]" end="[^\\]\(\\\\\)*$" end="^$" contains=ptcapNames,ptcapField,ptcapLeadBlank keepend
68 else
69 syn region ptcapEntry start="^\s*[^[:space:]:]"me=e-1 end="^\s*[^[:space:]:#]"me=e-1 contains=ptcapNames,ptcapField,ptcapLeadBlank,ptcapComment
70 endif
71 syn region ptcapNames start="^\s*[^[:space:]:]" skip="[^\\]\(\\\\\)*\\:" end=":"me=e-1 contains=ptcapDelimiter,ptcapEscapedChar,ptcapLineCont,ptcapLeadBlank,ptcapComment keepend contained
72 syn region ptcapField start=":" skip="[^\\]\(\\\\\)*\\$" end="[^\\]\(\\\\\)*:"me=e-1 end="$" contains=ptcapDelimiter,ptcapString,ptcapNumber,ptcapNumberError,ptcapOperator,ptcapLineCont,ptcapSpecialCap,ptcapLeadBlank,ptcapComment keepend contained
73 syn region ptcapString matchgroup=ptcapOperator start="=" skip="[^\\]\(\\\\\)*\\:" matchgroup=ptcapDelimiter end=":"me=e-1 matchgroup=NONE end="[^\\]\(\\\\\)*[^\\]$" end="^$" contains=ptcapEscapedChar,ptcapLineCont keepend contained
74 syn region ptcapComment start="^\s*#" end="$" contains=ptcapLeadBlank
75
76 if version >= 508 || !exists("did_ptcap_syntax_inits")
77 if version < 508
78 let did_ptcap_syntax_inits = 1
79 command -nargs=+ HiLink hi link <args>
80 else
81 command -nargs=+ HiLink hi def link <args>
82 endif
83
84 HiLink ptcapComment Comment
85 HiLink ptcapDelimiter Delimiter
86 " The highlighting of "ptcapEntry" should always be overridden by
87 " its contents, so I use Todo highlighting to indicate that there
88 " is work to be done with the syntax file if you can see it :-)
89 HiLink ptcapEntry Todo
90 HiLink ptcapError Error
91 HiLink ptcapEscapedChar SpecialChar
92 HiLink ptcapField Type
93 HiLink ptcapLeadBlank NONE
94 HiLink ptcapLineCont Special
95 HiLink ptcapNames Label
96 HiLink ptcapNumber NONE
97 HiLink ptcapNumberError Error
98 HiLink ptcapOperator Operator
99 HiLink ptcapSpecialCap Type
100 HiLink ptcapString NONE
101
102 delcommand HiLink
103 endif
104
105 let b:current_syntax = "ptcap"
106
107 " vim: sts=4 sw=4 ts=8