1: \ WORDSETS.STR All the words of the Wordsets 03may93jaw
2:
3: \ Copyright (C) 1995,2003 Free Software Foundation, Inc.
4:
5: \ This file is part of Gforth.
6:
7: \ Gforth is free software; you can redistribute it and/or
8: \ modify it under the terms of the GNU General Public License
9: \ as published by the Free Software Foundation, either version 3
10: \ of the License, or (at your option) any later version.
11:
12: \ This program is distributed in the hope that it will be useful,
13: \ but WITHOUT ANY WARRANTY; without even the implied warranty of
14: \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15: \ GNU General Public License for more details.
16:
17: \ You should have received a copy of the GNU General Public License
18: \ along with this program. If not, see http://www.gnu.org/licenses/.
19:
20: WS CORE
21:
22: ^ ! ^ # ^ #> ^ #S ^ ' ^ ( ^ * ^ */ ^ */MOD ^ + ^ +! ^ +LOOP
23: ^ , ^ - ^ . ^ ." ^ / ^ /MOD ^ 0< ^ 0= ^ 1+ ^ 1- ^ 2! ^ 2* ^ 2/
24: ^ 2@ ^ 2DROP ^ 2DUP ^ 2OVER ^ 2SWAP ^ : ^ ; ^ < ^ <# ^ = ^ >
25: ^ >BODY ^ >IN ^ >NUMBER ^ >R ^ ?DUP ^ @ ^ ABORT ^ ABORT"
26: ^ ABS ^ ACCEPT ^ ALIGN ^ ALIGNED ^ ALLOT ^ AND ^ BASE ^ BEGIN
27: ^ BL ^ C! ^ C, ^ C@ ^ CELL+ ^ CELLS ^ CHAR ^ CHAR+ ^ CHARS
28: ^ CONSTANT ^ COUNT ^ CR ^ CREATE ^ DECIMAL ^ DEPTH ^ DO ^ DOES>
29: ^ DROP ^ DUP ^ ELSE ^ EMIT ^ ENVIRONMENT? ^ EVALUATE ^ EXECUTE
30: ^ EXIT ^ FILL ^ FIND ^ FM/MOD ^ HERE ^ HOLD ^ I ^ IF ^ IMMEDIATE
31: ^ INVERT ^ J ^ KEY ^ LEAVE ^ LITERAL ^ LOOP ^ LSHIFT ^ M* ^ MAX
32: ^ MIN ^ MOD ^ MOVE ^ NEGATE ^ OR ^ OVER ^ POSTPONE ^ QUIT
33: ^ R> ^ R@ ^ RECURSE ^ REPEAT ^ ROT ^ RSHIFT ^ S" ^ S>D
34: ^ SIGN ^ SM/REM ^ SOURCE ^ SPACE ^ SPACES ^ STATE ^ SWAP
35: ^ THEN ^ TYPE ^ U. ^ U< ^ UM* ^ UM/MOD ^ UNLOOP ^ UNTIL ^ VARIABLE
36: ^ WHILE ^ WORD ^ XOR ^ [ ^ ['] ^ [CHAR] ^ ]
37:
38: WS CORE-EXT
39:
40: ^ #TIB ^ .( ^ .R ^ 0<> ^ 0> ^ 2>R ^ 2R> ^ 2R@ ^ :NONAME ^ <>
41: ^ ?DO ^ AGAIN ^ C" ^ CASE ^ COMPILE, ^ CONVERT ^ ENDCASE
42: ^ ENDOF ^ ERASE ^ EXPECT ^ FALSE ^ HEX ^ MARKER ^ NIP ^ OF
43: ^ PAD ^ PARSE ^ PICK ^ QUERY ^ REFILL ^ RESTORE-INPUT ^ ROLL
44: ^ SAVE-INPUT ^ SOURCE-ID ^ SPAN ^ TIB ^ TO ^ TRUE ^ TUCK ^ U.R
45: ^ U> ^ UNUSED ^ VALUE ^ WITHIN ^ [COMPILE] ^ \
46:
47: WS BLOCK
48:
49: ^ BLK ^ BLOCK ^ BUFFER ^ EVALUATE ^ FLUSH ^ LOAD ^ SAVE-BUFFERS
50: ^ UPDATE
51:
52: WS BLOCK-EXT
53:
54: ^ EMPTY-BUFFERS ^ LIST ^ REFILL ^ SCR ^ THRU ^ \
55:
56: WS DOUBLE
57:
58: ^ 2CONSTANT ^ 2LITERAL ^ 2VARIABLE ^ D+ ^ D- ^ D. ^ D.R ^ D0<
59: ^ D0= ^ D2* ^ D2/ ^ D< ^ D= ^ D>S ^ DABS ^ DMAX ^ DMIN ^ DNEGATE
60: ^ M*/ ^ M+
61:
62: WS DOUBLE-EXT
63:
64: ^ 2ROT ^ DU<
65:
66: WS EXEPTION
67:
68: ^ CATCH ^ THROW
69:
70: WS EXEPTION-EXT
71:
72: ^ ABORT ^ ABORT"
73:
74: WS FACILITY
75:
76: ^ AT-XY ^ KEY? ^ PAGE
77:
78: WS FACILITY-EXT
79:
80: ^ EKEY ^ EKEY>CHAR ^ EKEY? ^ EMIT? ^ MS ^ TIME&DATE
81:
82: WS FILE
83:
84: ^ ( ^ BIN ^ CLOSE-FILE ^ CREATE-FILE ^ DELETE-FILE
85: ^ FILE-POSITION ^ FILE-SIZE ^ INCLUDE-FILE ^ INCLUDED
86: ^ OPEN-FILE ^ R/O ^ R/W ^ READ-FILE ^ READ-LINE ^ REPOSITION-FILE
87: ^ RESIZE-FILE ^ S" ^ SOURCE-ID ^ W/O ^ WRITE-FILE ^ WRITE-LINE
88:
89: WS FILE-EXT
90:
91: ^ FILE-STATUS ^ FLUSH-FILE ^ REFILL ^ RENAME-FILE
92:
93: WS FLOAT
94:
95: ^ >FLOAT ^ D>F ^ F! ^ F* ^ F+ ^ F- ^ F/ ^ F0< ^ F0= ^ F< ^ F>D
96: ^ F@ ^ FALIGN ^ FALIGNED ^ FCONSTANT ^ FDEPTH ^ FDROP ^ FDUP
97: ^ FLITERAL ^ FLOAT+ ^ FLOATS ^ FLOOR ^ FMAX ^ FMIN ^ FNEGATE
98: ^ FOVER ^ FROT ^ FROUND ^ FSWAP ^ FVARIABLE ^ REPRESENT
99:
100: WS FLOAT-EXT
101:
102: ^ DF! ^ DF@ ^ DFALIGN ^ DFALIGNED ^ DFLOAT+ ^ DFLOATS ^ F**
103: ^ F. ^ FABS ^ FACOS ^ FACOSH ^ FALOG ^ FASIN ^ FASINH ^ FATAN
104: ^ FATAN2 ^ FATANH ^ FCOS ^ FCOSH ^ FE. ^ FEXP ^ FEXPM1
105: ^ FLN ^ FLNP1 ^ FLOG ^ FS. ^ FSIN ^ FSINCOS ^ FSINH
106: ^ FSQRT ^ FTAN ^ FTANH ^ F~ ^ PRECISION ^ SET-PRECISION
107: ^ SF! ^ SF@ ^ SFALIGN ^ SFALIGNED ^ SFLOAT+ ^ SFLOATS
108:
109: WS LOCAL
110:
111: ^ (LOCAL) ^ TO
112:
113: WS LOCAL-EXT
114:
115: ^ LOCALS|
116:
117: WS MEMORY
118:
119: ^ ALLOCATE ^ FREE ^ RESIZE
120:
121: WS TOOLKIT
122:
123: ^ .S ^ ? ^ DUMP ^ SEE ^ WORDS
124:
125: WS TOOLKIT-EXT
126:
127: ^ ;CODE ^ AHEAD ^ ASSEMBLER ^ BYE ^ CODE ^ CS-PICK ^ CS-ROLL
128: ^ EDITOR ^ FORGET ^ STATE ^ [ELSE] ^ [IF] ^ [THEN]
129:
130: WS SEARCH
131:
132: ^ DEFINITIONS ^ FIND ^ FORTH-WORDLIST ^ GET-CURRENT ^ GET-ORDER
133: ^ SEARCH-WORDLIST ^ SET-CURRENT ^ SET-ORDER ^ WORDLIST
134:
135: WS SEARCH-EXT
136:
137: ^ ALSO ^ FORTH ^ ONLY ^ ORDER ^ PREVIOUS
138:
139: WS STRING
140:
141: ^ -TRAILING ^ /STRING ^ BLANK ^ CMOVE ^ CMOVE> ^ COMPARE ^ SEARCH
142: ^ SLITERAL
143:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>