mirror of
https://github.com/vim/vim.git
synced 2025-09-29 04:34:16 -04:00
updated for version 7.0001
This commit is contained in:
Bram Moolenaar
147
runtime/syntax/fgl.vim
Normal file
147
runtime/syntax/fgl.vim
Normal file
@@ -0,0 +1,147 @@
|
||||
" Vim syntax file
|
||||
" Language: Informix 4GL
|
||||
" Maintainer: Rafal M. Sulejman <rms@poczta.onet.pl>
|
||||
" Update: 26 Sep 2002
|
||||
" Changes:
|
||||
" - Dynamic 4GL/FourJs/4GL 7.30 pseudo comment directives (Julian Bridle)
|
||||
" - Conditionally allow case insensitive keywords (Julian Bridle)
|
||||
"
|
||||
|
||||
" 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
|
||||
|
||||
if exists("fgl_ignore_case")
|
||||
syntax case ignore
|
||||
else
|
||||
syntax case match
|
||||
endif
|
||||
syn keyword fglKeyword ABORT ABS ABSOLUTE ACCEPT ACCESS ACOS ADD AFTER ALL
|
||||
syn keyword fglKeyword ALLOCATE ALTER AND ANSI ANY APPEND ARG_VAL ARRAY ARR_COUNT
|
||||
syn keyword fglKeyword ARR_CURR AS ASC ASCENDING ASCII ASIN AT ATAN ATAN2 ATTACH
|
||||
syn keyword fglKeyword ATTRIBUTE ATTRIBUTES AUDIT AUTHORIZATION AUTO AUTONEXT AVERAGE AVG
|
||||
syn keyword fglKeyword BEFORE BEGIN BETWEEN BLACK BLINK BLUE BOLD BORDER BOTH BOTTOM
|
||||
syn keyword fglKeyword BREAK BUFFERED BY BYTE
|
||||
syn keyword fglKeyword CALL CASCADE CASE CHAR CHARACTER CHARACTER_LENGTH CHAR_LENGTH
|
||||
syn keyword fglKeyword CHECK CLASS_ORIGIN CLEAR CLIPPED CLOSE CLUSTER COLOR
|
||||
syn keyword fglKeyword COLUMN COLUMNS COMMAND COMMENT COMMENTS COMMIT COMMITTED
|
||||
syn keyword fglKeyword COMPOSITES COMPRESS CONCURRENT CONNECT CONNECTION
|
||||
syn keyword fglKeyword CONNECTION_ALIAS CONSTRAINED CONSTRAINT CONSTRAINTS CONSTRUCT
|
||||
syn keyword fglKeyword CONTINUE CONTROL COS COUNT CREATE CURRENT CURSOR CYAN
|
||||
syn keyword fglKeyword DATA DATABASE DATASKIP DATE DATETIME DAY DBA DBINFO DBSERVERNAME
|
||||
syn keyword fglKeyword DEALLOCATE DEBUG DEC DECIMAL DECLARE DEFAULT DEFAULTS DEFER
|
||||
syn keyword fglKeyword DEFERRED DEFINE DELETE DELIMITER DELIMITERS DESC DESCENDING
|
||||
syn keyword fglKeyword DESCRIBE DESCRIPTOR DETACH DIAGNOSTICS DIM DIRTY DISABLED
|
||||
syn keyword fglKeyword DISCONNECT DISPLAY DISTINCT DISTRIBUTIONS DO DORMANT DOUBLE
|
||||
syn keyword fglKeyword DOWN DOWNSHIFT DROP
|
||||
syn keyword fglKeyword EACH ELIF ELSE ENABLED END ENTRY ERROR ERRORLOG ERR_GET
|
||||
syn keyword fglKeyword ERR_PRINT ERR_QUIT ESC ESCAPE EVERY EXCEPTION EXCLUSIVE
|
||||
syn keyword fglKeyword EXEC EXECUTE EXISTS EXIT EXP EXPLAIN EXPRESSION EXTEND EXTENT
|
||||
syn keyword fglKeyword EXTERN EXTERNAL
|
||||
syn keyword fglKeyword F1 F10 F11 F12 F13 F14 F15 F16 F17 F18 F19 F2 F20 F21 F22 F23
|
||||
syn keyword fglKeyword F24 F25 F26 F27 F28 F29 F3 F30 F31 F32 F33 F34 F35 F36 F37 F38
|
||||
syn keyword fglKeyword F39 F4 F40 F41 F42 F43 F44 F45 F46 F47 F48 F49 F5 F50 F51 F52
|
||||
syn keyword fglKeyword F53 F54 F55 F56 F57 F58 F59 F6 F60 F61 F62 F63 F64 F7 F8 F9
|
||||
syn keyword fglKeyword FALSE FETCH FGL_GETENV FGL_KEYVAL FGL_LASTKEY FIELD FIELD_TOUCHED
|
||||
syn keyword fglKeyword FILE FILLFACTOR FILTERING FINISH FIRST FLOAT FLUSH FOR
|
||||
syn keyword fglKeyword FOREACH FOREIGN FORM FORMAT FORMONLY FORTRAN FOUND FRACTION
|
||||
syn keyword fglKeyword FRAGMENT FREE FROM FUNCTION GET_FLDBUF GLOBAL GLOBALS GO GOTO
|
||||
syn keyword fglKeyword GRANT GREEN GROUP HAVING HEADER HELP HEX HIDE HIGH HOLD HOUR
|
||||
syn keyword fglKeyword IDATA IF ILENGTH IMMEDIATE IN INCLUDE INDEX INDEXES INDICATOR
|
||||
syn keyword fglKeyword INFIELD INIT INITIALIZE INPUT INSERT INSTRUCTIONS INT INTEGER
|
||||
syn keyword fglKeyword INTERRUPT INTERVAL INTO INT_FLAG INVISIBLE IS ISAM ISOLATION
|
||||
syn keyword fglKeyword ITYPE
|
||||
syn keyword fglKeyword KEY LABEL
|
||||
syn keyword fglKeyword LANGUAGE LAST LEADING LEFT LENGTH LET LIKE LINE
|
||||
syn keyword fglKeyword LINENO LINES LOAD LOCATE LOCK LOG LOG10 LOGN LONG LOW
|
||||
syn keyword fglKeyword MAGENTA MAIN MARGIN MATCHES MAX MDY MEDIUM MEMORY MENU MESSAGE
|
||||
syn keyword fglKeyword MESSAGE_LENGTH MESSAGE_TEXT MIN MINUTE MOD MODE MODIFY MODULE
|
||||
syn keyword fglKeyword MONEY MONTH MORE
|
||||
syn keyword fglKeyword NAME NCHAR NEED NEW NEXT NEXTPAGE NO NOCR NOENTRY NONE NORMAL
|
||||
syn keyword fglKeyword NOT NOTFOUND NULL NULLABLE NUMBER NUMERIC NUM_ARGS NVARCHAR
|
||||
syn keyword fglKeyword OCTET_LENGTH OF OFF OLD ON ONLY OPEN OPTIMIZATION OPTION OPTIONS
|
||||
syn keyword fglKeyword OR ORDER OTHERWISE OUTER OUTPUT
|
||||
syn keyword fglKeyword PAGE PAGENO PAUSE PDQPRIORITY PERCENT PICTURE PIPE POW PRECISION
|
||||
syn keyword fglKeyword PREPARE PREVIOUS PREVPAGE PRIMARY PRINT PRINTER PRIOR PRIVATE
|
||||
syn keyword fglKeyword PRIVILEGES PROCEDURE PROGRAM PROMPT PUBLIC PUT
|
||||
syn keyword fglKeyword QUIT QUIT_FLAG
|
||||
syn keyword fglKeyword RAISE RANGE READ READONLY REAL RECORD RECOVER RED REFERENCES
|
||||
syn keyword fglKeyword REFERENCING REGISTER RELATIVE REMAINDER REMOVE RENAME REOPTIMIZATION
|
||||
syn keyword fglKeyword REPEATABLE REPORT REQUIRED RESOLUTION RESOURCE RESTRICT
|
||||
syn keyword fglKeyword RESUME RETURN RETURNED_SQLSTATE RETURNING REVERSE REVOKE RIGHT
|
||||
syn keyword fglKeyword ROBIN ROLE ROLLBACK ROLLFORWARD ROOT ROUND ROW ROWID ROWIDS
|
||||
syn keyword fglKeyword ROWS ROW_COUNT RUN
|
||||
syn keyword fglKeyword SCALE SCHEMA SCREEN SCROLL SCR_LINE SECOND SECTION SELECT
|
||||
syn keyword fglKeyword SERIAL SERIALIZABLE SERVER_NAME SESSION SET SET_COUNT SHARE
|
||||
syn keyword fglKeyword SHORT SHOW SITENAME SIZE SIZEOF SKIP SLEEP SMALLFLOAT SMALLINT
|
||||
syn keyword fglKeyword SOME SPACE SPACES SQL SQLAWARN SQLCA SQLCODE SQLERRD SQLERRM
|
||||
syn keyword fglKeyword SQLERROR SQLERRP SQLSTATE SQLWARNING SQRT STABILITY START
|
||||
syn keyword fglKeyword STARTLOG STATIC STATISTICS STATUS STDEV STEP STOP STRING STRUCT
|
||||
syn keyword fglKeyword SUBCLASS_ORIGIN SUM SWITCH SYNONYM SYSTEM
|
||||
syn keyword fglKeyword SysBlobs SysChecks SysColAuth SysColDepend SysColumns
|
||||
syn keyword fglKeyword SysConstraints SysDefaults SysDepend SysDistrib SysFragAuth
|
||||
syn keyword fglKeyword SysFragments SysIndexes SysObjState SysOpClstr SysProcAuth
|
||||
syn keyword fglKeyword SysProcBody SysProcPlan SysProcedures SysReferences SysRoleAuth
|
||||
syn keyword fglKeyword SysSynTable SysSynonyms SysTabAuth SysTables SysTrigBody
|
||||
syn keyword fglKeyword SysTriggers SysUsers SysViews SysViolations
|
||||
syn keyword fglKeyword TAB TABLE TABLES TAN TEMP TEXT THEN THROUGH THRU TIME TO
|
||||
syn keyword fglKeyword TODAY TOP TOTAL TRACE TRAILER TRAILING TRANSACTION TRIGGER
|
||||
syn keyword fglKeyword TRIGGERS TRIM TRUE TRUNC TYPE TYPEDEF
|
||||
syn keyword fglKeyword UNCOMMITTED UNCONSTRAINED UNDERLINE UNION UNIQUE UNITS UNLOAD
|
||||
syn keyword fglKeyword UNLOCK UNSIGNED UP UPDATE UPSHIFT USER USING
|
||||
syn keyword fglKeyword VALIDATE VALUE VALUES VARCHAR VARIABLES VARIANCE VARYING
|
||||
syn keyword fglKeyword VERIFY VIEW VIOLATIONS
|
||||
syn keyword fglKeyword WAIT WAITING WARNING WEEKDAY WHEN WHENEVER WHERE WHILE WHITE
|
||||
syn keyword fglKeyword WINDOW WITH WITHOUT WORDWRAP WORK WRAP WRITE
|
||||
syn keyword fglKeyword YEAR YELLOW
|
||||
syn keyword fglKeyword ZEROFILL
|
||||
|
||||
" Strings and characters:
|
||||
syn region fglString start=+"+ skip=+\\\\\|\\"+ end=+"+
|
||||
syn region fglString start=+'+ skip=+\\\\\|\\"+ end=+'+
|
||||
|
||||
" Numbers:
|
||||
syn match fglNumber "-\=\<[0-9]*\.\=[0-9_]\>"
|
||||
|
||||
" Comments:
|
||||
syn region fglComment start="{" end="}"
|
||||
syn match fglComment "--.*"
|
||||
syn match fglComment "#.*"
|
||||
|
||||
" Not a comment even though it looks like one (Dynamic 4GL/FourJs directive)
|
||||
syn match fglSpecial "--#"
|
||||
syn match fglSpecial "--@"
|
||||
|
||||
syn sync ccomment fglComment
|
||||
|
||||
" 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_fgl_syntax_inits")
|
||||
if version < 508
|
||||
let did_fgl_syntax_inits = 1
|
||||
command -nargs=+ HiLink hi link <args>
|
||||
else
|
||||
command -nargs=+ HiLink hi def link <args>
|
||||
endif
|
||||
|
||||
HiLink fglComment Comment
|
||||
"HiLink fglKeyword fglSpecial
|
||||
HiLink fglKeyword fglStatement
|
||||
HiLink fglNumber Number
|
||||
HiLink fglOperator fglStatement
|
||||
HiLink fglSpecial Special
|
||||
HiLink fglStatement Statement
|
||||
HiLink fglString String
|
||||
HiLink fglType Type
|
||||
|
||||
delcommand HiLink
|
||||
endif
|
||||
|
||||
let b:current_syntax = "fgl"
|
||||
|
||||
" vim: ts=8
|
||||
Reference in New Issue
Block a user