mirror of
				https://github.com/vim/vim.git
				synced 2025-10-26 09:14:23 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			253 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
			
		
		
	
	
			253 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			VimL
		
	
	
	
	
	
| " Vim syntax file
 | |
| " Language:		CA-OpenROAD
 | |
| " Maintainer:	Luis Moreno <lmoreno@eresmas.net>
 | |
| " Last change:	2001 Jun 12
 | |
| 
 | |
| " quit when a syntax file was already loaded
 | |
| if exists("b:current_syntax")
 | |
| 	finish
 | |
| endif
 | |
| 
 | |
| syntax case ignore
 | |
| 
 | |
| " Keywords
 | |
| "
 | |
| syntax keyword openroadKeyword	ABORT ALL ALTER AND ANY AS ASC AT AVG BEGIN
 | |
| syntax keyword openroadKeyword	BETWEEN BY BYREF CALL CALLFRAME CALLPROC CASE
 | |
| syntax keyword openroadKeyword	CLEAR CLOSE COMMIT CONNECT CONTINUE COPY COUNT
 | |
| syntax keyword openroadKeyword	CREATE CURRENT DBEVENT DECLARE DEFAULT DELETE
 | |
| syntax keyword openroadKeyword	DELETEROW DESC DIRECT DISCONNECT DISTINCT DO
 | |
| syntax keyword openroadKeyword	DROP ELSE ELSEIF END ENDCASE ENDDECLARE ENDFOR
 | |
| syntax keyword openroadKeyword	ENDIF ENDLOOP ENDWHILE ESCAPE EXECUTE EXISTS
 | |
| syntax keyword openroadKeyword	EXIT FETCH FIELD FOR FROM GOTOFRAME GRANT GROUP
 | |
| syntax keyword openroadKeyword	HAVING IF IMMEDIATE IN INDEX INITIALISE
 | |
| syntax keyword openroadKeyword	INITIALIZE INQUIRE_INGRES INQUIRE_SQL INSERT
 | |
| syntax keyword openroadKeyword	INSERTROW INSTALLATION INTEGRITY INTO KEY LIKE
 | |
| syntax keyword openroadKeyword	LINK MAX MESSAGE METHOD MIN MODE MODIFY NEXT
 | |
| syntax keyword openroadKeyword	NOECHO NOT NULL OF ON OPEN OPENFRAME OR ORDER
 | |
| syntax keyword openroadKeyword	PERMIT PROCEDURE PROMPT QUALIFICATION RAISE
 | |
| syntax keyword openroadKeyword	REGISTER RELOCATE REMOVE REPEAT REPEATED RESUME
 | |
| syntax keyword openroadKeyword	RETURN RETURNING REVOKE ROLE ROLLBACK RULE SAVE
 | |
| syntax keyword openroadKeyword	SAVEPOINT SELECT SET SLEEP SOME SUM SYSTEM TABLE
 | |
| syntax keyword openroadKeyword	THEN TO TRANSACTION UNION UNIQUE UNTIL UPDATE
 | |
| syntax keyword openroadKeyword	VALUES VIEW WHERE WHILE WITH WORK
 | |
| 
 | |
| syntax keyword openroadTodo contained	TODO
 | |
| 
 | |
| " Catch errors caused by wrong parenthesis
 | |
| "
 | |
| syntax cluster	openroadParenGroup	contains=openroadParenError,openroadTodo
 | |
| syntax region	openroadParen		transparent start='(' end=')' contains=ALLBUT,@openroadParenGroup
 | |
| syntax match	openroadParenError	")"
 | |
| highlight link	openroadParenError	cError
 | |
| 
 | |
| " Numbers
 | |
| "
 | |
| syntax match	openroadNumber		"\<[0-9]\+\>"
 | |
| 
 | |
| " String
 | |
| "
 | |
| syntax region	openroadString		start=+'+  end=+'+
 | |
| 
 | |
| " Operators, Data Types and Functions
 | |
| "
 | |
| syntax match	openroadOperator	/[\+\-\*\/=\<\>;\(\)]/
 | |
| 
 | |
| syntax keyword	openroadType		ARRAY BYTE CHAR DATE DECIMAL FLOAT FLOAT4
 | |
