1" Vim syntax file 2" Language: CA-OpenROAD 3" Maintainer: Luis Moreno <[email protected]> 4" Last change: 2001 Jun 12 5 6" For version 5.x: Clear all syntax items 7" For version 6.x: Quit when a syntax file was already loaded 8" 9if version < 600 10 syntax clear 11elseif exists("b:current_syntax") 12 finish 13endif 14 15syntax case ignore 16 17" Keywords 18" 19syntax keyword openroadKeyword ABORT ALL ALTER AND ANY AS ASC AT AVG BEGIN 20syntax keyword openroadKeyword BETWEEN BY BYREF CALL CALLFRAME CALLPROC CASE 21syntax keyword openroadKeyword CLEAR CLOSE COMMIT CONNECT CONTINUE COPY COUNT 22syntax keyword openroadKeyword CREATE CURRENT DBEVENT DECLARE DEFAULT DELETE 23syntax keyword openroadKeyword DELETEROW DESC DIRECT DISCONNECT DISTINCT DO 24syntax keyword openroadKeyword DROP ELSE ELSEIF END ENDCASE ENDDECLARE ENDFOR 25syntax keyword openroadKeyword ENDIF ENDLOOP ENDWHILE ESCAPE EXECUTE EXISTS 26syntax keyword openroadKeyword EXIT FETCH FIELD FOR FROM GOTOFRAME GRANT GROUP 27syntax keyword openroadKeyword HAVING IF IMMEDIATE IN INDEX INITIALISE 28syntax keyword openroadKeyword INITIALIZE INQUIRE_INGRES INQUIRE_SQL INSERT 29syntax keyword openroadKeyword INSERTROW INSTALLATION INTEGRITY INTO KEY LIKE 30syntax keyword openroadKeyword LINK MAX MESSAGE METHOD MIN MODE MODIFY NEXT 31syntax keyword openroadKeyword NOECHO NOT NULL OF ON OPEN OPENFRAME OR ORDER 32syntax keyword openroadKeyword PERMIT PROCEDURE PROMPT QUALIFICATION RAISE 33syntax keyword openroadKeyword REGISTER RELOCATE REMOVE REPEAT REPEATED RESUME 34syntax keyword openroadKeyword RETURN RETURNING REVOKE ROLE ROLLBACK RULE SAVE 35syntax keyword openroadKeyword SAVEPOINT SELECT SET SLEEP SOME SUM SYSTEM TABLE 36syntax keyword openroadKeyword THEN TO TRANSACTION UNION UNIQUE UNTIL UPDATE 37syntax keyword openroadKeyword VALUES VIEW WHERE WHILE WITH WORK 38 39syntax keyword openroadTodo contained TODO 40 41" Catch errors caused by wrong parenthesis 42" 43syntax cluster openroadParenGroup contains=openroadParenError,openroadTodo 44syntax region openroadParen transparent start='(' end=')' contains=ALLBUT,@openroadParenGroup 45syntax match openroadParenError ")" 46highlight link openroadParenError cError 47 48" Numbers 49" 50syntax match openroadNumber "\<[0-9]\+\>" 51 52" String 53" 54syntax region openroadString start=+'+ end=+'+ 55 56" Operators, Data Types and Functions 57" 58syntax match openroadOperator /[\+\-\*\/=\<\>;\(\)]/ 59 60syntax keyword openroadType ARRAY BYTE CHAR DATE DECIMAL FLOAT FLOAT4 61syntax keyword openroadType FLOAT8 INT1 INT2 INT4 INTEGER INTEGER1 62syntax keyword openroadType INTEGER2 INTEGER4 MONEY OBJECT_KEY 63syntax keyword openroadType SECURITY_LABEL SMALLINT TABLE_KEY VARCHAR 64 65syntax keyword openroadFunc IFNULL 66 67" System Classes 68" 69syntax keyword openroadClass ACTIVEFIELD ANALOGFIELD APPFLAG APPSOURCE 70syntax keyword openroadClass ARRAYOBJECT ATTRIBUTEOBJECT BARFIELD 71syntax keyword openroadClass BITMAPOBJECT BOXTRIM BREAKSPEC BUTTONFIELD 72syntax keyword openroadClass CELLATTRIBUTE CHOICEBITMAP CHOICEDETAIL 73syntax keyword openroadClass CHOICEFIELD CHOICEITEM CHOICELIST CLASS 74syntax keyword openroadClass CLASSSOURCE COLUMNCROSS COLUMNFIELD 75syntax keyword openroadClass COMPOSITEFIELD COMPSOURCE CONTROLBUTTON 76syntax keyword openroadClass CROSSTABLE CURSORBITMAP CURSOROBJECT DATASTREAM 77syntax keyword openroadClass DATEOBJECT DBEVENTOBJECT DBSESSIONOBJECT 78syntax keyword openroadClass DISPLAYFORM DYNEXPR ELLIPSESHAPE ENTRYFIELD 79syntax keyword openroadClass ENUMFIELD EVENT EXTOBJECT EXTOBJFIELD 80syntax keyword openroadClass FIELDOBJECT FLEXIBLEFORM FLOATOBJECT FORMFIELD 81syntax keyword openroadClass FRAMEEXEC FRAMEFORM FRAMESOURCE FREETRIM 82syntax keyword openroadClass GHOSTEXEC GHOSTSOURCE IMAGEFIELD IMAGETRIM 83syntax keyword openroadClass INTEGEROBJECT LISTFIELD LISTVIEWCOLATTR 84syntax keyword openroadClass LISTVIEWFIELD LONGBYTEOBJECT LONGVCHAROBJECT 85syntax keyword openroadClass MATRIXFIELD MENUBAR MENUBUTTON MENUFIELD 86syntax keyword openroadClass MENUGROUP MENUITEM MENULIST MENUSEPARATOR 87syntax keyword openroadClass MENUSTACK MENUTOGGLE METHODEXEC METHODOBJECT 88syntax keyword openroadClass MONEYOBJECT OBJECT OPTIONFIELD OPTIONMENU 89syntax keyword openroadClass PALETTEFIELD POPUPBUTTON PROC4GLSOURCE PROCEXEC 90syntax keyword openroadClass PROCHANDLE QUERYCOL QUERYOBJECT QUERYPARM 91syntax keyword openroadClass QUERYTABLE RADIOFIELD RECTANGLESHAPE ROWCROSS 92syntax keyword openroadClass SCALARFIELD SCOPE SCROLLBARFIELD SEGMENTSHAPE 93syntax keyword openroadClass SESSIONOBJECT SHAPEFIELD SLIDERFIELD SQLSELECT 94syntax keyword openroadClass STACKFIELD STRINGOBJECT SUBFORM TABBAR 95syntax keyword openroadClass TABFIELD TABFOLDER TABLEFIELD TABPAGE 96syntax keyword openroadClass TOGGLEFIELD TREE TREENODE TREEVIEWFIELD 97syntax keyword openroadClass USERCLASSOBJECT USEROBJECT VIEWPORTFIELD 98 99" System Events 100" 101syntax keyword openroadEvent CHILDCLICK CHILDCLICKPOINT CHILDCOLLAPSED 102syntax keyword openroadEvent CHILDDETAILS CHILDDOUBLECLICK CHILDDRAGBOX 103syntax keyword openroadEvent CHILDDRAGSEGMENT CHILDENTRY CHILDEXIT 104syntax keyword openroadEvent CHILDEXPANDED CHILDHEADERCLICK CHILDMOVED 105syntax keyword openroadEvent CHILDPROPERTIES CHILDRESIZED CHILDSCROLL 106syntax keyword openroadEvent CHILDSELECT CHILDSELECTIONCHANGED CHILDSETVALUE 107syntax keyword openroadEvent CHILDUNSELECT CHILDVALIDATE CLICK CLICKPOINT 108syntax keyword openroadEvent COLLAPSED DBEVENT DETAILS DOUBLECLICK DRAGBOX 109syntax keyword openroadEvent DRAGSEGMENT ENTRY EXIT EXPANDED EXTCLASSEVENT 110syntax keyword openroadEvent FRAMEACTIVATE FRAMEDEACTIVATE HEADERCLICK 111syntax keyword openroadEvent INSERTROW LABELCHANGED MOVED PAGEACTIVATED 112syntax keyword openroadEvent PAGECHANGED PAGEDEACTIVATED PROPERTIES RESIZED 113syntax keyword openroadEvent SCROLL SELECT SELECTIONCHANGED SETVALUE 114syntax keyword openroadEvent TERMINATE UNSELECT USEREVENT VALIDATE 115syntax keyword openroadEvent WINDOWCLOSE WINDOWICON WINDOWMOVED WINDOWRESIZED 116syntax keyword openroadEvent WINDOWVISIBLE 117 118" System Constants 119" 120syntax keyword openroadConst BF_BMP BF_GIF BF_SUNRASTER BF_TIFF 121syntax keyword openroadConst BF_WINDOWCURSOR BF_WINDOWICON BF_XBM 122syntax keyword openroadConst CC_BACKGROUND CC_BLACK CC_BLUE CC_BROWN CC_CYAN 123syntax keyword openroadConst CC_DEFAULT_1 CC_DEFAULT_10 CC_DEFAULT_11 124syntax keyword openroadConst CC_DEFAULT_12 CC_DEFAULT_13 CC_DEFAULT_14 125syntax keyword openroadConst CC_DEFAULT_15 CC_DEFAULT_16 CC_DEFAULT_17 126syntax keyword openroadConst CC_DEFAULT_18 CC_DEFAULT_19 CC_DEFAULT_2 127syntax keyword openroadConst CC_DEFAULT_20 CC_DEFAULT_21 CC_DEFAULT_22 128syntax keyword openroadConst CC_DEFAULT_23 CC_DEFAULT_24 CC_DEFAULT_25 129syntax keyword openroadConst CC_DEFAULT_26 CC_DEFAULT_27 CC_DEFAULT_28 130syntax keyword openroadConst CC_DEFAULT_29 CC_DEFAULT_3 CC_DEFAULT_30 131syntax keyword openroadConst CC_DEFAULT_4 CC_DEFAULT_5 CC_DEFAULT_6 132syntax keyword openroadConst CC_DEFAULT_7 CC_DEFAULT_8 CC_DEFAULT_9 133syntax keyword openroadConst CC_FOREGROUND CC_GRAY CC_GREEN CC_LIGHT_BLUE 134syntax keyword openroadConst CC_LIGHT_BROWN CC_LIGHT_CYAN CC_LIGHT_GRAY 135syntax keyword openroadConst CC_LIGHT_GREEN CC_LIGHT_ORANGE CC_LIGHT_PINK 136syntax keyword openroadConst CC_LIGHT_PURPLE CC_LIGHT_RED CC_LIGHT_YELLOW 137syntax keyword openroadConst CC_MAGENTA CC_ORANGE CC_PALE_BLUE CC_PALE_BROWN 138syntax keyword openroadConst CC_PALE_CYAN CC_PALE_GRAY CC_PALE_GREEN 139syntax keyword openroadConst CC_PALE_ORANGE CC_PALE_PINK CC_PALE_PURPLE 140syntax keyword openroadConst CC_PALE_RED CC_PALE_YELLOW CC_PINK CC_PURPLE 141syntax keyword openroadConst CC_RED CC_SYS_ACTIVEBORDER CC_SYS_ACTIVECAPTION 142syntax keyword openroadConst CC_SYS_APPWORKSPACE CC_SYS_BACKGROUND 143syntax keyword openroadConst CC_SYS_BTNFACE CC_SYS_BTNSHADOW CC_SYS_BTNTEXT 144syntax keyword openroadConst CC_SYS_CAPTIONTEXT CC_SYS_GRAYTEXT 145syntax keyword openroadConst CC_SYS_HIGHLIGHT CC_SYS_HIGHLIGHTTEXT 146syntax keyword openroadConst CC_SYS_INACTIVEBORDER CC_SYS_INACTIVECAPTION 147syntax keyword openroadConst CC_SYS_INACTIVECAPTIONTEXT CC_SYS_MENU 148syntax keyword openroadConst CC_SYS_MENUTEXT CC_SYS_SCROLLBAR CC_SYS_SHADOW 149syntax keyword openroadConst CC_SYS_WINDOW CC_SYS_WINDOWFRAME 150syntax keyword openroadConst CC_SYS_WINDOWTEXT CC_WHITE CC_YELLOW 151syntax keyword openroadConst CL_INVALIDVALUE CP_BOTH CP_COLUMNS CP_NONE 152syntax keyword openroadConst CP_ROWS CS_CLOSED CS_CURRENT CS_NOCURRENT 153syntax keyword openroadConst CS_NO_MORE_ROWS CS_OPEN CS_OPEN_CACHED DC_BW 154syntax keyword openroadConst DC_COLOR DP_AUTOSIZE_FIELD DP_CLIP_IMAGE 155syntax keyword openroadConst DP_SCALE_IMAGE_H DP_SCALE_IMAGE_HW 156syntax keyword openroadConst DP_SCALE_IMAGE_W DS_CONNECTED DS_DISABLED 157syntax keyword openroadConst DS_DISCONNECTED DS_INGRES_DBMS DS_NO_DBMS 158syntax keyword openroadConst DS_ORACLE_DBMS DS_SQLSERVER_DBMS DV_NULL 159syntax keyword openroadConst DV_STRING DV_SYSTEM EH_NEXT_HANDLER EH_RESUME 160syntax keyword openroadConst EH_RETRY EP_INTERACTIVE EP_NONE EP_OUTPUT 161syntax keyword openroadConst ER_FAIL ER_NAMEEXISTS ER_OK ER_OUTOFRANGE 162syntax keyword openroadConst ER_ROWNOTFOUND ER_USER1 ER_USER10 ER_USER2 163syntax keyword openroadConst ER_USER3 ER_USER4 ER_USER5 ER_USER6 ER_USER7 164syntax keyword openroadConst ER_USER8 ER_USER9 FALSE FA_BOTTOMCENTER 165syntax keyword openroadConst FA_BOTTOMLEFT FA_BOTTOMRIGHT FA_CENTER 166syntax keyword openroadConst FA_CENTERLEFT FA_CENTERRIGHT FA_DEFAULT FA_NONE 167syntax keyword openroadConst FA_TOPCENTER FA_TOPLEFT FA_TOPRIGHT 168syntax keyword openroadConst FB_CHANGEABLE FB_CLICKPOINT FB_DIMMED FB_DRAGBOX 169syntax keyword openroadConst FB_DRAGSEGMENT FB_FLEXIBLE FB_INVISIBLE 170syntax keyword openroadConst FB_LANDABLE FB_MARKABLE FB_RESIZEABLE 171syntax keyword openroadConst FB_VIEWABLE FB_VISIBLE FC_LOWER FC_NONE FC_UPPER 172syntax keyword openroadConst FM_QUERY FM_READ FM_UPDATE FM_USER1 FM_USER2 173syntax keyword openroadConst FM_USER3 FO_DEFAULT FO_HORIZONTAL FO_VERTICAL 174syntax keyword openroadConst FP_BITMAP FP_CLEAR FP_CROSSHATCH FP_DARKSHADE 175syntax keyword openroadConst FP_DEFAULT FP_HORIZONTAL FP_LIGHTSHADE FP_SHADE 176syntax keyword openroadConst FP_SOLID FP_VERTICAL FT_NOTSETVALUE FT_SETVALUE 177syntax keyword openroadConst FT_TABTO FT_TAKEFOCUS GF_BOTTOM GF_DEFAULT 178syntax keyword openroadConst GF_LEFT GF_RIGHT GF_TOP HC_DOUBLEQUOTE 179syntax keyword openroadConst HC_FORMFEED HC_NEWLINE HC_QUOTE HC_SPACE HC_TAB 180syntax keyword openroadConst HV_CONTENTS HV_CONTEXT HV_HELPONHELP HV_KEY 181syntax keyword openroadConst HV_QUIT LS_3D LS_DASH LS_DASHDOT LS_DASHDOTDOT 182syntax keyword openroadConst LS_DEFAULT LS_DOT LS_SOLID LW_DEFAULT 183syntax keyword openroadConst LW_EXTRATHIN LW_MAXIMUM LW_MIDDLE LW_MINIMUM 184syntax keyword openroadConst LW_NOLINE LW_THICK LW_THIN LW_VERYTHICK 185syntax keyword openroadConst LW_VERYTHIN MB_DISABLED MB_ENABLED MB_INVISIBLE 186syntax keyword openroadConst MB_MOVEABLE MT_ERROR MT_INFO MT_NONE MT_WARNING 187syntax keyword openroadConst OP_APPEND OP_NONE OS3D OS_DEFAULT OS_SHADOW 188syntax keyword openroadConst OS_SOLID PU_CANCEL PU_OK QS_ACTIVE QS_INACTIVE 189syntax keyword openroadConst QS_SETCOL QY_ARRAY QY_CACHE QY_CURSOR QY_DIRECT 190syntax keyword openroadConst RC_CHILDSELECTED RC_DOWN RC_END RC_FIELDFREED 191syntax keyword openroadConst RC_FIELDORPHANED RC_GROUPSELECT RC_HOME RC_LEFT 192syntax keyword openroadConst RC_MODECHANGED RC_MOUSECLICK RC_MOUSEDRAG 193syntax keyword openroadConst RC_NEXT RC_NOTAPPLICABLE RC_PAGEDOWN RC_PAGEUP 194syntax keyword openroadConst RC_PARENTSELECTED RC_PREVIOUS RC_PROGRAM 195syntax keyword openroadConst RC_RESUME RC_RETURN RC_RIGHT RC_ROWDELETED 196syntax keyword openroadConst RC_ROWINSERTED RC_ROWSALLDELETED RC_SELECT 197syntax keyword openroadConst RC_TFSCROLL RC_TOGGLESELECT RC_UP RS_CHANGED 198syntax keyword openroadConst RS_DELETED RS_NEW RS_UNCHANGED RS_UNDEFINED 199syntax keyword openroadConst SK_CLOSE SK_COPY SK_CUT SK_DELETE SK_DETAILS 200syntax keyword openroadConst SK_DUPLICATE SK_FIND SK_GO SK_HELP SK_NEXT 201syntax keyword openroadConst SK_NONE SK_PASTE SK_PROPS SK_QUIT SK_REDO 202syntax keyword openroadConst SK_SAVE SK_TFDELETEALLROWS SK_TFDELETEROW 203syntax keyword openroadConst SK_TFFIND SK_TFINSERTROW SK_UNDO SP_APPSTARTING 204syntax keyword openroadConst SP_ARROW SP_CROSS SP_IBEAM SP_ICON SP_NO 205syntax keyword openroadConst SP_SIZE SP_SIZENESW SP_SIZENS SP_SIZENWSE 206syntax keyword openroadConst SP_SIZEWE SP_UPARROW SP_WAIT SY_NT SY_OS2 207syntax keyword openroadConst SY_UNIX SY_VMS SY_WIN95 TF_COURIER TF_HELVETICA 208syntax keyword openroadConst TF_LUCIDA TF_MENUDEFAULT TF_NEWCENTURY TF_SYSTEM 209syntax keyword openroadConst TF_TIMESROMAN TRUE UE_DATAERROR UE_EXITED 210syntax keyword openroadConst UE_NOTACTIVE UE_PURGED UE_RESUMED UE_UNKNOWN 211syntax keyword openroadConst WI_MOTIF WI_MSWIN32 WI_MSWINDOWS WI_NONE WI_PM 212syntax keyword openroadConst WP_FLOATING WP_INTERACTIVE WP_PARENTCENTERED 213syntax keyword openroadConst WP_PARENTRELATIVE WP_SCREENCENTERED 214syntax keyword openroadConst WP_SCREENRELATIVE WV_ICON WV_INVISIBLE 215syntax keyword openroadConst WV_UNREALIZED WV_VISIBLE 216 217" System Variables 218" 219syntax keyword openroadVar CurFrame CurProcedure CurMethod CurObject 220 221" Identifiers 222" 223syntax match openroadIdent /[a-zA-Z_][a-zA-Z_]*![a-zA-Z_][a-zA-Z_]*/ 224 225" Comments 226" 227if exists("openroad_comment_strings") 228 syntax match openroadCommentSkip contained "^\s*\*\($\|\s\+\)" 229 syntax region openroadCommentString contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end="$" 230 syntax region openroadComment start="/\*" end="\*/" contains=openroadCommentString,openroadCharacter,openroadNumber 231 syntax match openroadComment "//.*" contains=openroadComment2String,openroadCharacter,openroadNumber 232else 233 syn region openroadComment start="/\*" end="\*/" 234 syn match openroadComment "//.*" 235endif 236 237" Define the default highlighting. 238" For version 5.7 and earlier: only when not done already 239" For version 5.8 and later: only when an item doesn't have highlighting yet 240" 241if version >= 508 || !exists("did_openroad_syntax_inits") 242 if version < 508 243 let did_openroad_syntax_inits = 1 244 command -nargs=+ HiLink hi link <args> 245 else 246 command -nargs=+ HiLink hi def link <args> 247 endif 248 249 HiLink openroadKeyword Statement 250 HiLink openroadNumber Number 251 HiLink openroadString String 252 HiLink openroadComment Comment 253 HiLink openroadOperator Operator 254 HiLink openroadType Type 255 HiLink openroadFunc Special 256 HiLink openroadClass Type 257 HiLink openroadEvent Statement 258 HiLink openroadConst Constant 259 HiLink openroadVar Identifier 260 HiLink openroadIdent Identifier 261 HiLink openroadTodo Todo 262 263 delcommand HiLink 264endif 265 266let b:current_syntax = "openroad" 267