Mercurial > vim
annotate runtime/syntax/forth.vim @ 32523:626c2806d2c1 v9.0.1593
patch 9.0.1593: MS-Windows: assert error when compiled with debug mode
Commit: https://github.com/vim/vim/commit/3c240f608c38ef1af67e112e0e689751c003f946
Author: K.Takata <kentkt@csc.jp>
Date: Wed May 31 12:47:45 2023 +0100
patch 9.0.1593: MS-Windows: assert error when compiled with debug mode
Problem: MS-Windows: assert error when compiled with debug mode.
Solution: Adjust arguments to setvbuf(). (Ken Takata, closes https://github.com/vim/vim/issues/12467)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Wed, 31 May 2023 14:00:06 +0200 |
| parents | cc751d944b7e |
| children | 1549d0cc5fc7 |
| rev | line source |
|---|---|
| 7 | 1 " Vim syntax file |
| 2 " Language: FORTH | |
| 13566 | 3 " Current Maintainer: Johan Kotlinski <kotlinski@gmail.com> |
| 31885 | 4 " Previous Maintainer: Christian V. J. Br�ssow <cvjb@cvjb.de> |
| 5 " Last Change: 2023-01-12 | |
| 7 | 6 " Filenames: *.fs,*.ft |
| 13566 | 7 " URL: https://github.com/jkotlinski/forth.vim |
| 7 | 8 |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3557
diff
changeset
|
9 " quit when a syntax file was already loaded |
|
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3557
diff
changeset
|
10 if exists("b:current_syntax") |
| 7 | 11 finish |
| 12 endif | |
| 13 | |
| 3256 | 14 let s:cpo_save = &cpo |
| 15 set cpo&vim | |
| 16 | |
| 7 | 17 " Synchronization method |
| 15 | 18 syn sync ccomment |
| 19 syn sync maxlines=200 | |
| 7 | 20 |
| 21 " I use gforth, so I set this to case ignore | |
| 22 syn case ignore | |
| 23 | |
| 24 " Some special, non-FORTH keywords | |
| 25 syn keyword forthTodo contained TODO FIXME XXX | |
| 26 | |
| 27 " Characters allowed in keywords | |
| 1698 | 28 " I don't know if 128-255 are allowed in ANS-FORTH |
|
10048
43efa4f5a8ea
commit https://github.com/vim/vim/commit/89bcfda6834aba724d12554a34b9ed49f5789fd5
Christian Brabandt <cb@256bit.org>
parents:
3557
diff
changeset
|
29 setlocal iskeyword=!,@,33-35,%,$,38-64,A-Z,91-96,a-z,123-126,128-255 |
| 7 | 30 |
| 1620 | 31 " when wanted, highlight trailing white space |
| 32 if exists("forth_space_errors") | |
| 33 if !exists("forth_no_trail_space_error") | |
| 34 syn match forthSpaceError display excludenl "\s\+$" | |
| 35 endif | |
| 36 if !exists("forth_no_tab_space_error") | |
| 37 syn match forthSpaceError display " \+\t"me=e-1 | |
| 38 endif | |
| 39 endif | |
| 7 | 40 |
| 41 " Keywords | |
| 42 | |
| 43 " basic mathematical and logical operators | |
| 44 syn keyword forthOperators + - * / MOD /MOD NEGATE ABS MIN MAX | |
| 1698 | 45 syn keyword forthOperators AND OR XOR NOT LSHIFT RSHIFT INVERT 2* 2/ 1+ |
| 46 syn keyword forthOperators 1- 2+ 2- 8* UNDER+ | |
| 7 | 47 syn keyword forthOperators M+ */ */MOD M* UM* M*/ UM/MOD FM/MOD SM/REM |
| 1698 | 48 syn keyword forthOperators D+ D- DNEGATE DABS DMIN DMAX D2* D2/ |
| 7 | 49 syn keyword forthOperators F+ F- F* F/ FNEGATE FABS FMAX FMIN FLOOR FROUND |
| 50 syn keyword forthOperators F** FSQRT FEXP FEXPM1 FLN FLNP1 FLOG FALOG FSIN | |
| 51 syn keyword forthOperators FCOS FSINCOS FTAN FASIN FACOS FATAN FATAN2 FSINH | |
| 1698 | 52 syn keyword forthOperators FCOSH FTANH FASINH FACOSH FATANH F2* F2/ 1/F |
| 53 syn keyword forthOperators F~REL F~ABS F~ | |
| 54 syn keyword forthOperators 0< 0<= 0<> 0= 0> 0>= < <= <> = > >= U< U<= | |
| 55 syn keyword forthOperators U> U>= D0< D0<= D0<> D0= D0> D0>= D< D<= D<> | |
| 56 syn keyword forthOperators D= D> D>= DU< DU<= DU> DU>= WITHIN ?NEGATE | |
| 13566 | 57 syn keyword forthOperators ?DNEGATE TRUE FALSE |
| 58 | |
| 59 " various words that take an input and do something with it | |
| 60 syn keyword forthFunction . U. .R U.R | |
| 7 | 61 |
| 62 " stack manipulations | |
| 63 syn keyword forthStack DROP NIP DUP OVER TUCK SWAP ROT -ROT ?DUP PICK ROLL | |
| 1698 | 64 syn keyword forthStack 2DROP 2NIP 2DUP 2OVER 2TUCK 2SWAP 2ROT 2-ROT |
| 65 syn keyword forthStack 3DUP 4DUP 5DUP 3DROP 4DROP 5DROP 8DROP 4SWAP 4ROT | |
| 66 syn keyword forthStack 4-ROT 4TUCK 8SWAP 8DUP | |
| 7 | 67 syn keyword forthRStack >R R> R@ RDROP 2>R 2R> 2R@ 2RDROP |
| 1698 | 68 syn keyword forthRstack 4>R 4R> 4R@ 4RDROP |
| 7 | 69 syn keyword forthFStack FDROP FNIP FDUP FOVER FTUCK FSWAP FROT |
| 70 | |
| 71 " stack pointer manipulations | |
| 13566 | 72 syn keyword forthSP SP@ SP! FP@ FP! RP@ RP! LP@ LP! DEPTH |
| 7 | 73 |
| 74 " address operations | |
| 75 syn keyword forthMemory @ ! +! C@ C! 2@ 2! F@ F! SF@ SF! DF@ DF! | |
| 76 syn keyword forthAdrArith CHARS CHAR+ CELLS CELL+ CELL ALIGN ALIGNED FLOATS | |
| 77 syn keyword forthAdrArith FLOAT+ FLOAT FALIGN FALIGNED SFLOATS SFLOAT+ | |
| 78 syn keyword forthAdrArith SFALIGN SFALIGNED DFLOATS DFLOAT+ DFALIGN DFALIGNED | |
| 79 syn keyword forthAdrArith MAXALIGN MAXALIGNED CFALIGN CFALIGNED | |
| 80 syn keyword forthAdrArith ADDRESS-UNIT-BITS ALLOT ALLOCATE HERE | |
| 13566 | 81 syn keyword forthMemBlks MOVE ERASE CMOVE CMOVE> FILL BLANK UNUSED |
| 7 | 82 |
| 83 " conditionals | |
| 84 syn keyword forthCond IF ELSE ENDIF THEN CASE OF ENDOF ENDCASE ?DUP-IF | |
| 85 syn keyword forthCond ?DUP-0=-IF AHEAD CS-PICK CS-ROLL CATCH THROW WITHIN | |
| 86 | |
| 87 " iterations | |
| 88 syn keyword forthLoop BEGIN WHILE REPEAT UNTIL AGAIN | |
| 89 syn keyword forthLoop ?DO LOOP I J K +DO U+DO -DO U-DO DO +LOOP -LOOP | |
| 13566 | 90 syn keyword forthLoop UNLOOP LEAVE ?LEAVE EXIT DONE FOR NEXT RECURSE |
| 7 | 91 |
| 92 " new words | |
| 1698 | 93 syn match forthClassDef '\<:class\s*[^ \t]\+\>' |
| 94 syn match forthObjectDef '\<:object\s*[^ \t]\+\>' | |
| 7 | 95 syn match forthColonDef '\<:m\?\s*[^ \t]\+\>' |
| 96 syn keyword forthEndOfColonDef ; ;M ;m | |
| 1698 | 97 syn keyword forthEndOfClassDef ;class |
| 98 syn keyword forthEndOfObjectDef ;object | |
| 99 syn keyword forthDefine CONSTANT 2CONSTANT FCONSTANT VARIABLE 2VARIABLE | |
| 31885 | 100 syn keyword forthDefine FVARIABLE CREATE USER VALUE TO DEFER IS <BUILDS DOES> IMMEDIATE |
| 1698 | 101 syn keyword forthDefine COMPILE-ONLY COMPILE RESTRICT INTERPRET POSTPONE EXECUTE |
| 102 syn keyword forthDefine LITERAL CREATE-INTERPRET/COMPILE INTERPRETATION> | |
| 103 syn keyword forthDefine <INTERPRETATION COMPILATION> <COMPILATION ] LASTXT | |
| 104 syn keyword forthDefine COMP' POSTPONE, FIND-NAME NAME>INT NAME?INT NAME>COMP | |
| 13566 | 105 syn keyword forthDefine NAME>STRING STATE C; CVARIABLE BUFFER: MARKER |
| 106 syn keyword forthDefine , 2, F, C, COMPILE, | |
| 31885 | 107 syn match forthDefine "\[DEFINED]" |
| 108 syn match forthDefine "\[UNDEFINED]" | |
| 109 syn match forthDefine "\[IF]" | |
| 1698 | 110 syn match forthDefine "\[IFDEF]" |
| 111 syn match forthDefine "\[IFUNDEF]" | |
| 112 syn match forthDefine "\[THEN]" | |
| 113 syn match forthDefine "\[ENDIF]" | |
| 114 syn match forthDefine "\[ELSE]" | |
| 115 syn match forthDefine "\[?DO]" | |
| 116 syn match forthDefine "\[DO]" | |
| 117 syn match forthDefine "\[LOOP]" | |
| 118 syn match forthDefine "\[+LOOP]" | |
| 119 syn match forthDefine "\[NEXT]" | |
| 120 syn match forthDefine "\[BEGIN]" | |
| 121 syn match forthDefine "\[UNTIL]" | |
| 122 syn match forthDefine "\[AGAIN]" | |
| 123 syn match forthDefine "\[WHILE]" | |
| 124 syn match forthDefine "\[REPEAT]" | |
| 7 | 125 syn match forthDefine "\[COMP']" |
| 126 syn match forthDefine "'" | |
| 127 syn match forthDefine '\<\[\>' | |
| 128 syn match forthDefine "\[']" | |
| 129 syn match forthDefine '\[COMPILE]' | |
| 13566 | 130 syn match forthDefine '\[CHAR]' |
| 7 | 131 |
| 132 " debugging | |
| 133 syn keyword forthDebug PRINTDEBUGDATA PRINTDEBUGLINE | |
| 134 syn match forthDebug "\<\~\~\>" | |
| 135 | |
| 136 " Assembler | |
| 137 syn keyword forthAssembler ASSEMBLER CODE END-CODE ;CODE FLUSH-ICACHE C, | |
| 138 | |
| 139 " basic character operations | |
| 140 syn keyword forthCharOps (.) CHAR EXPECT FIND WORD TYPE -TRAILING EMIT KEY | |
| 13566 | 141 syn keyword forthCharOps KEY? TIB CR BL COUNT SPACE SPACES |
| 7 | 142 " recognize 'char (' or '[char] (' correctly, so it doesn't |
| 143 " highlight everything after the paren as a comment till a closing ')' | |
| 144 syn match forthCharOps '\<char\s\S\s' | |
| 145 syn match forthCharOps '\<\[char\]\s\S\s' | |
| 146 syn region forthCharOps start=+."\s+ skip=+\\"+ end=+"+ | |
| 147 | |
| 148 " char-number conversion | |
| 3256 | 149 syn keyword forthConversion <<# <# # #> #>> #S (NUMBER) (NUMBER?) CONVERT D>F |
| 1698 | 150 syn keyword forthConversion D>S DIGIT DPL F>D HLD HOLD NUMBER S>D SIGN >NUMBER |
| 13566 | 151 syn keyword forthConversion F>S S>F HOLDS |
| 7 | 152 |
|
2229
d45902a5c61c
Fix a few more things for persistent undo.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
153 " interpreter, wordbook, compiler |
| 7 | 154 syn keyword forthForth (LOCAL) BYE COLD ABORT >BODY >NEXT >LINK CFA >VIEW HERE |
| 155 syn keyword forthForth PAD WORDS VIEW VIEW> N>LINK NAME> LINK> L>NAME FORGET | |
| 1698 | 156 syn keyword forthForth BODY> ASSERT( ASSERT0( ASSERT1( ASSERT2( ASSERT3( ) |
| 13566 | 157 syn keyword forthForth >IN ACCEPT ENVIRONMENT? EVALUATE QUIT SOURCE ACTION-OF |
| 158 syn keyword forthForth DEFER! DEFER@ PARSE PARSE-NAME REFILL RESTORE-INPUT | |
| 159 syn keyword forthForth SAVE-INPUT SOURCE-ID | |
| 7 | 160 syn region forthForth start=+ABORT"\s+ skip=+\\"+ end=+"+ |
| 161 | |
| 162 " vocabularies | |
| 163 syn keyword forthVocs ONLY FORTH ALSO ROOT SEAL VOCS ORDER CONTEXT #VOCS | |
| 164 syn keyword forthVocs VOCABULARY DEFINITIONS | |
| 165 | |
| 1698 | 166 " File keywords |
| 3256 | 167 syn keyword forthFileMode R/O R/W W/O BIN |
| 1698 | 168 syn keyword forthFileWords OPEN-FILE CREATE-FILE CLOSE-FILE DELETE-FILE |
| 169 syn keyword forthFileWords RENAME-FILE READ-FILE READ-LINE KEY-FILE | |
| 170 syn keyword forthFileWords KEY?-FILE WRITE-FILE WRITE-LINE EMIT-FILE | |
| 171 syn keyword forthFileWords FLUSH-FILE FILE-STATUS FILE-POSITION | |
| 172 syn keyword forthFileWords REPOSITION-FILE FILE-SIZE RESIZE-FILE | |
| 173 syn keyword forthFileWords SLURP-FILE SLURP-FID STDIN STDOUT STDERR | |
| 13566 | 174 syn keyword forthFileWords INCLUDE-FILE INCLUDED REQUIRED |
| 1698 | 175 syn keyword forthBlocks OPEN-BLOCKS USE LOAD --> BLOCK-OFFSET |
| 176 syn keyword forthBlocks GET-BLOCK-FID BLOCK-POSITION LIST SCR BLOCK | |
| 177 syn keyword forthBlocks BUFER EMPTY-BUFFERS EMPTY-BUFFER UPDATE UPDATED? | |
| 178 syn keyword forthBlocks SAVE-BUFFERS SAVE-BUFFER FLUSH THRU +LOAD +THRU | |
| 13566 | 179 syn keyword forthBlocks BLOCK-INCLUDED BLK |
| 1698 | 180 |
| 7 | 181 " numbers |
| 182 syn keyword forthMath DECIMAL HEX BASE | |
| 13566 | 183 syn match forthInteger '\<-\=[0-9]\+.\=\>' |
| 184 syn match forthInteger '\<&-\=[0-9]\+.\=\>' | |
| 31885 | 185 syn match forthInteger '\<#-\=[0-9]\+.\=\>' |
| 7 | 186 " recognize hex and binary numbers, the '$' and '%' notation is for gforth |
| 25773 | 187 syn match forthInteger '\<\$\x*\x\+\>' " *1* --- don't mess |
| 7 | 188 syn match forthInteger '\<\x*\d\x*\>' " *2* --- this order! |
| 189 syn match forthInteger '\<%[0-1]*[0-1]\+\>' | |
| 1698 | 190 syn match forthFloat '\<-\=\d*[.]\=\d\+[DdEe]\d\+\>' |
| 191 syn match forthFloat '\<-\=\d*[.]\=\d\+[DdEe][-+]\d\+\>' | |
| 192 | |
| 13566 | 193 " XXX If you find this overkill you can remove it. this has to come after the |
| 1698 | 194 " highlighting for numbers otherwise it has no effect. |
| 195 syn region forthComment start='0 \[if\]' end='\[endif\]' end='\[then\]' contains=forthTodo | |
| 7 | 196 |
| 197 " Strings | |
| 31885 | 198 syn region forthString start=+\.*\"+ end=+"+ end=+$+ contains=@Spell |
| 7 | 199 " XXX |
| 31885 | 200 syn region forthString start=+s\"+ end=+"+ end=+$+ contains=@Spell |
| 201 syn region forthString start=+s\\\"+ end=+"+ end=+$+ contains=@Spell | |
| 202 syn region forthString start=+c\"+ end=+"+ end=+$+ contains=@Spell | |
| 7 | 203 |
| 204 " Comments | |
| 31885 | 205 syn match forthComment '\\\%(\s.*\)\=$' contains=@Spell,forthTodo,forthSpaceError |
| 206 syn region forthComment start='\\S\s' end='.*' contains=@Spell,forthTodo,forthSpaceError | |
| 207 syn match forthComment '\.(\s[^)]*)' contains=@Spell,forthTodo,forthSpaceError | |
| 208 syn region forthComment start='\(^\|\s\)\zs(\s' skip='\\)' end=')' contains=@Spell,forthTodo,forthSpaceError | |
| 209 syn region forthComment start='/\*' end='\*/' contains=@Spell,forthTodo,forthSpaceError | |
| 7 | 210 |
| 211 " Include files | |
| 212 syn match forthInclude '^INCLUDE\s\+\k\+' | |
| 13566 | 213 syn match forthInclude '^REQUIRE\s\+\k\+' |
| 214 syn match forthInclude '^FLOAD\s\+' | |
| 215 syn match forthInclude '^NEEDS\s\+' | |
| 7 | 216 |
| 1698 | 217 " Locals definitions |
| 218 syn region forthLocals start='{\s' start='{$' end='\s}' end='^}' | |
| 219 syn match forthLocals '{ }' " otherwise, at least two spaces between | |
| 220 syn region forthDeprecated start='locals|' end='|' | |
| 221 | |
| 7 | 222 " Define the default highlighting. |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
223 hi def link forthTodo Todo |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
224 hi def link forthOperators Operator |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
225 hi def link forthMath Number |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
226 hi def link forthInteger Number |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
227 hi def link forthFloat Float |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
228 hi def link forthStack Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
229 hi def link forthRstack Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
230 hi def link forthFStack Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
231 hi def link forthSP Special |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
232 hi def link forthMemory Function |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
233 hi def link forthAdrArith Function |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
234 hi def link forthMemBlks Function |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
235 hi def link forthCond Conditional |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
236 hi def link forthLoop Repeat |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
237 hi def link forthColonDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
238 hi def link forthEndOfColonDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
239 hi def link forthDefine Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
240 hi def link forthDebug Debug |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
241 hi def link forthAssembler Include |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
242 hi def link forthCharOps Character |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
243 hi def link forthConversion String |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
244 hi def link forthForth Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
245 hi def link forthVocs Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
246 hi def link forthString String |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
247 hi def link forthComment Comment |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
248 hi def link forthClassDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
249 hi def link forthEndOfClassDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
250 hi def link forthObjectDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
251 hi def link forthEndOfObjectDef Define |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
252 hi def link forthInclude Include |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
253 hi def link forthLocals Type " nothing else uses type and locals must stand out |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
254 hi def link forthDeprecated Error " if you must, change to Type |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
255 hi def link forthFileMode Function |
| 13566 | 256 hi def link forthFunction Function |
|
10051
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
257 hi def link forthFileWords Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
258 hi def link forthBlocks Statement |
|
46763b01cd9a
commit https://github.com/vim/vim/commit/f37506f60f87d52a9e8850e30067645e2b13783c
Christian Brabandt <cb@256bit.org>
parents:
10048
diff
changeset
|
259 hi def link forthSpaceError Error |
| 7 | 260 |
| 261 let b:current_syntax = "forth" | |
| 262 | |
| 3256 | 263 let &cpo = s:cpo_save |
| 264 unlet s:cpo_save | |
| 7 | 265 " vim:ts=8:sw=4:nocindent:smartindent: |
| 31885 | 266 |