| syntax keyword	openroadType		FLOAT8 INT1 INT2 INT4 INTEGER INTEGER1
 | |
| syntax keyword	openroadType		INTEGER2 INTEGER4 MONEY OBJECT_KEY
 | |
| syntax keyword	openroadType		SECURITY_LABEL SMALLINT TABLE_KEY VARCHAR
 | |
| 
 | |
| syntax keyword	openroadFunc		IFNULL
 | |
| 
 | |
| " System Classes
 | |
| "
 | |
| syntax keyword	openroadClass	ACTIVEFIELD ANALOGFIELD APPFLAG APPSOURCE
 | |
| syntax keyword	openroadClass	ARRAYOBJECT ATTRIBUTEOBJECT BARFIELD
 | |
| syntax keyword	openroadClass	BITMAPOBJECT BOXTRIM BREAKSPEC BUTTONFIELD
 | |
| syntax keyword	openroadClass	CELLATTRIBUTE CHOICEBITMAP CHOICEDETAIL
 | |
| syntax keyword	openroadClass	CHOICEFIELD CHOICEITEM CHOICELIST CLASS
 | |
| syntax keyword	openroadClass	CLASSSOURCE COLUMNCROSS COLUMNFIELD
 | |
| syntax keyword	openroadClass	COMPOSITEFIELD COMPSOURCE CONTROLBUTTON
 | |
| syntax keyword	openroadClass	CROSSTABLE CURSORBITMAP CURSOROBJECT DATASTREAM
 | |
| syntax keyword	openroadClass	DATEOBJECT DBEVENTOBJECT DBSESSIONOBJECT
 | |
| syntax keyword	openroadClass	DISPLAYFORM DYNEXPR ELLIPSESHAPE ENTRYFIELD
 | |
| syntax keyword	openroadClass	ENUMFIELD EVENT EXTOBJECT EXTOBJFIELD
 | |
| syntax keyword	openroadClass	FIELDOBJECT FLEXIBLEFORM FLOATOBJECT FORMFIELD
 | |
| syntax keyword	openroadClass	FRAMEEXEC FRAMEFORM FRAMESOURCE FREETRIM
 | |
| syntax keyword	openroadClass	GHOSTEXEC GHOSTSOURCE IMAGEFIELD IMAGETRIM
 | |
| syntax keyword	openroadClass	INTEGEROBJECT LISTFIELD LISTVIEWCOLATTR
 | |
| syntax keyword	openroadClass	LISTVIEWFIELD LONGBYTEOBJECT LONGVCHAROBJECT
 | |
| syntax keyword	openroadClass	MATRIXFIELD MENUBAR MENUBUTTON MENUFIELD
 | |
| syntax keyword	openroadClass	MENUGROUP MENUITEM MENULIST MENUSEPARATOR
 | |
| syntax keyword	openroadClass	MENUSTACK MENUTOGGLE METHODEXEC METHODOBJECT
 | |
| syntax keyword	openroadClass	MONEYOBJECT OBJECT OPTIONFIELD OPTIONMENU
 | |
| syntax keyword	openroadClass	PALETTEFIELD POPUPBUTTON PROC4GLSOURCE PROCEXEC
 | |
| syntax keyword	openroadClass	PROCHANDLE QUERYCOL QUERYOBJECT QUERYPARM
 | |
| syntax keyword	openroadClass	QUERYTABLE RADIOFIELD RECTANGLESHAPE ROWCROSS
 | |
| syntax keyword	openroadClass	SCALARFIELD SCOPE SCROLLBARFIELD SEGMENTSHAPE
 | |
| syntax keyword	openroadClass	SESSIONOBJECT SHAPEFIELD SLIDERFIELD SQLSELECT
 | |
| syntax keyword	openroadClass	STACKFIELD STRINGOBJECT SUBFORM TABBAR
 | |
| syntax keyword	openroadClass	TABFIELD TABFOLDER TABLEFIELD TABPAGE
 | |
| syntax keyword	openroadClass	TOGGLEFIELD TREE TREENODE TREEVIEWFIELD
 | |
| syntax keyword	openroadClass	USERCLASSOBJECT USEROBJECT VIEWPORTFIELD
 | |
| 
 | |
| " System Events
 | |
| "
 | |
