ok
Direktori : /usr/share/vim/vim74/syntax/ |
Current File : //usr/share/vim/vim74/syntax/abap.vim |
" Vim ABAP syntax file " Language: SAP - ABAP/R4 " Revision: 2.1 " Maintainer: Marius Piedallu van Wyk <lailoken@gmail.com> " Last Change: 2013 Jun 13 " Comment: Thanks to EPI-USE Labs for all your assistance. :) " For version < 6.0: Clear all syntax items " For version >= 6.0: Quit when a syntax file was already loaded if version < 600 syntax clear elseif 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="'" if version >= 600 setlocal iskeyword=48-57,_,A-Z,a-z,/ else set iskeyword=48-57,_,A-Z,a-z,/ endif 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 "\<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 GET 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 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. " For version 5.7 and earlier: only when not done already " For version 5.8 and later: only when an item doesn't have highlighting yet if version >= 508 || !exists("did_abap_syntax_inits") if version < 508 let did_abap_syntax_inits = 1 command -nargs=+ HiLink hi link <args> else command -nargs=+ HiLink hi def link <args> endif HiLink abapError Error HiLink abapComment Comment HiLink abapInclude Include HiLink abapStatement Statement HiLink abapComplexStatement Statement HiLink abapSpecial Special HiLink abapNamespace Special HiLink abapSpecialTables Special HiLink abapSymbolOperator abapOperator HiLink abapOperator Operator HiLink abapCharString String HiLink abapString String HiLink abapFloat Float HiLink abapTypes Type HiLink abapSymbol Structure HiLink abapStructure Structure HiLink abapField Variable HiLink abapNumber Number HiLink abapHex Number delcommand HiLink endif let b:current_syntax = "abap" " vim: ts=8 sw=2