mirror of
				https://github.com/vim/vim.git
				synced 2025-10-30 09:47:20 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			153 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
			
		
		
	
	
			153 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
| " Vim ABAP syntax file
 | |
| "    Language:	SAP - ABAP/4
 | |
| "    Revision:	0.8
 | |
| "  Maintainer:	Marius van Wyk <marius@e.co.za>
 | |
| " Last Change:	2004 Aug 30
 | |
| 
 | |
| " For version 5.x: Clear all syntax items
 | |
| " For version 6.x: 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
 | |
| syn match   abapSymbolOperator      "[+\-/=<>$]"
 | |
| syn match   abapSymbolOperator      "\*"
 | |
| syn match   abapSymbolOperator      "[<>]="
 | |
| syn match   abapSymbolOperator      "<>"
 | |
| syn match   abapSymbolOperator      "\*\*"
 | |
| syn match   abapSymbolOperator      "[()]"
 | |
| syn match   abapSymbolOperator      "[:,\.]"
 | |
| 
 | |
| " Literals
 | |
| 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
 | |
| 
 | |
| " ABAP statements
 | |
| syn keyword abapStatement ADD ADD-CORRESPONDING ASSIGN AT AUTHORITY-CHECK
 | |
| syn keyword abapStatement BACK BREAK-POINT
 | |
| syn keyword abapStatement CALL CASE CHECK CLEAR CLOSE CNT COLLECT COMMIT COMMUNICATION COMPUTE CONCATENATE CONDENSE CONSTANTS CONTINUE CONTROLS CONVERT CREATE CURRENCY
 | |
| syn keyword abapStatement DATA DEFINE DELETE DESCRIBE DETAIL DIVIDE DIVIDE-CORRESPONDING DO
 | |
| 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
 | |
| syn keyword abapStatement FETCH FIELD-GROUPS FIELD-SYMBOLS FIELDS FORM FORMAT FREE FUNCTION FUNCTION-POOL
 | |
| syn keyword abapStatement GENERATE GET
 | |
| syn keyword abapStatement HIDE
 | |
| syn keyword abapStatement IF IMPORT IMPORTING INDEX INFOTYPES INITIALIZATION INPUT INSERT
 | |
| syn keyword abapStatement LEAVE LIKE LOAD LOCAL LOOP
 | |
| syn keyword abapStatement MESSAGE MODIFY MODULE MOVE MOVE-CORRESPONDING MULTIPLY MULTIPLY-CORRESPONDING
 | |
| syn keyword abapStatement NEW-LINE NEW-PAGE NEW-SECTION
 | |
| syn keyword abapStatement ON OVERLAY
 | |
| syn keyword abapStatement PACK PARAMETERS PERFORM POSITION PRINT-CONTROL PROGRAM PROVIDE PUT
 | |
| syn keyword abapStatement RAISE RANGES READ RECEIVE REFRESH REJECT REPLACE REPORT RESERVE RESTORE ROLLBACK
 | |
| 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
 | |
| syn keyword abapStatement TABLES TOP-OF-PAGE TRANSFER TRANSLATE TYPE TYPE-POOL TYPE-POOLS TYPES
 | |
| syn keyword abapStatement UNPACK UPDATE
 | |
| syn keyword abapStatement WHEN WHILE WINDOW WRITE
 | |
| 
 | |
| " More statemets
 | |
| syn keyword abapStatement OCCURS STRUCTURE OBJECT PROPERTY
 | |
| syn keyword abapStatement CASTING APPEND RAISING VALUE COLOR
 | |
| syn keyword abapStatement LINE-SIZE LINE-COUNT MESSAGE-ID
 | |
| syn keyword abapStatement CHANGING EXCEPTIONS DEFAULT CHECKBOX COMMENT
 | |
| syn keyword abapStatement ID NUMBER FOR DISPLAY-MODE TITLE OUTPUT
 | |
| 
 | |
| " More multi-word statements
 | |
| syn match   abapStatement "\(\W\|^\)\(WITH\W\+\(HEADER\W\+LINE\|FRAME\|KEY\)\|WITH\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)NO\W\+STANDARD\W\+PAGE\W\+HEADING\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)\(EXIT\W\+FROM\W\+STEP\W\+LOOP\|EXIT\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)\(BEGIN\W\+OF\W\+\(BLOCK\|LINE\)\|BEGIN\W\+OF\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)\(END\W\+OF\W\+\(BLOCK\|LINE\)\|END\W\+OF\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)IS\W\+INITIAL\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)NO\W\+INTERVALS\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)SEPARATED\W\+BY\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)\(USING\W\+\(EDIT\W\+MASK\)\|USING\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)\(WHERE\W\+\(LINE\)\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)RADIOBUTTON\W\+GROUP\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapStatement "\(\W\|^\)REF\W\+TO\(\W\|$\)"ms=s+1,me=e-1
 | |
| 
 | |
| " Special ABAP specific tables:
 | |
| syn match   abapSpecial       "\(\W\|^\)\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)\(\W\|$\)"ms=s+1,me=e-1
 | |
| syn match   abapSpecialTables "\(sy\|\(p\|pa\)\d\d\d\d\|t\d\d\d.\|innnn\)-"me=e-1 contained
 | |
| syn match   abapSpecial       "\(\W\|^\)\w\+-\w\+"ms=s+1 contains=abapSpecialTables
 | |
| 
 | |
| " Pointer
 | |
| syn match   abapSpecial  "<\w\+>"
 | |
| 
 | |
| " Abap 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
 | |
| 
 | |
| " 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 abapOperator strlen xstrlen charlen numofchar dbmaxlen
 | |
| 
 | |
| " Table operators
 | |
| syn keyword abapOperator lines
 | |
| 
 | |
| " Table operators (SELECT operators)
 | |
| syn keyword abapOperator INTO FROM WHERE GROUP BY HAVING ORDER BY SINGLE
 | |
| syn keyword abapOperator APPENDING CORRESPONDING FIELDS OF TABLE
 | |
| syn keyword abapOperator LEFT RIGHT OUTER INNER JOIN AS CLIENT SPECIFIED BYPASSING BUFFER UP TO ROWS CONNECTING
 | |
| 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
 | |
| 
 | |
| " 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 abapSpecial        Special
 | |
|   HiLink abapSpecialTables  PreProc
 | |
|   HiLink abapSymbolOperator	abapOperator
 | |
|   HiLink abapOperator	      Operator
 | |
|   HiLink abapStatement	    Statement
 | |
|   HiLink abapString	        String
 | |
|   HiLink abapFloat	        Float
 | |
|   HiLink abapNumber	        Number
 | |
|   HiLink abapHex	          Number
 | |
| 
 | |
|   delcommand HiLink
 | |
| endif
 | |
| 
 | |
| let b:current_syntax = "abap"
 | |
| 
 | |
| " vim: ts=8 sw=2
 |