| syntax keyword	openroadEvent	CHILDCLICK CHILDCLICKPOINT CHILDCOLLAPSED
 | |
| syntax keyword	openroadEvent	CHILDDETAILS CHILDDOUBLECLICK CHILDDRAGBOX
 | |
| syntax keyword	openroadEvent	CHILDDRAGSEGMENT CHILDENTRY CHILDEXIT
 | |
| syntax keyword	openroadEvent	CHILDEXPANDED CHILDHEADERCLICK CHILDMOVED
 | |
| syntax keyword	openroadEvent	CHILDPROPERTIES CHILDRESIZED CHILDSCROLL
 | |
| syntax keyword	openroadEvent	CHILDSELECT CHILDSELECTIONCHANGED CHILDSETVALUE
 | |
| syntax keyword	openroadEvent	CHILDUNSELECT CHILDVALIDATE CLICK CLICKPOINT
 | |
| syntax keyword	openroadEvent	COLLAPSED DBEVENT DETAILS DOUBLECLICK DRAGBOX
 | |
| syntax keyword	openroadEvent	DRAGSEGMENT ENTRY EXIT EXPANDED EXTCLASSEVENT
 | |
| syntax keyword	openroadEvent	FRAMEACTIVATE FRAMEDEACTIVATE HEADERCLICK
 | |
| syntax keyword	openroadEvent	INSERTROW LABELCHANGED MOVED PAGEACTIVATED
 | |
| syntax keyword	openroadEvent	PAGECHANGED PAGEDEACTIVATED PROPERTIES RESIZED
 | |
| syntax keyword	openroadEvent	SCROLL SELECT SELECTIONCHANGED SETVALUE
 | |
| syntax keyword	openroadEvent	TERMINATE UNSELECT USEREVENT VALIDATE
 | |
| syntax keyword	openroadEvent	WINDOWCLOSE WINDOWICON WINDOWMOVED WINDOWRESIZED
 | |
| syntax keyword	openroadEvent	WINDOWVISIBLE
 | |
| 
 | |
| " System Constants
 | |
| "
 | |
| syntax keyword	openroadConst	BF_BMP BF_GIF BF_SUNRASTER BF_TIFF
 | |
| syntax keyword	openroadConst	BF_WINDOWCURSOR BF_WINDOWICON BF_XBM
 | |
| syntax keyword	openroadConst	CC_BACKGROUND CC_BLACK CC_BLUE CC_BROWN CC_CYAN
 | |
| syntax keyword	openroadConst	CC_DEFAULT_1 CC_DEFAULT_10 CC_DEFAULT_11
 | |
| syntax keyword	openroadConst	CC_DEFAULT_12 CC_DEFAULT_13 CC_DEFAULT_14
 | |
| syntax keyword	openroadConst	CC_DEFAULT_15 CC_DEFAULT_16 CC_DEFAULT_17
 | |
| syntax keyword	openroadConst	CC_DEFAULT_18 CC_DEFAULT_19 CC_DEFAULT_2
 | |
| syntax keyword	openroadConst	CC_DEFAULT_20 CC_DEFAULT_21 CC_DEFAULT_22
 | |
| syntax keyword	openroadConst	CC_DEFAULT_23 CC_DEFAULT_24 CC_DEFAULT_25
 | |
| syntax keyword	openroadConst	CC_DEFAULT_26 CC_DEFAULT_27 CC_DEFAULT_28
 | |
| syntax keyword	openroadConst	CC_DEFAULT_29 CC_DEFAULT_3 CC_DEFAULT_30
 | |
| syntax keyword	openroadConst	CC_DEFAULT_4 CC_DEFAULT_5 CC_DEFAULT_6
 | |
| syntax keyword	openroadConst	CC_DEFAULT_7 CC_DEFAULT_8 CC_DEFAULT_9
 | |
| syntax keyword	openroadConst	CC_FOREGROUND CC_GRAY CC_GREEN CC_LIGHT_BLUE
 | |
| syntax keyword	openroadConst	CC_LIGHT_BROWN	CC_LIGHT_CYAN CC_LIGHT_GRAY
 | |
| syntax keyword	openroadConst	CC_LIGHT_GREEN CC_LIGHT_ORANGE CC_LIGHT_PINK
 | |
