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