diff options
Diffstat (limited to 'runtime/syntax/abap.vim')
| -rw-r--r-- | runtime/syntax/abap.vim | 196 |
1 files changed, 196 insertions, 0 deletions
diff --git a/runtime/syntax/abap.vim b/runtime/syntax/abap.vim new file mode 100644 index 0000000..e48dfc3 --- /dev/null +++ b/runtime/syntax/abap.vim @@ -0,0 +1,196 @@ +" Vim ABAP syntax file +" Language: SAP - ABAP/R4 +" Maintainer: Marius Piedallu van Wyk <lailoken@gmail.com> +" Last Change: 2021 Jan 02 +" Comment: Thanks to EPI-USE Labs for all your assistance. :) + +" Quit when a syntax file was already loaded +if exists("b:current_syntax") + finish +endif + +" Always ignore case +syn case ignore + +" Symbol Operators (space delimited) +syn match abapSymbolOperator "\W+\W" +syn match abapSymbolOperator "\W-\W" +syn match abapSymbolOperator "\W/\W" +syn match abapSymbolOperator "\W%\W" +syn match abapSymbolOperator "\W=\W" +syn match abapSymbolOperator "\W<\W" +syn match abapSymbolOperator "\W>\W" +syn match abapSymbolOperator "\W\*\W" +syn match abapSymbolOperator "\W[<>]=\W" +syn match abapSymbolOperator "\W<>\W" +syn match abapSymbolOperator "\W\*\*\W" +syn match abapSymbolOperator "\[\]" +syn match abapSymbolOperator "->\*\?" +syn match abapSymbolOperator "=>" +syn match abapSymbolOperator "[()~:,\.&$]" + +" Literals +syn region abapCharString matchgroup=abapCharString start="'" end="'" contains=abapCharStringEscape +syn match abapCharStringEscape contained "''" + +syn region abapString matchgroup=abapString start="`" end="`" contains=abapStringEscape +syn match abapStringEscape contained "``" + +syn match abapNumber "\-\=\<\d\+\>" +syn region abapHex matchgroup=abapHex start="X'" end="'" + +setlocal iskeyword=48-57,_,A-Z,a-z,/ + +syn match abapNamespace "\</\w\+/" + +" multi-word statements +syn match abapComplexStatement "\<\(WITH\W\+\(HEADER\W\+LINE\|FRAME\|KEY\)\|WITH\)\>" +syn match abapComplexStatement "\<NO\W\+STANDARD\W\+PAGE\W\+HEADING\>" +syn match abapComplexStatement "\<\(EXIT\W\+FROM\W\+STEP\W\+LOOP\|EXIT\)\>" +syn match abapComplexStatement "\<\(BEGIN\W\+OF\W\+\(BLOCK\|LINE\)\|BEGIN\W\+OF\)\>" +syn match abapComplexStatement "\<\(END\W\+OF\W\+\(BLOCK\|LINE\)\|END\W\+OF\)\>" +syn match abapComplexStatement "\<NO\W\+INTERVALS\>" +syn match abapComplexStatement "\<RESPECTING\W\+BLANKS\>" +syn match abapComplexStatement "\<SEPARATED\W\+BY\>" +syn match abapComplexStatement "\<USING\(\W\+EDIT\W\+MASK\)\?\>" +syn match abapComplexStatement "\<WHERE\(\W\+LINE\)\?\>" +syn match abapComplexStatement "\<GET\W\+\(TIME\(\W\+STAMP\)\?\(\W\+FIELD\)\?\|PF-STATUS\|BADI\|BIT\|CONNECTION\|CURSOR\|REFERENCE\W\+OF\)\>" +syn match abapComplexStatement "\<RADIOBUTTON\W\+GROUP\>" +syn match abapComplexStatement "\<REF\W\+TO\>" +syn match abapComplexStatement "\<\(PUBLIC\|PRIVATE\|PROTECTED\)\(\W\+SECTION\)\?\>" +syn match abapComplexStatement "\<DELETING\W\+\(TRAILING\|LEADING\)\>" +syn match abapComplexStatement "\<\(ALL\W\+OCCURRENCES\)\|\(\(FIRST\|LAST\)\W\+OCCURRENCE\)\>" +syn match abapComplexStatement "\<INHERITING\W\+FROM\>" +syn match abapComplexStatement "\<\(UP\W\+\)\?TO\>" + +" hyphenated-word statements +syn match abapComplexStatement "\<LINE-COUNT\>" +syn match abapComplexStatement "\<ADD-CORRESPONDING\>" +syn match abapComplexStatement "\<AUTHORITY-CHECK\>" +syn match abapComplexStatement "\<BREAK-POINT\>" +syn match abapComplexStatement "\<CLASS-DATA\>" +syn match abapComplexStatement "\<CLASS-METHODS\>" +syn match abapComplexStatement "\<CLASS-METHOD\>" +syn match abapComplexStatement "\<DIVIDE-CORRESPONDING\>" +syn match abapComplexStatement "\<EDITOR-CALL\>" +syn match abapComplexStatement "\<END-OF-DEFINITION\>" +syn match abapComplexStatement "\<END-OF-PAGE\>" +syn match abapComplexStatement "\<END-OF-SELECTION\>" +syn match abapComplexStatement "\<FIELD-GROUPS\>" +syn match abapComplexStatement "\<FIELD-SYMBOLS\>" +syn match abapComplexStatement "\<FUNCTION-POOL\>" +syn match abapComplexStatement "\<IS\W\+\(NOT\W\+\)\?\(ASSIGNED\|BOUND\|INITIAL\|SUPPLIED\)\>" +syn match abapComplexStatement "\<MOVE-CORRESPONDING\>" +syn match abapComplexStatement "\<MULTIPLY-CORRESPONDING\>" +syn match abapComplexStatement "\<NEW-LINE\>" +syn match abapComplexStatement "\<NEW-PAGE\>" +syn match abapComplexStatement "\<NEW-SECTION\>" +syn match abapComplexStatement "\<PRINT-CONTROL\>" +syn match abapComplexStatement "\<RP-PROVIDE-FROM-LAST\>" +syn match abapComplexStatement "\<SELECT-OPTIONS\>" +syn match abapComplexStatement "\<SELECTION-SCREEN\>" +syn match abapComplexStatement "\<START-OF-SELECTION\>" +syn match abapComplexStatement "\<SUBTRACT-CORRESPONDING\>" +syn match abapComplexStatement "\<SYNTAX-CHECK\>" +syn match abapComplexStatement "\<SYNTAX-TRACE\>" +syn match abapComplexStatement "\<TOP-OF-PAGE\>" +syn match abapComplexStatement "\<TYPE-POOL\>" +syn match abapComplexStatement "\<TYPE-POOLS\>" +syn match abapComplexStatement "\<LINE-SIZE\>" +syn match abapComplexStatement "\<LINE-COUNT\>" +syn match abapComplexStatement "\<MESSAGE-ID\>" +syn match abapComplexStatement "\<DISPLAY-MODE\>" +syn match abapComplexStatement "\<READ\(-ONLY\)\?\>" + +" ABAP statements +syn keyword abapStatement ADD ALIAS ALIASES ASSERT ASSIGN ASSIGNING AT +syn keyword abapStatement BACK +syn keyword abapStatement CALL CASE CATCH CHECK CLASS CLEAR CLOSE CNT COLLECT COMMIT COMMUNICATION COMPUTE CONCATENATE CONDENSE CONSTANTS CONTINUE CONTROLS CONVERT CREATE CURRENCY +syn keyword abapStatement DATA DEFINE DEFINITION DEFERRED DELETE DESCRIBE DETAIL DIVIDE DO +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 +syn keyword abapStatement FETCH FIELDS FORM FORMAT FREE FROM FUNCTION +syn keyword abapStatement GENERATE +syn keyword abapStatement HIDE +syn keyword abapStatement IF IMPORT IMPORTING INDEX INFOTYPES INITIALIZATION INTERFACE INTERFACES INPUT INSERT IMPLEMENTATION +syn keyword abapStatement LEAVE LIKE LINE LOAD LOCAL LOOP +syn keyword abapStatement MESSAGE METHOD METHODS MODIFY MODULE MOVE MULTIPLY +syn keyword abapStatement ON OVERLAY OPTIONAL OTHERS +syn keyword abapStatement PACK PARAMETERS PERFORM POSITION PROGRAM PROVIDE PUT +syn keyword abapStatement RAISE RANGES RECEIVE RECEIVING REDEFINITION REFERENCE REFRESH REJECT REPLACE REPORT RESERVE RESTORE RETURNING ROLLBACK +syn keyword abapStatement SCAN SCROLL SEARCH SELECT SET SHIFT SKIP SORT SORTED SPLIT STANDARD STATICS STEP STOP SUBMIT SUBTRACT SUM SUMMARY SUPPRESS +syn keyword abapStatement TABLES TIMES TRANSFER TRANSLATE TRY TYPE TYPES +syn keyword abapStatement UNASSIGN ULINE UNPACK UPDATE +syn keyword abapStatement WHEN WHILE WINDOW WRITE + +" More statemets +syn keyword abapStatement LINES +syn keyword abapStatement INTO GROUP BY HAVING ORDER BY SINGLE +syn keyword abapStatement APPENDING CORRESPONDING FIELDS OF TABLE +syn keyword abapStatement LEFT RIGHT OUTER INNER JOIN AS CLIENT SPECIFIED BYPASSING BUFFER ROWS CONNECTING +syn keyword abapStatement OCCURS STRUCTURE OBJECT PROPERTY +syn keyword abapStatement CASTING APPEND RAISING VALUE COLOR +syn keyword abapStatement CHANGING EXCEPTION EXCEPTIONS DEFAULT CHECKBOX COMMENT +syn keyword abapStatement ID NUMBER FOR TITLE OUTPUT + +" Special ABAP specific tables: +syn match abapSpecialTables "\<\(sy\|\(hrp\|p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)-"me=e-1 contained +syn match abapStructure "\<\w\+-[^\>]"me=e-2 contains=abapSpecialTables,abapStatement,abapComplexStatement +syn match abapField "-\w\+"ms=s+1 + +" Pointer +syn match abapSpecial "<\w\+>" + +" Abap common constants: +syn keyword abapSpecial TRUE FALSE NULL SPACE + +" Includes +syn region abapInclude start="include" end="." contains=abapComment + +" Types +syn keyword abapTypes c n i int8 p f d t x string xstring decfloat16 decfloat34 + +" Atritmitic operators +syn keyword abapOperator abs sign ceil floor trunc frac acos asin atan cos sin tan +syn keyword abapOperator cosh sinh tanh exp log log10 sqrt + +" String operators +syn keyword abapStatement strlen xstrlen charlen numofchar dbmaxlen + +syn keyword abapOperator EQ NE LT LE GT GE NOT AND OR XOR IN LIKE BETWEEN + +" An error? Not strictly... but cannot think of reason this is intended. +syn match abapError "\.\." + +" Comments +syn region abapComment start="^\*" end="$" contains=abapTodo +syn match abapComment "\".*" contains=abapTodo +syn keyword abapTodo contained TODO NOTE +syn match abapTodo "\#EC\W\+\w\+" + +" Define the default highlighting. +" Only when an item doesn't have highlighting yet + +hi def link abapError Error +hi def link abapComment Comment +hi def link abapInclude Include +hi def link abapStatement Statement +hi def link abapComplexStatement Statement +hi def link abapSpecial Special +hi def link abapNamespace Special +hi def link abapSpecialTables Special +hi def link abapSymbolOperator abapOperator +hi def link abapOperator Operator +hi def link abapCharString String +hi def link abapString String +hi def link abapFloat Float +hi def link abapTypes Type +hi def link abapSymbol Structure +hi def link abapStructure Structure +hi def link abapField Variable +hi def link abapNumber Number +hi def link abapHex Number + + +let b:current_syntax = "abap" + +" vim: ts=8 sw=2 |