Mercurial > vim
annotate runtime/syntax/fgl.vim @ 11006:b3601a8eb679 v8.0.0392
patch 8.0.0392: GUI test fails with Athena and Motif
commit https://github.com/vim/vim/commit/e0c31f6a304496b597a51ce98af419ec815bec74
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Mar 1 15:07:05 2017 +0100
patch 8.0.0392: GUI test fails with Athena and Motif
Problem: GUI test fails with Athena and Motif.
Solution: Add test_ignore_error(). Use it to ignore the "failed to create
input context" error.
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Wed, 01 Mar 2017 15:15:05 +0100 |
| parents | 46763b01cd9a |
| children |
| rev | line source |
|---|---|
| 7 | 1 " Vim syntax file |
| 2 " Language: Informix 4GL | |
| 3 " Maintainer: Rafal M. Sulejman <rms@poczta.onet.pl> | |
| 4 " Update: 26 Sep 2002 | |
| 5 " Changes: | |
| 6 " - Dynamic 4GL/FourJs/4GL 7.30 pseudo comment directives (Julian Bridle) | |
| 7 " - Conditionally allow case insensitive keywords (Julian Bridle) | |
| 8 " | |
| 9 | |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
7
diff
changeset
|
10 " quit when a syntax file was already loaded |
|
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
7
diff
changeset
|
11 if exists("b:current_syntax") |
| 7 | 12 finish |
| 13 endif | |
| 14 | |
| 15 if exists("fgl_ignore_case") | |
| 16 syntax case ignore | |
| 17 else | |
| 18 syntax case match | |
| 19 endif | |
| 20 syn keyword fglKeyword ABORT ABS ABSOLUTE ACCEPT ACCESS ACOS ADD AFTER ALL | |
| 21 syn keyword fglKeyword ALLOCATE ALTER AND ANSI ANY APPEND ARG_VAL ARRAY ARR_COUNT | |
| 22 syn keyword fglKeyword ARR_CURR AS ASC ASCENDING ASCII ASIN AT ATAN ATAN2 ATTACH | |
| 23 syn keyword fglKeyword ATTRIBUTE ATTRIBUTES AUDIT AUTHORIZATION AUTO AUTONEXT AVERAGE AVG | |
| 24 syn keyword fglKeyword BEFORE BEGIN BETWEEN BLACK BLINK BLUE BOLD BORDER BOTH BOTTOM | |
| 25 syn keyword fglKeyword BREAK BUFFERED BY BYTE | |
| 26 syn keyword fglKeyword CALL CASCADE CASE CHAR CHARACTER CHARACTER_LENGTH CHAR_LENGTH | |
| 27 syn keyword fglKeyword CHECK CLASS_ORIGIN CLEAR CLIPPED CLOSE CLUSTER COLOR | |
| 28 syn keyword fglKeyword COLUMN COLUMNS COMMAND COMMENT COMMENTS COMMIT COMMITTED | |
| 29 syn keyword fglKeyword COMPOSITES COMPRESS CONCURRENT CONNECT CONNECTION | |
| 30 syn keyword fglKeyword CONNECTION_ALIAS CONSTRAINED CONSTRAINT CONSTRAINTS CONSTRUCT | |
| 31 syn keyword fglKeyword CONTINUE CONTROL COS COUNT CREATE CURRENT CURSOR CYAN | |
| 32 syn keyword fglKeyword DATA DATABASE DATASKIP DATE DATETIME DAY DBA DBINFO DBSERVERNAME | |
| 33 syn keyword fglKeyword DEALLOCATE DEBUG DEC DECIMAL DECLARE DEFAULT DEFAULTS DEFER | |
| 34 syn keyword fglKeyword DEFERRED DEFINE DELETE DELIMITER DELIMITERS DESC DESCENDING | |
| 35 syn keyword fglKeyword DESCRIBE DESCRIPTOR DETACH DIAGNOSTICS DIM DIRTY DISABLED | |
| 36 syn keyword fglKeyword DISCONNECT DISPLAY DISTINCT DISTRIBUTIONS DO DORMANT DOUBLE | |
| 37 syn keyword fglKeyword DOWN DOWNSHIFT DROP | |
| 38 syn keyword fglKeyword EACH ELIF ELSE ENABLED END ENTRY ERROR ERRORLOG ERR_GET | |
| 39 syn keyword fglKeyword ERR_PRINT ERR_QUIT ESC ESCAPE EVERY EXCEPTION EXCLUSIVE | |
| 40 syn keyword fglKeyword EXEC EXECUTE EXISTS EXIT EXP EXPLAIN EXPRESSION EXTEND EXTENT | |
| 41 syn keyword fglKeyword EXTERN EXTERNAL | |
| 42 syn keyword fglKeyword F1 F10 F11 F12 F13 F14 F15 F16 F17 F18 F19 F2 F20 F21 F22 F23 | |
| 43 syn keyword fglKeyword F24 F25 F26 F27 F28 F29 F3 F30 F31 F32 F33 F34 F35 F36 F37 F38 | |
| 44 syn keyword fglKeyword F39 F4 F40 F41 F42 F43 F44 F45 F46 F47 F48 F49 F5 F50 F51 F52 | |
| 45 syn keyword fglKeyword F53 F54 F55 F56 F57 F58 F59 F6 F60 F61 F62 F63 F64 F7 F8 F9 | |
| 46 syn keyword fglKeyword FALSE FETCH FGL_GETENV FGL_KEYVAL FGL_LASTKEY FIELD FIELD_TOUCHED | |
| 47 syn keyword fglKeyword FILE FILLFACTOR FILTERING FINISH FIRST FLOAT FLUSH FOR | |
| 48 syn keyword fglKeyword FOREACH FOREIGN FORM FORMAT FORMONLY FORTRAN FOUND FRACTION | |
| 49 syn keyword fglKeyword FRAGMENT FREE FROM FUNCTION GET_FLDBUF GLOBAL GLOBALS GO GOTO | |
| 50 syn keyword fglKeyword GRANT GREEN GROUP HAVING HEADER HELP HEX HIDE HIGH HOLD HOUR | |
| 51 syn keyword fglKeyword IDATA IF ILENGTH IMMEDIATE IN INCLUDE INDEX INDEXES INDICATOR | |
| 52 syn keyword fglKeyword INFIELD INIT INITIALIZE INPUT INSERT INSTRUCTIONS INT INTEGER | |
| 53 syn keyword fglKeyword INTERRUPT INTERVAL INTO INT_FLAG INVISIBLE IS ISAM ISOLATION | |
| 54 syn keyword fglKeyword ITYPE | |
| 55 syn keyword fglKeyword KEY LABEL | |
| 56 syn keyword fglKeyword LANGUAGE LAST LEADING LEFT LENGTH LET LIKE LINE | |
| 57 syn keyword fglKeyword LINENO LINES LOAD LOCATE LOCK LOG LOG10 LOGN LONG LOW | |
| 58 syn keyword fglKeyword MAGENTA MAIN MARGIN MATCHES MAX MDY MEDIUM MEMORY MENU MESSAGE | |
| 59 syn keyword fglKeyword MESSAGE_LENGTH MESSAGE_TEXT MIN MINUTE MOD MODE MODIFY MODULE | |
| 60 syn keyword fglKeyword MONEY MONTH MORE | |
| 61 syn keyword fglKeyword NAME NCHAR NEED NEW NEXT NEXTPAGE NO NOCR NOENTRY NONE NORMAL | |
| 62 syn keyword fglKeyword NOT NOTFOUND NULL NULLABLE NUMBER NUMERIC NUM_ARGS NVARCHAR | |
| 63 syn keyword fglKeyword OCTET_LENGTH OF OFF OLD ON ONLY OPEN OPTIMIZATION OPTION OPTIONS | |
| 64 syn keyword fglKeyword OR ORDER OTHERWISE OUTER OUTPUT | |
| 65 syn keyword fglKeyword PAGE PAGENO PAUSE PDQPRIORITY PERCENT PICTURE PIPE POW PRECISION | |
| 66 syn keyword fglKeyword PREPARE PREVIOUS PREVPAGE PRIMARY PRINT PRINTER PRIOR PRIVATE | |
| 67 syn keyword fglKeyword PRIVILEGES PROCEDURE PROGRAM PROMPT PUBLIC PUT | |
| 68 syn keyword fglKeyword QUIT QUIT_FLAG | |
| 69 syn keyword fglKeyword RAISE RANGE READ READONLY REAL RECORD RECOVER RED REFERENCES | |
| 70 syn keyword fglKeyword REFERENCING REGISTER RELATIVE REMAINDER REMOVE RENAME REOPTIMIZATION | |
| 71 syn keyword fglKeyword REPEATABLE REPORT REQUIRED RESOLUTION RESOURCE RESTRICT | |
| 72 syn keyword fglKeyword RESUME RETURN RETURNED_SQLSTATE RETURNING REVERSE REVOKE RIGHT | |
| 73 syn keyword fglKeyword ROBIN ROLE ROLLBACK ROLLFORWARD ROOT ROUND ROW ROWID ROWIDS | |
| 74 syn keyword fglKeyword ROWS ROW_COUNT RUN | |
| 75 syn keyword fglKeyword SCALE SCHEMA SCREEN SCROLL SCR_LINE SECOND SECTION SELECT | |
| 76 syn keyword fglKeyword SERIAL SERIALIZABLE SERVER_NAME SESSION SET SET_COUNT SHARE | |
| 77 syn keyword fglKeyword SHORT SHOW SITENAME SIZE SIZEOF SKIP SLEEP SMALLFLOAT SMALLINT | |
| 78 syn keyword fglKeyword SOME SPACE SPACES SQL SQLAWARN SQLCA SQLCODE SQLERRD SQLERRM | |
| 79 syn keyword fglKeyword SQLERROR SQLERRP SQLSTATE SQLWARNING SQRT STABILITY START | |
| 80 syn keyword fglKeyword STARTLOG STATIC STATISTICS STATUS STDEV STEP STOP STRING STRUCT | |
| 81 syn keyword fglKeyword SUBCLASS_ORIGIN SUM SWITCH SYNONYM SYSTEM | |
| 82 syn keyword fglKeyword SysBlobs SysChecks SysColAuth SysColDepend SysColumns | |
| 83 syn keyword fglKeyword SysConstraints SysDefaults SysDepend SysDistrib SysFragAuth | |
| 84 syn keyword fglKeyword SysFragments SysIndexes SysObjState SysOpClstr SysProcAuth | |
| 85 syn keyword fglKeyword SysProcBody SysProcPlan SysProcedures SysReferences SysRoleAuth | |
| 86 syn keyword fglKeyword SysSynTable SysSynonyms SysTabAuth SysTables SysTrigBody | |
| 87 syn keyword fglKeyword SysTriggers SysUsers SysViews SysViolations | |
| 88 syn keyword fglKeyword TAB TABLE TABLES TAN TEMP TEXT THEN THROUGH THRU TIME TO | |
| 89 syn keyword fglKeyword TODAY TOP TOTAL TRACE TRAILER TRAILING TRANSACTION TRIGGER | |
| 90 syn keyword fglKeyword TRIGGERS TRIM TRUE TRUNC TYPE TYPEDEF | |
| 91 syn keyword fglKeyword UNCOMMITTED UNCONSTRAINED UNDERLINE UNION UNIQUE UNITS UNLOAD | |
| 92 syn keyword fglKeyword UNLOCK UNSIGNED UP UPDATE UPSHIFT USER USING | |
| 93 syn keyword fglKeyword VALIDATE VALUE VALUES VARCHAR VARIABLES VARIANCE VARYING | |
| 94 syn keyword fglKeyword VERIFY VIEW VIOLATIONS | |
| 95 syn keyword fglKeyword WAIT WAITING WARNING WEEKDAY WHEN WHENEVER WHERE WHILE WHITE | |
| 96 syn keyword fglKeyword WINDOW WITH WITHOUT WORDWRAP WORK WRAP WRITE | |
| 97 syn keyword fglKeyword YEAR YELLOW | |
| 98 syn keyword fglKeyword ZEROFILL | |
| 99 | |
| 100 " Strings and characters: | |
| 101 syn region fglString start=+"+ skip=+\\\\\|\\"+ end=+"+ | |
| 102 syn region fglString start=+'+ skip=+\\\\\|\\"+ end=+'+ | |
| 103 | |
| 104 " Numbers: | |
| 105 syn match fglNumber "-\=\<[0-9]*\.\=[0-9_]\>" | |
| 106 | |
| 107 " Comments: | |
| 108 syn region fglComment start="{" end="}" | |
| 109 syn match fglComment "--.*" | |
| 110 syn match fglComment "#.*" | |
| 111 | |
| 112 " Not a comment even though it looks like one (Dynamic 4GL/FourJs directive) | |
| 113 syn match fglSpecial "--#" | |
| 114 syn match fglSpecial "--@" | |
| 115 | |
| 116 syn sync ccomment fglComment | |
| 117 | |
| 118 " Define the default highlighting. | |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
7
diff
changeset
|
119 " Only when an item doesn't have highlighting yet |
| 7 | 120 |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
121 hi def link fglComment Comment |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
122 "hi def link fglKeyword fglSpecial |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
123 hi def link fglKeyword fglStatement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
124 hi def link fglNumber Number |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
125 hi def link fglOperator fglStatement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
126 hi def link fglSpecial Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
127 hi def link fglStatement Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
128 hi def link fglString String |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
129 hi def link fglType Type |
| 7 | 130 |
| 131 | |
| 132 let b:current_syntax = "fgl" | |
| 133 | |
| 134 " vim: ts=8 |