home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / runtime / syntax / abap.vim < prev    next >
Encoding:
Text File  |  2010-08-15  |  6.5 KB  |  154 lines
  1. " Vim ABAP syntax file
  2. "    Language: SAP - ABAP/R4
  3. "    Revision: 1.0
  4. "  Maintainer: Marius Piedallu van Wyk <marius@e.co.za>
  5. " Last Change: 2006 Apr 13
  6.  
  7. " For version  < 6.0: Clear all syntax items
  8. " For version >= 6.0: Quit when a syntax file was already loaded
  9. if version < 600
  10.   syntax clear
  11. elseif exists("b:current_syntax")
  12.   finish
  13. endif
  14.  
  15. " Always ignore case
  16. syn case ignore
  17.  
  18. " Symbol Operators
  19. syn match   abapSymbolOperator  "[+\-/=<>$]"
  20. syn match   abapSymbolOperator  "\*"
  21. syn match   abapSymbolOperator  "[<>]="
  22. syn match   abapSymbolOperator  "<>"
  23. syn match   abapSymbolOperator  "\*\*"
  24. syn match   abapSymbolOperator  "[()]"
  25. syn match   abapSymbolOperator  "[:,\.]"
  26.  
  27. " Literals
  28. syn region  abapString matchgroup=abapString start="'" end="'" contains=abapStringEscape
  29. syn match   abapStringEscape contained "''"
  30.  
  31. syn match   abapNumber  "-\=\<\d\+\>"
  32. syn region  abapHex     matchgroup=abapHex start="X'" end="'"
  33.  
  34. if version >= 600
  35.   setlocal iskeyword=-,48-57,_,A-Z,a-z
  36. else
  37.   set iskeyword=-,48-57,_,A-Z,a-z
  38. endif
  39.  
  40. " ABAP statements
  41. syn keyword abapStatement ADD ADD-CORRESPONDING ASSIGN AT AUTHORITY-CHECK
  42. syn keyword abapStatement BACK BREAK-POINT
  43. syn keyword abapStatement CALL CASE CHECK CLEAR CLOSE CNT COLLECT COMMIT COMMUNICATION COMPUTE CONCATENATE CONDENSE CONSTANTS CONTINUE CONTROLS CONVERT CREATE CURRENCY
  44. syn keyword abapStatement DATA DEFINE DELETE DESCRIBE DETAIL DIVIDE DIVIDE-CORRESPONDING DO
  45. syn keyword abapStatement EDITOR-CALL ELSE ELSEIF END-OF-DEFINITION END-OF-PAGE END-OF-SELECTION ENDAT ENDCASE ENDDO ENDEXEC ENDFORM ENDFUNCTION ENDIF ENDIFEND ENDLOOP ENDMODULE ENDON ENDPROVIDE ENDSELECT ENDWHILE EXEC EXPORT EXPORTING EXTRACT
  46. syn keyword abapStatement FETCH FIELD-GROUPS FIELD-SYMBOLS FIELDS FORM FORMAT FREE FUNCTION FUNCTION-POOL
  47. syn keyword abapStatement GENERATE GET
  48. syn keyword abapStatement HIDE
  49. syn keyword abapStatement IF IMPORT IMPORTING INDEX INFOTYPES INITIALIZATION INPUT INSERT
  50. syn keyword abapStatement LEAVE LIKE LOAD LOCAL LOOP
  51. syn keyword abapStatement MESSAGE MODIFY MODULE MOVE MOVE-CORRESPONDING MULTIPLY MULTIPLY-CORRESPONDING
  52. syn keyword abapStatement NEW-LINE NEW-PAGE NEW-SECTION
  53. syn keyword abapStatement ON OVERLAY
  54. syn keyword abapStatement PACK PARAMETERS PERFORM POSITION PRINT-CONTROL PROGRAM PROVIDE PUT
  55. syn keyword abapStatement RAISE RANGES READ RECEIVE REFRESH REJECT REPLACE REPORT RESERVE RESTORE ROLLBACK RP-PROVIDE-FROM-LAST
  56. syn keyword abapStatement SCAN SCROLL SEARCH SELECT SELECT-OPTIONS SELECTION-SCREEN SET SHIFT SKIP SORT SPLIT START-OF-SELECTION STATICS STOP SUBMIT SUBTRACT SUBTRACT-CORRESPONDING SUM SUMMARY SUPPRESS SYNTAX-CHECK SYNTAX-TRACE
  57. syn keyword abapStatement TABLES TOP-OF-PAGE TRANSFER TRANSLATE TYPE TYPE-POOL TYPE-POOLS TYPES
  58. syn keyword abapStatement UNPACK UPDATE
  59. syn keyword abapStatement WHEN WHILE WINDOW WRITE
  60.  
  61. " More statemets
  62. syn keyword abapStatement OCCURS STRUCTURE OBJECT PROPERTY
  63. syn keyword abapStatement CASTING APPEND RAISING VALUE COLOR
  64. syn keyword abapStatement LINE-SIZE LINE-COUNT MESSAGE-ID
  65. syn keyword abapStatement CHANGING EXCEPTIONS DEFAULT CHECKBOX COMMENT
  66. syn keyword abapStatement ID NUMBER FOR DISPLAY-MODE TITLE OUTPUT
  67.  
  68. " More multi-word statements
  69. syn match   abapStatement "\(\W\|^\)\(WITH\W\+\(HEADER\W\+LINE\|FRAME\|KEY\)\|WITH\)\(\W\|$\)"ms=s+1,me=e-1
  70. syn match   abapStatement "\(\W\|^\)NO\W\+STANDARD\W\+PAGE\W\+HEADING\(\W\|$\)"ms=s+1,me=e-1
  71. syn match   abapStatement "\(\W\|^\)\(EXIT\W\+FROM\W\+STEP\W\+LOOP\|EXIT\)\(\W\|$\)"ms=s+1,me=e-1
  72. syn match   abapStatement "\(\W\|^\)\(BEGIN\W\+OF\W\+\(BLOCK\|LINE\)\|BEGIN\W\+OF\)\(\W\|$\)"ms=s+1,me=e-1
  73. syn match   abapStatement "\(\W\|^\)\(END\W\+OF\W\+\(BLOCK\|LINE\)\|END\W\+OF\)\(\W\|$\)"ms=s+1,me=e-1
  74. syn match   abapStatement "\(\W\|^\)IS\W\+INITIAL\(\W\|$\)"ms=s+1,me=e-1
  75. syn match   abapStatement "\(\W\|^\)NO\W\+INTERVALS\(\W\|$\)"ms=s+1,me=e-1
  76. syn match   abapStatement "\(\W\|^\)SEPARATED\W\+BY\(\W\|$\)"ms=s+1,me=e-1
  77. syn match   abapStatement "\(\W\|^\)\(USING\W\+\(EDIT\W\+MASK\)\|USING\)\(\W\|$\)"ms=s+1,me=e-1
  78. syn match   abapStatement "\(\W\|^\)\(WHERE\W\+\(LINE\)\)\(\W\|$\)"ms=s+1,me=e-1
  79. syn match   abapStatement "\(\W\|^\)RADIOBUTTON\W\+GROUP\(\W\|$\)"ms=s+1,me=e-1
  80. syn match   abapStatement "\(\W\|^\)REF\W\+TO\(\W\|$\)"ms=s+1,me=e-1
  81.  
  82. " Special ABAP specific tables:
  83. syn match   abapSpecial       "\(\W\|^\)\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)\(\W\|$\)"ms=s+1,me=e-1
  84. syn match   abapSpecialTables "\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)-"me=e-1 contained
  85. syn match   abapSpecial       "\(\W\|^\)\w\+-\(\w\+-\w\+\|\w\+\)"ms=s+1 contains=abapSpecialTables
  86.  
  87. " Pointer
  88. syn match   abapSpecial  "<\w\+>"
  89.  
  90. " Abap constants:
  91. syn keyword abapSpecial  TRUE FALSE NULL SPACE
  92.  
  93. " Includes
  94. syn region abapInclude   start="include" end="." contains=abapComment
  95.  
  96. " Types
  97. syn keyword abapTypes    c n i p f d t x
  98.  
  99. " Atritmitic operators
  100. syn keyword abapOperator abs sign ceil floor trunc frac acos asin atan cos sin tan
  101. syn keyword abapOperator cosh sinh tanh exp log log10 sqrt
  102.  
  103. " String operators
  104. syn keyword abapOperator strlen xstrlen charlen numofchar dbmaxlen
  105.  
  106. " Table operators
  107. syn keyword abapOperator lines
  108.  
  109. " Table operators (SELECT operators)
  110. syn keyword abapOperator INTO FROM WHERE GROUP BY HAVING ORDER BY SINGLE
  111. syn keyword abapOperator APPENDING CORRESPONDING FIELDS OF TABLE
  112. syn keyword abapOperator LEFT RIGHT OUTER INNER JOIN AS CLIENT SPECIFIED BYPASSING BUFFER UP TO ROWS CONNECTING
  113. syn keyword abapOperator EQ NE LT LE GT GE NOT AND OR XOR IN LIKE BETWEEN
  114.  
  115. " An error? Not strictly... but cannot think of reason this is intended.
  116. syn match   abapError    "\.\."
  117.  
  118. " Comments
  119. syn region  abapComment  start="^\*" end="$" contains=abapTodo
  120. syn match   abapComment  "\".*" contains=abapTodo
  121. syn keyword abapTodo     contained TODO NOTE
  122.  
  123. " Define the default highlighting.
  124. " For version 5.7 and earlier: only when not done already
  125. " For version 5.8 and later: only when an item doesn't have highlighting yet
  126. if version >= 508 || !exists("did_abap_syntax_inits")
  127.   if version < 508
  128.     let did_abap_syntax_inits = 1
  129.     command -nargs=+ HiLink hi link <args>
  130.   else
  131.     command -nargs=+ HiLink hi def link <args>
  132.   endif
  133.  
  134.   HiLink abapError          Error
  135.   HiLink abapComment        Comment
  136.   HiLink abapInclude        Include
  137.   HiLink abapSpecial        Special
  138.   HiLink abapSpecialTables  PreProc
  139.   HiLink abapSymbolOperator abapOperator
  140.   HiLink abapOperator       Operator
  141.   HiLink abapStatement      Statement
  142.   HiLink abapString         String
  143.   HiLink abapFloat          Float
  144.   HiLink abapNumber         Number
  145.   HiLink abapHex            Number
  146.  
  147.   delcommand HiLink
  148. endif
  149.  
  150. let b:current_syntax = "abap"
  151.  
  152. " vim: ts=8 sw=2
  153.  
  154.