| syntax keyword	openroadConst	CC_LIGHT_PURPLE CC_LIGHT_RED CC_LIGHT_YELLOW
 | |
| syntax keyword	openroadConst	CC_MAGENTA CC_ORANGE CC_PALE_BLUE CC_PALE_BROWN
 | |
| syntax keyword	openroadConst	CC_PALE_CYAN CC_PALE_GRAY CC_PALE_GREEN
 | |
| syntax keyword	openroadConst	CC_PALE_ORANGE CC_PALE_PINK CC_PALE_PURPLE
 | |
| syntax keyword	openroadConst	CC_PALE_RED CC_PALE_YELLOW CC_PINK CC_PURPLE
 | |
| syntax keyword	openroadConst	CC_RED CC_SYS_ACTIVEBORDER CC_SYS_ACTIVECAPTION
 | |
| syntax keyword	openroadConst	CC_SYS_APPWORKSPACE CC_SYS_BACKGROUND
 | |
| syntax keyword	openroadConst	CC_SYS_BTNFACE CC_SYS_BTNSHADOW CC_SYS_BTNTEXT
 | |
| syntax keyword	openroadConst	CC_SYS_CAPTIONTEXT CC_SYS_GRAYTEXT
 | |
| syntax keyword	openroadConst	CC_SYS_HIGHLIGHT CC_SYS_HIGHLIGHTTEXT
 | |
| syntax keyword	openroadConst	CC_SYS_INACTIVEBORDER CC_SYS_INACTIVECAPTION
 | |
| syntax keyword	openroadConst	CC_SYS_INACTIVECAPTIONTEXT CC_SYS_MENU
 | |
| syntax keyword	openroadConst	CC_SYS_MENUTEXT CC_SYS_SCROLLBAR CC_SYS_SHADOW
 | |
| syntax keyword	openroadConst	CC_SYS_WINDOW CC_SYS_WINDOWFRAME
 | |
| syntax keyword	openroadConst	CC_SYS_WINDOWTEXT CC_WHITE CC_YELLOW
 | |
| syntax keyword	openroadConst	CL_INVALIDVALUE CP_BOTH CP_COLUMNS CP_NONE
 | |
| syntax keyword	openroadConst	CP_ROWS CS_CLOSED CS_CURRENT CS_NOCURRENT
 | |
| syntax keyword	openroadConst	CS_NO_MORE_ROWS CS_OPEN CS_OPEN_CACHED DC_BW
 | |
| syntax keyword	openroadConst	DC_COLOR DP_AUTOSIZE_FIELD DP_CLIP_IMAGE
 | |
| syntax keyword	openroadConst	DP_SCALE_IMAGE_H DP_SCALE_IMAGE_HW
 | |
| syntax keyword	openroadConst	DP_SCALE_IMAGE_W DS_CONNECTED DS_DISABLED
 | |
| syntax keyword	openroadConst	DS_DISCONNECTED DS_INGRES_DBMS DS_NO_DBMS
 | |
| syntax keyword	openroadConst	DS_ORACLE_DBMS DS_SQLSERVER_DBMS DV_NULL
 | |
| syntax keyword	openroadConst	DV_STRING DV_SYSTEM EH_NEXT_HANDLER EH_RESUME
 | |
| syntax keyword	openroadConst	EH_RETRY EP_INTERACTIVE EP_NONE EP_OUTPUT
 | |
| syntax keyword	openroadConst	ER_FAIL ER_NAMEEXISTS ER_OK ER_OUTOFRANGE
 | |
| syntax keyword	openroadConst	ER_ROWNOTFOUND ER_USER1 ER_USER10 ER_USER2
 | |
| syntax keyword	openroadConst	ER_USER3 ER_USER4 ER_USER5 ER_USER6 ER_USER7
 | |
| syntax keyword	openroadConst	ER_USER8 ER_USER9 FALSE FA_BOTTOMCENTER
 | |
| syntax keyword	openroadConst	FA_BOTTOMLEFT FA_BOTTOMRIGHT FA_CENTER
 | |
| syntax keyword	openroadConst	FA_CENTERLEFT FA_CENTERRIGHT FA_DEFAULT FA_NONE
 | |
| syntax keyword	openroadConst	FA_TOPCENTER FA_TOPLEFT FA_TOPRIGHT
 | |
