text/x-forth
*.4th;*.forth
\\
\(
\)
(\S)
!
#
#>
#S
'
\(
\*
\*/
\*/MOD
\+
\+!
\+LOOP
,
-
\.
\."
/
/MOD
0<
0=
1\+
1-
2!
2\*
2/
2@
2DROP
2DUP
2OVER
2SWAP
:
;
<
<#
=
>
>BODY
>IN
>NUMBER
>R
\?DUP
@
ABORT
ABORT"
ABS
ACCEPT
ALIGN
ALIGNED
ALLOT
AND
BASE
BEGIN
BL
C!
C,
C@
CELL\+
CELLS
CHAR
CHAR\+
CHARS
CONSTANT
COUNT
CR
CREATE
DECIMAL
DEPTH
DO
DOES>
DROP
DUP
ELSE
EMIT
ENVIRONMENT\?
EVALUATE
EXECUTE
EXIT
FILL
FIND
FM/MOD
HERE
HOLD
I
IF
IMMEDIATE
INVERT
J
KEY
LEAVE
LITERAL
LOOP
LSHIFT
M\*
MAX
MIN
MOD
MOVE
NEGATE
OR
OVER
POSTPONE
QUIT
R>
R@
RECURSE
REPEAT
ROT
RSHIFT
S"
S>D
SIGN
SM/REM
SOURCE
SPACE
SPACES
STATE
SWAP
THEN
TYPE
U\.
U<
UM\*
UM/MOD
UNLOOP
UNTIL
VARIABLE
WHILE
WORD
XOR
\[
\['\]
\[CHAR\]
\]
\.\(
\.R
0<>
0>
2>R
2R>
2R@
:NONAME
<>
\?DO
AGAIN
C"
CASE
COMPILE,
ENDCASE
ENDOF
ERASE
FALSE
HEX
MARKER
NIP
OF
PAD
PARSE
PICK
REFILL
RESTORE-INPUT
ROLL
SAVE-INPUT
SOURCE-ID
TO
TRUE
TUCK
U\.R
U>
UNUSED
VALUE
WITHIN
\[COMPILE\]
\\
#TIB
CONVERT
EXPECT
QUERY
SPAN
TIB
BLK
BLOCK
BUFFER
EVALUATE
FLUSH
LOAD
SAVE-BUFFERS
UPDATE
EMPTY-BUFFERS
LIST
REFILL
SCR
THRU
\\
2CONSTANT
2LITERAL
2VARIABLE
D\+
D-
D\.
D\.R
D0<
D0=
D2\*
D2/
D<
D=
D>S
DABS
DMAX
DMIN
DNEGATE
M\*/
M\+
2ROT
DU<
CATCH
THROW
ABORT
ABORT"
AT-XY
KEY\?
PAGE
EKEY
EKEY>CHAR
EKEY\?
EMIT\?
MS
TIME&DATE
\(
BIN
CLOSE-FILE
CREATE-FILE
DELETE-FILE
FILE-POSITION
FILE-SIZE
INCLUDE-FILE
INCLUDED
OPEN-FILE
R/O
R/W
READ-FILE
READ-LINE
REPOSITION-FILE
RESIZE-FILE
S"
SOURCE-ID
W/O
WRITE-FILE
WRITE-LINE
FILE-STATUS
FLUSH-FILE
REFILL
RENAME-FILE
>FLOAT
D>F
F!
F\*
F\+
F-
F/
F0<
F0=
F<
F>D
F@
FALIGN
FALIGNED
FCONSTANT
FDEPTH
FDROP
FDUP
FLITERAL
FLOAT\+
FLOATS
FLOOR
FMAX
FMIN
FNEGATE
FOVER
FROT
FROUND
FSWAP
FVARIABLE
REPRESENT
DF!
DF@
DFALIGN
DFALIGNED
DFLOAT\+
DFLOATS
F\*\*
F\.
FABS
FACOS
FACOSH
FALOG
FASIN
FASINH
FATAN
FATAN2
FATANH
FCOS
FCOSH
FE\.
FEXP
FEXPM1
FLN
FLNP1
FLOG
FS\.
FSIN
FSINCOS
FSINH
FSQRT
FTAN
FTANH
F~
PRECISION
SET-PRECISION
SF!
SF@
SFALIGN
SFALIGNED
SFLOAT\+
SFLOATS
\(LOCAL\)
TO
LOCALS\|
ALLOCATE
FREE
RESIZE
\.S
\?
DUMP
SEE
WORDS
;CODE
AHEAD
ASSEMBLER
BYE
CODE
CS-PICK
CS-ROLL
EDITOR
STATE
\[ELSE\]
\[IF\]
\[THEN\]
FORGET
DEFINITIONS
FIND
FORTH-WORDLIST
GET-CURRENT
GET-ORDER
SEARCH-WORDLIST
SET-CURRENT
SET-ORDER
WORDLIST
ALSO
FORTH
ONLY
ORDER
PREVIOUS
-TRAILING
/STRING
BLANK
CMOVE
CMOVE>
COMPARE
SEARCH
SLITERAL
\%[(CHAR|\[CHAR\])\s+(.)\%]
\%[(:|[']|CREATE|POSTPONE)\s+(\S*)\%]
\%[([.]"|ABORT"|S")\%]
"
\%[WORD\s+(\S*)\%]
\%[CONSTANT\s+(\S*)\%]
\%[VARIABLE\s+(\S*)\%]
\%[(MARKER|\[COMPILE\])\s+(\S*)\%]
\%[C"\%]
"
\%[PARSE\s+(\S*)\%]
\%[[.]\(\%]
\)
\%[(TO|VALUE)\s+(\S*)\%]
\%[2CONSTANT\s+(\S*)\%]
\%[2VARIABLE\s+(\S*)\%]
\%[FCONSTANT\s+(\S*)\%]
\%[FVARIABLE\s+(\S*)\%]
\%[LOCALS\|\%]
\|
\%[SEE\s+(\S*)\%]
\%[CODE\s+(\S*)\%]
\%[FORGET\s+(\S*)\%]
\%[[-]?[0-9]+\%]
\%[[-]?[0-9]+[.][0-9]*\%]
\%[([+]|[-])?([0-9]+[.]?[0-9]*)(E|e)([+]|[-])?([0-9]*)\%]