22
|
1 " Vim ABAP syntax file
|
828
|
2 " Language: SAP - ABAP/R4
|
3893
|
3 " Revision: 2.0
|
|
4 " Maintainer: Marius Piedallu van Wyk <lailoken@gmail.com>
|
|
5 " Last Change: 2012 Oct 12
|
|
6 " Comment: Thanks to EPI-USE Labs for all your assistance. :)
|
22
|
7
|
828
|
8 " For version < 6.0: Clear all syntax items
|
|
9 " For version >= 6.0: Quit when a syntax file was already loaded
|
22
|
10 if version < 600
|
|
11 syntax clear
|
|
12 elseif exists("b:current_syntax")
|
|
13 finish
|
|
14 endif
|
|
15
|
|
16 " Always ignore case
|
|
17 syn case ignore
|
|
18
|
|
19 " Symbol Operators
|
3893
|
20 syn match abapSymbolOperator "\W+\W"
|
|
21 syn match abapSymbolOperator "\W-\W"
|
|
22 syn match abapSymbolOperator "\W/\W"
|
|
23 syn match abapSymbolOperator "\W%\W"
|
|
24 syn match abapSymbolOperator "\W=\W"
|
|
25 syn match abapSymbolOperator "\W<\W"
|
|
26 syn match abapSymbolOperator "\W>\W"
|
|
27 syn match abapSymbolOperator "\W\*\W"
|
|
28 syn match abapSymbolOperator "\W[<>]=\W"
|
|
29 syn match abapSymbolOperator "\W<>\W"
|
|
30 syn match abapSymbolOperator "\W\*\*\W"
|
|
31 syn match abapSymbolOperator "\[\]"
|
|
32 syn match abapSymbolOperator "->\*\?"
|
|
33 syn match abapSymbolOperator "=>"
|
|
34 syn match abapSymbolOperator "[()~:,\.&$]"
|
22
|
35
|
|
36 " Literals
|
3893
|
37 syn region abapCharString matchgroup=abapCharString start="'" end="'" contains=abapCharStringEscape
|
|
38 syn match abapCharStringEscape contained "''"
|
22
|
39
|
3893
|
40 syn region abapString matchgroup=abapString start="`" end="`" contains=abapStringEscape
|
|
41 syn match abapStringEscape contained "``"
|
|
42
|
|
43 syn match abapNumber "\-\=\<\d\+\>"
|
22
|
44 syn region abapHex matchgroup=abapHex start="X'" end="'"
|
|
45
|
|
46 if version >= 600
|
3893
|
47 setlocal iskeyword=48-57,_,A-Z,a-z,/
|
22
|
48 else
|
3893
|
49 set iskeyword=48-57,_,A-Z,a-z,/
|
22
|
50 endif
|
|
51
|
3893
|
52 syn match abapNamespace "/\w\+/"
|
|
53
|
|
54 " multi-word statements
|
|
55 syn match abapComplexStatement "\(WITH\W\+\(HEADER\W\+LINE\|FRAME\|KEY\)\|WITH\)"
|
|
56 syn match abapComplexStatement "NO\W\+STANDARD\W\+PAGE\W\+HEADING"
|
|
57 syn match abapComplexStatement "\(EXIT\W\+FROM\W\+STEP\W\+LOOP\|EXIT\)"
|
|
58 syn match abapComplexStatement "\(BEGIN\W\+OF\W\+\(BLOCK\|LINE\)\|BEGIN\W\+OF\)"
|
|
59 syn match abapComplexStatement "\(END\W\+OF\W\+\(BLOCK\|LINE\)\|END\W\+OF\)"
|
|
60 syn match abapComplexStatement "NO\W\+INTERVALS"
|
|
61 syn match abapComplexStatement "RESPECTING\W\+BLANKS"
|
|
62 syn match abapComplexStatement "SEPARATED\W\+BY"
|
|
63 syn match abapComplexStatement "\(USING\W\+\(EDIT\W\+MASK\)\|USING\)"
|
|
64 syn match abapComplexStatement "\(WHERE\W\+\(LINE\)\)"
|
|
65 syn match abapComplexStatement "RADIOBUTTON\W\+GROUP"
|
|
66 syn match abapComplexStatement "REF\W\+TO"
|
|
67 syn match abapComplexStatement "\(PUBLIC\|PRIVATE\|PROTECTED\)\(\W\+SECTION\)\?"
|
|
68 syn match abapComplexStatement "DELETING\W\+\(TRAILING\|LEADING\)"
|
|
69 syn match abapComplexStatement "\(ALL\W\+OCCURRENCES\)\|\(\(FIRST\|LAST\)\W\+OCCURRENCE\)"
|
|
70 syn match abapComplexStatement "INHERITING\W\+FROM"
|
|
71
|
|
72 " hyphenated-word statements
|
|
73 syn match abapComplexStatement "LINE-COUNT"
|
|
74 syn match abapComplexStatement "ADD-CORRESPONDING"
|
|
75 syn match abapComplexStatement "AUTHORITY-CHECK"
|
|
76 syn match abapComplexStatement "BREAK-POINT"
|
|
77 syn match abapComplexStatement "CLASS-DATA"
|
|
78 syn match abapComplexStatement "CLASS-METHODS"
|
|
79 syn match abapComplexStatement "CLASS-METHOD"
|
|
80 syn match abapComplexStatement "DIVIDE-CORRESPONDING"
|
|
81 syn match abapComplexStatement "EDITOR-CALL"
|
|
82 syn match abapComplexStatement "END-OF-DEFINITION"
|
|
83 syn match abapComplexStatement "END-OF-PAGE"
|
|
84 syn match abapComplexStatement "END-OF-SELECTION"
|
|
85 syn match abapComplexStatement "FIELD-GROUPS"
|
|
86 syn match abapComplexStatement "FIELD-SYMBOLS"
|
|
87 syn match abapComplexStatement "FUNCTION-POOL"
|
|
88 syn match abapComplexStatement "MOVE-CORRESPONDING"
|
|
89 syn match abapComplexStatement "MULTIPLY-CORRESPONDING"
|
|
90 syn match abapComplexStatement "NEW-LINE"
|
|
91 syn match abapComplexStatement "NEW-PAGE"
|
|
92 syn match abapComplexStatement "NEW-SECTION"
|
|
93 syn match abapComplexStatement "PRINT-CONTROL"
|
|
94 syn match abapComplexStatement "RP-PROVIDE-FROM-LAST"
|
|
95 syn match abapComplexStatement "SELECT-OPTIONS"
|
|
96 syn match abapComplexStatement "SELECTION-SCREEN"
|
|
97 syn match abapComplexStatement "START-OF-SELECTION"
|
|
98 syn match abapComplexStatement "SUBTRACT-CORRESPONDING"
|
|
99 syn match abapComplexStatement "SYNTAX-CHECK"
|
|
100 syn match abapComplexStatement "SYNTAX-TRACE"
|
|
101 syn match abapComplexStatement "TOP-OF-PAGE"
|
|
102 syn match abapComplexStatement "TYPE-POOL"
|
|
103 syn match abapComplexStatement "TYPE-POOLS"
|
|
104 syn match abapComplexStatement "LINE-SIZE"
|
|
105 syn match abapComplexStatement "LINE-COUNT"
|
|
106 syn match abapComplexStatement "MESSAGE-ID"
|
|
107 syn match abapComplexStatement "DISPLAY-MODE"
|
|
108 syn match abapComplexStatement "READ\(-ONLY\)\?"
|
|
109
|
22
|
110 " ABAP statements
|
3893
|
111 syn keyword abapStatement ADD ALIAS ALIASES ASSERT ASSIGN ASSIGNING AT
|
|
112 syn keyword abapStatement BACK BOUND
|
|
113 syn keyword abapStatement CALL CASE CATCH CHECK CLASS CLEAR CLOSE CNT COLLECT COMMIT COMMUNICATION COMPUTE CONCATENATE CONDENSE CONSTANTS CONTINUE CONTROLS CONVERT CREATE CURRENCY
|
|
114 syn keyword abapStatement DATA DEFINE DEFINITION DEFERRED DELETE DESCRIBE DETAIL DIVIDE DO
|
|
115 syn keyword abapStatement ELSE ELSEIF ENDAT ENDCASE ENDCLASS ENDDO ENDEXEC ENDFORM ENDFUNCTION ENDIF ENDIFEND ENDINTERFACE ENDLOOP ENDMETHOD ENDMODULE ENDON ENDPROVIDE ENDSELECT ENDTRY ENDWHILE EVENT EVENTS EXEC EXIT EXPORT EXPORTING EXTRACT
|
|
116 syn keyword abapStatement FETCH FIELDS FORM FORMAT FREE FROM FUNCTION
|
22
|
117 syn keyword abapStatement GENERATE GET
|
|
118 syn keyword abapStatement HIDE
|
3893
|
119 syn keyword abapStatement IF IMPORT IMPORTING INDEX INFOTYPES INITIAL INITIALIZATION INTERFACE INTERFACES INPUT INSERT IMPLEMENTATION IS
|
|
120 syn keyword abapStatement LEAVE LIKE LINE LOAD LOCAL LOOP
|
|
121 syn keyword abapStatement MESSAGE METHOD METHODS MODIFY MODULE MOVE MULTIPLY
|
|
122 syn keyword abapStatement ON OVERLAY OPTIONAL OTHERS
|
|
123 syn keyword abapStatement PACK PARAMETERS PERFORM POSITION PROGRAM PROVIDE PUT
|
|
124 syn keyword abapStatement RAISE RANGES RECEIVE REDEFINITION REFERENCE REFRESH REJECT REPLACE REPORT RESERVE RESTORE RETURNING ROLLBACK
|
|
125 syn keyword abapStatement SCAN SCROLL SEARCH SELECT SET SHIFT SKIP SORT SORTED SPLIT STANDARD STATICS STEP STOP SUBMIT SUBTRACT SUM SUMMARY SUPPRESS
|
|
126 syn keyword abapStatement TABLES TIMES TRANSFER TRANSLATE TRY TYPE TYPES
|
|
127 syn keyword abapStatement UNASSIGN ULINE UNPACK UPDATE
|
22
|
128 syn keyword abapStatement WHEN WHILE WINDOW WRITE
|
|
129
|
|
130 " More statemets
|
|
131 syn keyword abapStatement OCCURS STRUCTURE OBJECT PROPERTY
|
|
132 syn keyword abapStatement CASTING APPEND RAISING VALUE COLOR
|
3893
|
133 syn keyword abapStatement CHANGING EXCEPTION EXCEPTIONS DEFAULT CHECKBOX COMMENT
|
|
134 syn keyword abapStatement ID NUMBER FOR TITLE OUTPUT
|
22
|
135
|
|
136 " Special ABAP specific tables:
|
|
137 syn match abapSpecial "\(\W\|^\)\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)\(\W\|$\)"ms=s+1,me=e-1
|
|
138 syn match abapSpecialTables "\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)-"me=e-1 contained
|
3893
|
139 syn match abapSpecial "\(\W\|^\)\w\+-\(\w\+-\w\+\|\w\+\)"ms=s+1 contains=abapSpecialTables,abapStatement,abapComplexStatement
|
22
|
140
|
|
141 " Pointer
|
|
142 syn match abapSpecial "<\w\+>"
|
|
143
|
|
144 " Abap constants:
|
|
145 syn keyword abapSpecial TRUE FALSE NULL SPACE
|
|
146
|
|
147 " Includes
|
|
148 syn region abapInclude start="include" end="." contains=abapComment
|
|
149
|
|
150 " Types
|
3893
|
151 syn keyword abapTypes c n i p f d t x string xstring decfloat16 decfloat34
|
22
|
152
|
|
153 " Atritmitic operators
|
|
154 syn keyword abapOperator abs sign ceil floor trunc frac acos asin atan cos sin tan
|
|
155 syn keyword abapOperator cosh sinh tanh exp log log10 sqrt
|
|
156
|
|
157 " String operators
|
|
158 syn keyword abapOperator strlen xstrlen charlen numofchar dbmaxlen
|
|
159
|
|
160 " Table operators
|
|
161 syn keyword abapOperator lines
|
|
162
|
|
163 " Table operators (SELECT operators)
|
3893
|
164 syn keyword abapOperator INTO WHERE GROUP BY HAVING ORDER BY SINGLE
|
22
|
165 syn keyword abapOperator APPENDING CORRESPONDING FIELDS OF TABLE
|
|
166 syn keyword abapOperator LEFT RIGHT OUTER INNER JOIN AS CLIENT SPECIFIED BYPASSING BUFFER UP TO ROWS CONNECTING
|
|
167 syn keyword abapOperator EQ NE LT LE GT GE NOT AND OR XOR IN LIKE BETWEEN
|
|
168
|
|
169 " An error? Not strictly... but cannot think of reason this is intended.
|
|
170 syn match abapError "\.\."
|
|
171
|
|
172 " Comments
|
|
173 syn region abapComment start="^\*" end="$" contains=abapTodo
|
|
174 syn match abapComment "\".*" contains=abapTodo
|
828
|
175 syn keyword abapTodo contained TODO NOTE
|
3893
|
176 syn match abapTodo "\#EC\W\+\w\+"
|
22
|
177
|
|
178 " Define the default highlighting.
|
|
179 " For version 5.7 and earlier: only when not done already
|
|
180 " For version 5.8 and later: only when an item doesn't have highlighting yet
|
|
181 if version >= 508 || !exists("did_abap_syntax_inits")
|
|
182 if version < 508
|
|
183 let did_abap_syntax_inits = 1
|
|
184 command -nargs=+ HiLink hi link <args>
|
|
185 else
|
|
186 command -nargs=+ HiLink hi def link <args>
|
|
187 endif
|
|
188
|
|
189 HiLink abapError Error
|
828
|
190 HiLink abapComment Comment
|
|
191 HiLink abapInclude Include
|
3893
|
192 HiLink abapStatement Statement
|
|
193 HiLink abapComplexStatement Statement
|
22
|
194 HiLink abapSpecial Special
|
3893
|
195 HiLink abapNamespace Special
|
22
|
196 HiLink abapSpecialTables PreProc
|
828
|
197 HiLink abapSymbolOperator abapOperator
|
|
198 HiLink abapOperator Operator
|
3893
|
199 HiLink abapCharString String
|
828
|
200 HiLink abapString String
|
|
201 HiLink abapFloat Float
|
3893
|
202 HiLink abapTypes Type
|
|
203 HiLink abapSymbol Structure
|
828
|
204 HiLink abapNumber Number
|
|
205 HiLink abapHex Number
|
22
|
206
|
|
207 delcommand HiLink
|
|
208 endif
|
|
209
|
|
210 let b:current_syntax = "abap"
|
|
211
|
|
212 " vim: ts=8 sw=2
|
828
|
213
|