| syntax keyword	openroadConst	FB_CHANGEABLE FB_CLICKPOINT FB_DIMMED FB_DRAGBOX
 | |
| syntax keyword	openroadConst	FB_DRAGSEGMENT FB_FLEXIBLE FB_INVISIBLE
 | |
| syntax keyword	openroadConst	FB_LANDABLE FB_MARKABLE FB_RESIZEABLE
 | |
| syntax keyword	openroadConst	FB_VIEWABLE FB_VISIBLE FC_LOWER FC_NONE FC_UPPER
 | |
| syntax keyword	openroadConst	FM_QUERY FM_READ FM_UPDATE FM_USER1 FM_USER2
 | |
| syntax keyword	openroadConst	FM_USER3 FO_DEFAULT FO_HORIZONTAL FO_VERTICAL
 | |
| syntax keyword	openroadConst	FP_BITMAP FP_CLEAR FP_CROSSHATCH FP_DARKSHADE
 | |
| syntax keyword	openroadConst	FP_DEFAULT FP_HORIZONTAL FP_LIGHTSHADE FP_SHADE
 | |
| syntax keyword	openroadConst	FP_SOLID FP_VERTICAL FT_NOTSETVALUE FT_SETVALUE
 | |
| syntax keyword	openroadConst	FT_TABTO FT_TAKEFOCUS GF_BOTTOM GF_DEFAULT
 | |
| syntax keyword	openroadConst	GF_LEFT GF_RIGHT GF_TOP HC_DOUBLEQUOTE
 | |
| syntax keyword	openroadConst	HC_FORMFEED HC_NEWLINE HC_QUOTE HC_SPACE HC_TAB
 | |
| syntax keyword	openroadConst	HV_CONTENTS HV_CONTEXT HV_HELPONHELP HV_KEY
 | |
| syntax keyword	openroadConst	HV_QUIT LS_3D LS_DASH LS_DASHDOT LS_DASHDOTDOT
 | |
| syntax keyword	openroadConst	LS_DEFAULT LS_DOT LS_SOLID LW_DEFAULT
 | |
| syntax keyword	openroadConst	LW_EXTRATHIN LW_MAXIMUM LW_MIDDLE LW_MINIMUM
 | |
| syntax keyword	openroadConst	LW_NOLINE LW_THICK LW_THIN LW_VERYTHICK
 | |
| syntax keyword	openroadConst	LW_VERYTHIN MB_DISABLED MB_ENABLED MB_INVISIBLE
 | |
| syntax keyword	openroadConst	MB_MOVEABLE MT_ERROR MT_INFO MT_NONE MT_WARNING
 | |
| syntax keyword	openroadConst	OP_APPEND OP_NONE OS3D OS_DEFAULT OS_SHADOW
 | |
| syntax keyword	openroadConst	OS_SOLID PU_CANCEL PU_OK QS_ACTIVE QS_INACTIVE
 | |
| syntax keyword	openroadConst	QS_SETCOL QY_ARRAY QY_CACHE QY_CURSOR QY_DIRECT
 | |
| syntax keyword	openroadConst	RC_CHILDSELECTED RC_DOWN RC_END RC_FIELDFREED
 | |
| syntax keyword	openroadConst	RC_FIELDORPHANED RC_GROUPSELECT RC_HOME RC_LEFT
 | |
| syntax keyword	openroadConst	RC_MODECHANGED RC_MOUSECLICK RC_MOUSEDRAG
 | |
| syntax keyword	openroadConst	RC_NEXT RC_NOTAPPLICABLE RC_PAGEDOWN RC_PAGEUP
 | |
| syntax keyword	openroadConst	RC_PARENTSELECTED RC_PREVIOUS RC_PROGRAM
 | |
| syntax keyword	openroadConst	RC_RESUME RC_RETURN RC_RIGHT RC_ROWDELETED
 | |
| syntax keyword	openroadConst	RC_ROWINSERTED RC_ROWSALLDELETED RC_SELECT
 | |
| syntax keyword	openroadConst	RC_TFSCROLL RC_TOGGLESELECT RC_UP RS_CHANGED
 | |
| syntax keyword	openroadConst	RS_DELETED RS_NEW RS_UNCHANGED RS_UNDEFINED
 | |
