ok
Direktori : /usr/share/vim/vim74/syntax/ |
Current File : //usr/share/vim/vim74/syntax/openroad.vim |
" Vim syntax file " Language: CA-OpenROAD " Maintainer: Luis Moreno <lmoreno@eresmas.net> " Last change: 2001 Jun 12 " 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 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. " 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_openroad_syntax_inits") if version < 508 let did_openroad_syntax_inits = 1 command -nargs=+ HiLink hi link <args> else command -nargs=+ HiLink hi def link <args> endif HiLink openroadKeyword Statement HiLink openroadNumber Number HiLink openroadString String HiLink openroadComment Comment HiLink openroadOperator Operator HiLink openroadType Type HiLink openroadFunc Special HiLink openroadClass Type HiLink openroadEvent Statement HiLink openroadConst Constant HiLink openroadVar Identifier HiLink openroadIdent Identifier HiLink openroadTodo Todo delcommand HiLink endif let b:current_syntax = "openroad"