Annotation of gforth/wordsets.fs, revision 1.5
1.1 pazsan 1: \ WORDSETS.STR All the words of the Wordsets 03may93jaw
2:
1.5 ! anton 3: \ Copyright (C) 1995,2003 Free Software Foundation, Inc.
1.4 anton 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 2
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, write to the Free Software
19: \ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
20:
1.1 pazsan 21: WS CORE
22:
23: ^ ! ^ # ^ #> ^ #S ^ ' ^ ( ^ * ^ */ ^ */MOD ^ + ^ +! ^ +LOOP
24: ^ , ^ - ^ . ^ ." ^ / ^ /MOD ^ 0< ^ 0= ^ 1+ ^ 1- ^ 2! ^ 2* ^ 2/
25: ^ 2@ ^ 2DROP ^ 2DUP ^ 2OVER ^ 2SWAP ^ : ^ ; ^ < ^ <# ^ = ^ >
26: ^ >BODY ^ >IN ^ >NUMBER ^ >R ^ ?DUP ^ @ ^ ABORT ^ ABORT"
27: ^ ABS ^ ACCEPT ^ ALIGN ^ ALIGNED ^ ALLOT ^ AND ^ BASE ^ BEGIN
28: ^ BL ^ C! ^ C, ^ C@ ^ CELL+ ^ CELLS ^ CHAR ^ CHAR+ ^ CHARS
29: ^ CONSTANT ^ COUNT ^ CR ^ CREATE ^ DECIMAL ^ DEPTH ^ DO ^ DOES>
30: ^ DROP ^ DUP ^ ELSE ^ EMIT ^ ENVIRONMENT? ^ EVALUATE ^ EXECUTE
31: ^ EXIT ^ FILL ^ FIND ^ FM/MOD ^ HERE ^ HOLD ^ I ^ IF ^ IMMEDIATE
32: ^ INVERT ^ J ^ KEY ^ LEAVE ^ LITERAL ^ LOOP ^ LSHIFT ^ M* ^ MAX
33: ^ MIN ^ MOD ^ MOVE ^ NEGATE ^ OR ^ OVER ^ POSTPONE ^ QUIT
34: ^ R> ^ R@ ^ RECURSE ^ REPEAT ^ ROT ^ RSHIFT ^ S" ^ S>D
35: ^ SIGN ^ SM/REM ^ SOURCE ^ SPACE ^ SPACES ^ STATE ^ SWAP
36: ^ THEN ^ TYPE ^ U. ^ U< ^ UM* ^ UM/MOD ^ UNLOOP ^ UNTIL ^ VARIABLE
37: ^ WHILE ^ WORD ^ XOR ^ [ ^ ['] ^ [CHAR] ^ ]
38:
39: WS CORE-EXT
40:
41: ^ #TIB ^ .( ^ .R ^ 0<> ^ 0> ^ 2>R ^ 2R> ^ 2R@ ^ :NONAME ^ <>
42: ^ ?DO ^ AGAIN ^ C" ^ CASE ^ COMPILE, ^ CONVERT ^ ENDCASE
43: ^ ENDOF ^ ERASE ^ EXPECT ^ FALSE ^ HEX ^ MARKER ^ NIP ^ OF
44: ^ PAD ^ PARSE ^ PICK ^ QUERY ^ REFILL ^ RESTORE-INPUT ^ ROLL
45: ^ SAVE-INPUT ^ SOURCE-ID ^ SPAN ^ TIB ^ TO ^ TRUE ^ TUCK ^ U.R
46: ^ U> ^ UNUSED ^ VALUE ^ WITHIN ^ [COMPILE] ^ \
47:
48: WS BLOCK
49:
50: ^ BLK ^ BLOCK ^ BUFFER ^ EVALUATE ^ FLUSH ^ LOAD ^ SAVE-BUFFERS
51: ^ UPDATE
52:
53: WS BLOCK-EXT
54:
55: ^ EMPTY-BUFFERS ^ LIST ^ REFILL ^ SCR ^ THRU ^ \
56:
57: WS DOUBLE
58:
59: ^ 2CONSTANT ^ 2LITERAL ^ 2VARIABLE ^ D+ ^ D- ^ D. ^ D.R ^ D0<
60: ^ D0= ^ D2* ^ D2/ ^ D< ^ D= ^ D>S ^ DABS ^ DMAX ^ DMIN ^ DNEGATE
1.3 anton 61: ^ M*/ ^ M+
62:
63: WS DOUBLE-EXT
64:
65: ^ 2ROT ^ DU<
1.1 pazsan 66:
67: WS EXEPTION
68:
69: ^ CATCH ^ THROW
70:
71: WS EXEPTION-EXT
72:
73: ^ ABORT ^ ABORT"
74:
75: WS FACILITY
76:
77: ^ AT-XY ^ KEY? ^ PAGE
78:
79: WS FACILITY-EXT
80:
81: ^ EKEY ^ EKEY>CHAR ^ EKEY? ^ EMIT? ^ MS ^ TIME&DATE
82:
83: WS FILE
84:
85: ^ ( ^ BIN ^ CLOSE-FILE ^ CREATE-FILE ^ DELETE-FILE
86: ^ FILE-POSITION ^ FILE-SIZE ^ INCLUDE-FILE ^ INCLUDED
87: ^ OPEN-FILE ^ R/O ^ R/W ^ READ-FILE ^ READ-LINE ^ REPOSITION-FILE
88: ^ RESIZE-FILE ^ S" ^ SOURCE-ID ^ W/O ^ WRITE-FILE ^ WRITE-LINE
89:
90: WS FILE-EXT
91:
92: ^ FILE-STATUS ^ FLUSH-FILE ^ REFILL ^ RENAME-FILE
93:
94: WS FLOAT
95:
96: ^ >FLOAT ^ D>F ^ F! ^ F* ^ F+ ^ F- ^ F/ ^ F0< ^ F0= ^ F< ^ F>D
97: ^ F@ ^ FALIGN ^ FALIGNED ^ FCONSTANT ^ FDEPTH ^ FDROP ^ FDUP
98: ^ FLITERAL ^ FLOAT+ ^ FLOATS ^ FLOOR ^ FMAX ^ FMIN ^ FNEGATE
99: ^ FOVER ^ FROT ^ FROUND ^ FSWAP ^ FVARIABLE ^ REPRESENT
100:
101: WS FLOAT-EXT
102:
103: ^ DF! ^ DF@ ^ DFALIGN ^ DFALIGNED ^ DFLOAT+ ^ DFLOATS ^ F**
1.2 pazsan 104: ^ F. ^ FABS ^ FACOS ^ FACOSH ^ FALOG ^ FASIN ^ FASINH ^ FATAN
1.1 pazsan 105: ^ FATAN2 ^ FATANH ^ FCOS ^ FCOSH ^ FE. ^ FEXP ^ FEXPM1
106: ^ FLN ^ FLNP1 ^ FLOG ^ FS. ^ FSIN ^ FSINCOS ^ FSINH
1.2 pazsan 107: ^ FSQRT ^ FTAN ^ FTANH ^ F~ ^ PRECISION ^ SET-PRECISION
108: ^ SF! ^ SF@ ^ SFALIGN ^ SFALIGNED ^ SFLOAT+ ^ SFLOATS
1.1 pazsan 109:
110: WS LOCAL
111:
112: ^ (LOCAL) ^ TO
113:
114: WS LOCAL-EXT
115:
116: ^ LOCALS|
117:
118: WS MEMORY
119:
120: ^ ALLOCATE ^ FREE ^ RESIZE
121:
122: WS TOOLKIT
123:
124: ^ .S ^ ? ^ DUMP ^ SEE ^ WORDS
125:
126: WS TOOLKIT-EXT
127:
128: ^ ;CODE ^ AHEAD ^ ASSEMBLER ^ BYE ^ CODE ^ CS-PICK ^ CS-ROLL
129: ^ EDITOR ^ FORGET ^ STATE ^ [ELSE] ^ [IF] ^ [THEN]
130:
131: WS SEARCH
132:
133: ^ DEFINITIONS ^ FIND ^ FORTH-WORDLIST ^ GET-CURRENT ^ GET-ORDER
134: ^ SEARCH-WORDLIST ^ SET-CURRENT ^ SET-ORDER ^ WORDLIST
135:
136: WS SEARCH-EXT
137:
138: ^ ALSO ^ FORTH ^ ONLY ^ ORDER ^ PREVIOUS
139:
140: WS STRING
141:
142: ^ -TRAILING ^ /STRING ^ BLANK ^ CMOVE ^ CMOVE> ^ COMPARE ^ SEARCH
143: ^ SLITERAL
144:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>