| syntax keyword	openroadConst	SK_CLOSE SK_COPY SK_CUT SK_DELETE SK_DETAILS
 | |
| syntax keyword	openroadConst	SK_DUPLICATE SK_FIND SK_GO SK_HELP SK_NEXT
 | |
| syntax keyword	openroadConst	SK_NONE SK_PASTE SK_PROPS SK_QUIT SK_REDO
 | |
| syntax keyword	openroadConst	SK_SAVE SK_TFDELETEALLROWS SK_TFDELETEROW
 | |
| syntax keyword	openroadConst	SK_TFFIND SK_TFINSERTROW SK_UNDO SP_APPSTARTING
 | |
| syntax keyword	openroadConst	SP_ARROW SP_CROSS SP_IBEAM SP_ICON SP_NO
 | |
| syntax keyword	openroadConst	SP_SIZE SP_SIZENESW SP_SIZENS SP_SIZENWSE
 | |
| syntax keyword	openroadConst	SP_SIZEWE SP_UPARROW SP_WAIT SY_NT SY_OS2
 | |
| syntax keyword	openroadConst	SY_UNIX SY_VMS SY_WIN95 TF_COURIER TF_HELVETICA
 | |
| syntax keyword	openroadConst	TF_LUCIDA TF_MENUDEFAULT TF_NEWCENTURY TF_SYSTEM
 | |
| syntax keyword	openroadConst	TF_TIMESROMAN TRUE UE_DATAERROR UE_EXITED
 | |
| syntax keyword	openroadConst	UE_NOTACTIVE UE_PURGED UE_RESUMED UE_UNKNOWN
 | |
| syntax keyword	openroadConst	WI_MOTIF WI_MSWIN32 WI_MSWINDOWS WI_NONE WI_PM
 | |
| syntax keyword	openroadConst	WP_FLOATING WP_INTERACTIVE WP_PARENTCENTERED
 | |
| syntax keyword	openroadConst	WP_PARENTRELATIVE WP_SCREENCENTERED
 | |
| syntax keyword	openroadConst	WP_SCREENRELATIVE WV_ICON WV_INVISIBLE
 | |
| syntax keyword	openroadConst	WV_UNREALIZED WV_VISIBLE
 | |
| 
 | |
| " System Variables
 | |
| "
 | |
| syntax keyword	openroadVar		CurFrame CurProcedure CurMethod CurObject
 | |
| 
 | |
| " Identifiers
 | |
| "
 | |
| syntax match	openroadIdent	/[a-zA-Z_][a-zA-Z_]*![a-zA-Z_][a-zA-Z_]*/
 | |
| 
 | |
| " Comments
 | |
| "
 | |
| if exists("openroad_comment_strings")
 | |
| 	syntax match openroadCommentSkip	contained "^\s*\*\($\|\s\+\)"
 | |
| 	syntax region openroadCommentString	contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end="$"
 | |
| 	syntax region openroadComment		start="/\*" end="\*/" contains=openroadCommentString,openroadCharacter,openroadNumber
 | |
| 	syntax match openroadComment		"//.*" contains=openroadComment2String,openroadCharacter,openroadNumber
 | |
| else
 | |
| 	syn region openroadComment			start="/\*" end="\*/"
 | |
| 	syn match openroadComment			"//.*"
 | |
| endif
 | |
| 
 | |
| " Define the default highlighting.
 | |
| " Only when an item doesn't have highlighting yet
 | |
| "
 | |
| 
 | |
| hi def link openroadKeyword	Statement
 | |
| hi def link openroadNumber	Number
 | |
| hi def link openroadString	String
 | |
| hi def link openroadComment	Comment
 | |
| hi def link openroadOperator	Operator
 | |
| hi def link openroadType		Type
 | |
| hi def link openroadFunc		Special
 | |
| hi def link openroadClass	Type
 | |
| hi def link openroadEvent	Statement
 | |
| hi def link openroadConst	Constant
 | |
| hi def link openroadVar		Identifier
 | |
| hi def link openroadIdent	Identifier
 | |
| hi def link openroadTodo		Todo
 | |
| 
 | |
| 
 | |
| let b:current_syntax = "openroad"
 |