codekingpro/portable-devtools

1" Vim syntax file2" Language:	Informix 4GL3" Maintainer:	Rafal M. Sulejman <rms@poczta.onet.pl>4" Update:	26 Sep 20025" Changes:6" - Dynamic 4GL/FourJs/4GL 7.30 pseudo comment directives (Julian Bridle)7" - Conditionally allow case insensitive keywords (Julian Bridle)8"9 10" quit when a syntax file was already loaded11if exists("b:current_syntax")12  finish13endif14 15if exists("fgl_ignore_case")16  syntax case ignore17else18  syntax case match19endif20syn keyword fglKeyword ABORT ABS ABSOLUTE ACCEPT ACCESS ACOS ADD AFTER ALL21syn keyword fglKeyword ALLOCATE ALTER AND ANSI ANY APPEND ARG_VAL ARRAY ARR_COUNT22syn keyword fglKeyword ARR_CURR AS ASC ASCENDING ASCII ASIN AT ATAN ATAN2 ATTACH23syn keyword fglKeyword ATTRIBUTE ATTRIBUTES AUDIT AUTHORIZATION AUTO AUTONEXT AVERAGE AVG24syn keyword fglKeyword BEFORE BEGIN BETWEEN BLACK BLINK BLUE BOLD BORDER BOTH BOTTOM25syn keyword fglKeyword BREAK BUFFERED BY BYTE26syn keyword fglKeyword CALL CASCADE CASE CHAR CHARACTER CHARACTER_LENGTH CHAR_LENGTH27syn keyword fglKeyword CHECK CLASS_ORIGIN CLEAR CLIPPED CLOSE CLUSTER COLOR28syn keyword fglKeyword COLUMN COLUMNS COMMAND COMMENT COMMENTS COMMIT COMMITTED29syn keyword fglKeyword COMPOSITES COMPRESS CONCURRENT CONNECT CONNECTION30syn keyword fglKeyword CONNECTION_ALIAS CONSTRAINED CONSTRAINT CONSTRAINTS CONSTRUCT31syn keyword fglKeyword CONTINUE CONTROL COS COUNT CREATE CURRENT CURSOR CYAN32syn keyword fglKeyword DATA DATABASE DATASKIP DATE DATETIME DAY DBA DBINFO DBSERVERNAME33syn keyword fglKeyword DEALLOCATE DEBUG DEC DECIMAL DECLARE DEFAULT DEFAULTS DEFER34syn keyword fglKeyword DEFERRED DEFINE DELETE DELIMITER DELIMITERS DESC DESCENDING35syn keyword fglKeyword DESCRIBE DESCRIPTOR DETACH DIAGNOSTICS DIM DIRTY DISABLED36syn keyword fglKeyword DISCONNECT DISPLAY DISTINCT DISTRIBUTIONS DO DORMANT DOUBLE37syn keyword fglKeyword DOWN DOWNSHIFT DROP38syn keyword fglKeyword EACH ELIF ELSE ENABLED END ENTRY ERROR ERRORLOG ERR_GET39syn keyword fglKeyword ERR_PRINT ERR_QUIT ESC ESCAPE EVERY EXCEPTION EXCLUSIVE40syn keyword fglKeyword EXEC EXECUTE EXISTS EXIT EXP EXPLAIN EXPRESSION EXTEND EXTENT41syn keyword fglKeyword EXTERN EXTERNAL42syn keyword fglKeyword F1 F10 F11 F12 F13 F14 F15 F16 F17 F18 F19 F2 F20 F21 F22 F2343syn keyword fglKeyword F24 F25 F26 F27 F28 F29 F3 F30 F31 F32 F33 F34 F35 F36 F37 F3844syn keyword fglKeyword F39 F4 F40 F41 F42 F43 F44 F45 F46 F47 F48 F49 F5 F50 F51 F5245syn keyword fglKeyword F53 F54 F55 F56 F57 F58 F59 F6 F60 F61 F62 F63 F64 F7 F8 F946syn keyword fglKeyword FALSE FETCH FGL_GETENV FGL_KEYVAL FGL_LASTKEY FIELD FIELD_TOUCHED47syn keyword fglKeyword FILE FILLFACTOR FILTERING FINISH FIRST FLOAT FLUSH FOR48syn keyword fglKeyword FOREACH FOREIGN FORM FORMAT FORMONLY FORTRAN FOUND FRACTION49syn keyword fglKeyword FRAGMENT FREE FROM FUNCTION GET_FLDBUF GLOBAL GLOBALS GO GOTO50syn keyword fglKeyword GRANT GREEN GROUP HAVING HEADER HELP HEX HIDE HIGH HOLD HOUR51syn keyword fglKeyword IDATA IF ILENGTH IMMEDIATE IN INCLUDE INDEX INDEXES INDICATOR52syn keyword fglKeyword INFIELD INIT INITIALIZE INPUT INSERT INSTRUCTIONS INT INTEGER53syn keyword fglKeyword INTERRUPT INTERVAL INTO INT_FLAG INVISIBLE IS ISAM ISOLATION54syn keyword fglKeyword ITYPE55syn keyword fglKeyword KEY LABEL56syn keyword fglKeyword LANGUAGE LAST LEADING LEFT LENGTH LET LIKE LINE57syn keyword fglKeyword LINENO LINES LOAD LOCATE LOCK LOG LOG10 LOGN LONG LOW58syn keyword fglKeyword MAGENTA MAIN MARGIN MATCHES MAX MDY MEDIUM MEMORY MENU MESSAGE59syn keyword fglKeyword MESSAGE_LENGTH MESSAGE_TEXT MIN MINUTE MOD MODE MODIFY MODULE60syn keyword fglKeyword MONEY MONTH MORE61syn keyword fglKeyword NAME NCHAR NEED NEW NEXT NEXTPAGE NO NOCR NOENTRY NONE NORMAL62syn keyword fglKeyword NOT NOTFOUND NULL NULLABLE NUMBER NUMERIC NUM_ARGS NVARCHAR63syn keyword fglKeyword OCTET_LENGTH OF OFF OLD ON ONLY OPEN OPTIMIZATION OPTION OPTIONS64syn keyword fglKeyword OR ORDER OTHERWISE OUTER OUTPUT65syn keyword fglKeyword PAGE PAGENO PAUSE PDQPRIORITY PERCENT PICTURE PIPE POW PRECISION66syn keyword fglKeyword PREPARE PREVIOUS PREVPAGE PRIMARY PRINT PRINTER PRIOR PRIVATE67syn keyword fglKeyword PRIVILEGES PROCEDURE PROGRAM PROMPT PUBLIC PUT68syn keyword fglKeyword QUIT QUIT_FLAG69syn keyword fglKeyword RAISE RANGE READ READONLY REAL RECORD RECOVER RED REFERENCES70syn keyword fglKeyword REFERENCING REGISTER RELATIVE REMAINDER REMOVE RENAME REOPTIMIZATION71syn keyword fglKeyword REPEATABLE REPORT REQUIRED RESOLUTION RESOURCE RESTRICT72syn keyword fglKeyword RESUME RETURN RETURNED_SQLSTATE RETURNING REVERSE REVOKE RIGHT73syn keyword fglKeyword ROBIN ROLE ROLLBACK ROLLFORWARD ROOT ROUND ROW ROWID ROWIDS74syn keyword fglKeyword ROWS ROW_COUNT RUN75syn keyword fglKeyword SCALE SCHEMA SCREEN SCROLL SCR_LINE SECOND SECTION SELECT76syn keyword fglKeyword SERIAL SERIALIZABLE SERVER_NAME SESSION SET SET_COUNT SHARE77syn keyword fglKeyword SHORT SHOW SITENAME SIZE SIZEOF SKIP SLEEP SMALLFLOAT SMALLINT78syn keyword fglKeyword SOME SPACE SPACES SQL SQLAWARN SQLCA SQLCODE SQLERRD SQLERRM79syn keyword fglKeyword SQLERROR SQLERRP SQLSTATE SQLWARNING SQRT STABILITY START80syn keyword fglKeyword STARTLOG STATIC STATISTICS STATUS STDEV STEP STOP STRING STRUCT81syn keyword fglKeyword SUBCLASS_ORIGIN SUM SWITCH SYNONYM SYSTEM82syn keyword fglKeyword SysBlobs SysChecks SysColAuth SysColDepend SysColumns83syn keyword fglKeyword SysConstraints SysDefaults SysDepend SysDistrib SysFragAuth84syn keyword fglKeyword SysFragments SysIndexes SysObjState SysOpClstr SysProcAuth85syn keyword fglKeyword SysProcBody SysProcPlan SysProcedures SysReferences SysRoleAuth86syn keyword fglKeyword SysSynTable SysSynonyms SysTabAuth SysTables SysTrigBody87syn keyword fglKeyword SysTriggers SysUsers SysViews SysViolations88syn keyword fglKeyword TAB TABLE TABLES TAN TEMP TEXT THEN THROUGH THRU TIME TO89syn keyword fglKeyword TODAY TOP TOTAL TRACE TRAILER TRAILING TRANSACTION TRIGGER90syn keyword fglKeyword TRIGGERS TRIM TRUE TRUNC TYPE TYPEDEF91syn keyword fglKeyword UNCOMMITTED UNCONSTRAINED UNDERLINE UNION UNIQUE UNITS UNLOAD92syn keyword fglKeyword UNLOCK UNSIGNED UP UPDATE UPSHIFT USER USING93syn keyword fglKeyword VALIDATE VALUE VALUES VARCHAR VARIABLES VARIANCE VARYING94syn keyword fglKeyword VERIFY VIEW VIOLATIONS95syn keyword fglKeyword WAIT WAITING WARNING WEEKDAY WHEN WHENEVER WHERE WHILE WHITE96syn keyword fglKeyword WINDOW WITH WITHOUT WORDWRAP WORK WRAP WRITE97syn keyword fglKeyword YEAR YELLOW98syn keyword fglKeyword ZEROFILL99 100" Strings and characters:101syn region fglString		start=+"+  skip=+\\\\\|\\"+  end=+"+102syn region fglString		start=+'+  skip=+\\\\\|\\"+  end=+'+103 104" Numbers:105syn match fglNumber		"-\=\<[0-9]*\.\=[0-9_]\>"106 107" Comments:108syn region fglComment    start="{"  end="}"109syn match fglComment	"--.*"110syn match fglComment	"#.*"111 112" Not a comment even though it looks like one (Dynamic 4GL/FourJs directive)113syn match fglSpecial	"--#"114syn match fglSpecial	"--@"115 116syn sync ccomment fglComment117 118" Define the default highlighting.119" Only when an item doesn't have highlighting yet120 121hi def link fglComment	Comment122"hi def link fglKeyword	fglSpecial123hi def link fglKeyword	fglStatement124hi def link fglNumber	Number125hi def link fglOperator	fglStatement126hi def link fglSpecial	Special127hi def link fglStatement	Statement128hi def link fglString	String129hi def link fglType	Type130 131 132let b:current_syntax = "fgl"133 134" vim: ts=8135