Mercurial > vim
comparison runtime/syntax/focexec.vim @ 7:3fc0f57ecb91 v7.0001
updated for version 7.0001
author | vimboss |
---|---|
date | Sun, 13 Jun 2004 20:20:40 +0000 |
parents | |
children | 7bc41231fbc7 |
comparison
equal
deleted
inserted
replaced
6:c2daee826b8f | 7:3fc0f57ecb91 |
---|---|
1 " Vim syntax file | |
2 " Language: Focus Executable | |
3 " Maintainer: Rob Brady <robb@datatone.com> | |
4 " Last Change: $Date$ | |
5 " URL: http://www.datatone.com/~robb/vim/syntax/focexec.vim | |
6 " $Revision$ | |
7 | |
8 " this is a very simple syntax file - I will be improving it | |
9 " one thing is how to do computes | |
10 " I don't like that &vars and FUSE() functions highlight to the same color | |
11 " I think some of these things should get different hilights - | |
12 " should MODIFY commands look different than TABLE? | |
13 | |
14 " For version 5.x: Clear all syntax items | |
15 " For version 6.x: Quit when a syntax file was already loaded | |
16 if version < 600 | |
17 syntax clear | |
18 elseif exists("b:current_syntax") | |
19 finish | |
20 endif | |
21 | |
22 syn case match | |
23 | |
24 " A bunch of useful keywords | |
25 syn keyword focexecTable TABLE SUM BY ACROSS END PRINT HOLD LIST NOPRINT | |
26 syn keyword focexecTable SUBFOOT SUBHEAD HEADING FOOTING PAGE-BREAK AS | |
27 syn keyword focexecTable WHERE AND OR NOSPLIT FORMAT | |
28 syn keyword focexecModify MODIFY DATA ON FIXFORM PROMPT MATCH COMPUTE | |
29 syn keyword focexecModify GOTO CASE ENDCASE TYPE NOMATCH REJECT INCLUDE | |
30 syn keyword focexecModify CONTINUE FROM | |
31 syn keyword focexecNormal CHECK FILE CREATE EX SET IF FILEDEF DEFINE | |
32 syn keyword focexecNormal REBUILD IF RECORDLIMIT FI EQ JOIN | |
33 syn keyword focexecJoin IN TO | |
34 syn keyword focexecFileDef DISK | |
35 syn keyword focexecSet MSG ALL | |
36 syn match focexecDash "-RUN" | |
37 syn match focexecDash "-PROMPT" | |
38 syn match focexecDash "-WINFORM" | |
39 | |
40 " String and Character constants | |
41 syn region focexecString1 start=+"+ end=+"+ | |
42 syn region focexecString2 start=+'+ end=+'+ | |
43 | |
44 "amper variables | |
45 syn match focexecAmperVar "&&\=[A-Z_]\+" | |
46 | |
47 "fuse functions | |
48 syn keyword focexecFuse GETUSER GETUSR WHOAMI FEXERR ASIS GETTOK UPCASE LOCASE | |
49 syn keyword focexecFuse SUBSTR TODAY TODAYI POSIT HHMMSS BYTVAL EDAUT1 BITVAL | |
50 syn keyword focexecFuse BITSON FGETENV FPUTENV HEXBYT SPAWN YM YMI JULDAT | |
51 syn keyword focexecFuse JULDATI DOWK DOWKI DOWKLI CHGDAT CHGDATI FTOA ATODBL | |
52 syn keyword focexecFuse SOUNDEX RJUST REVERSE PARAG OVRLAY LJUST CTRFLD CTRAN | |
53 syn keyword focexecFuse CHKFMT ARGLEN GREGDT GREGDTI DTYMD DTYMDI DTDMY DTDMYI | |
54 syn keyword focexecFuse DTYDM DTYDMI DTMYD DTMYDI DTDYM DTDYMI DAYMD DAYMDI | |
55 syn keyword focexecFuse DAMDY DAMDYI DADMY DADMYI AYM AYMI AYMD AYMDI CHKPCK | |
56 syn keyword focexecFuse IMOD FMOD DMOD PCKOUT EXP BAR SPELLNM SPELLNUM RTCIVP | |
57 syn keyword focexecFuse PRDUNI PRDNOR RDNORM RDUNIF LCWORD ITOZ RLPHLD IBIPRO | |
58 syn keyword focexecFuse IBIPRW IBIPRC IBIPRU IBIRCP PTHDAT ITOPACK ITONUM | |
59 syn keyword focexecFuse DSMEXEC DSMEVAL DSMERRC MSMEXEC MSMEVAL MSMERRC EXTDXI | |
60 syn keyword focexecFuse BAANHASH EDAYSI DTOG GTOD HSETPT HPART HTIME HNAME | |
61 syn keyword focexecFuse HADD HDIFF HDATE HGETC HCNVRT HDTTM HMIDNT TEMPPATH | |
62 syn keyword focexecFuse DATEADD DATEDIF DATEMOV DATECVT EURHLD EURXCH FINDFOC | |
63 syn keyword focexecFuse FERRMES CNCTUSR CURRPATH USERPATH SYSTEM ASKYN | |
64 syn keyword focexecFuse FUSEMENU POPEDIT POPFILE | |
65 | |
66 syn match focexecNumber "\<\d\+\>" | |
67 syn match focexecNumber "\<\d\+\.\d*\>" | |
68 | |
69 syn match focexecComment "-\*.*" | |
70 | |
71 " Define the default highlighting. | |
72 " For version 5.7 and earlier: only when not done already | |
73 " For version 5.8 and later: only when an item doesn't have highlighting yet | |
74 if version >= 508 || !exists("did_focexec_syntax_inits") | |
75 if version < 508 | |
76 let did_focexec_syntax_inits = 1 | |
77 command -nargs=+ HiLink hi link <args> | |
78 else | |
79 command -nargs=+ HiLink hi def link <args> | |
80 endif | |
81 | |
82 HiLink focexecString1 String | |
83 HiLink focexecString2 String | |
84 HiLink focexecNumber Number | |
85 HiLink focexecComment Comment | |
86 HiLink focexecTable Keyword | |
87 HiLink focexecModify Keyword | |
88 HiLink focexecNormal Keyword | |
89 HiLink focexecSet Keyword | |
90 HiLink focexecDash Keyword | |
91 HiLink focexecFileDef Keyword | |
92 HiLink focexecJoin Keyword | |
93 HiLink focexecAmperVar Identifier | |
94 HiLink focexecFuse Function | |
95 | |
96 delcommand HiLink | |
97 endif | |
98 | |
99 let b:current_syntax = "focexec" | |
100 | |
101 " vim: ts=8 |