crc/retroforth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
retroforth/words.tsv
crc 478dae5f9f stdlib: add array:eq? and array:-eq? 
FossilOrigin-Name: 443004c1843e80da2942504272b3daede52626532c904e0f545fe34b6e14af62
2019-04-23 17:46:49 +00:00

55 KiB
Raw Blame History

1)---Provide a visual indication of a code group.class:macro{n/a}{n/a}prefixall
2*nn-n--Multiply `n1` by `n2` and return the result.class:primitive #2 #6 *\n #-1 #100 *{n/a}globalall
3+nn-n--Add `n1` to `n2` and return the result.class:primitive #1 #2 + {n/a}globalall
4,n---Store the specified value into the memory at `here` and increment `Heap` by 1.class:word $a , $b , $c , #0 ,{n/a}globalall
5-nn-n--Subtract `n2` from `n1` and return the result.class:primitive #2 #1 - {n/a}globalall
6---reveal------Switch to the exposed (public) portion of a lexical namespace.class:word{n/a}{n/a}globalall
7-eq?nn-f--Compare two values for inequality. Returns `TRUE` if they are not equal or `FALSE` otherwise.class:primitive #1 #2 -eq?\n $a $b -eq?{n/a}globalall
8-iffq---Execute the quotation if the flag is `FALSE`.class:word{n/a}{n/a}globalall
9-if;fq---Execute the quotation if the flag is `FALSE`. If false, also exit the word.class:word{n/a}{n/a}globalall
10/mn-o--Divide `m` by `n` and return the result.class:word{n/a}{n/a}globalall
11/modnm-op--Divide `n` by `m` and return the result and remainder.class:primitive{n/a}{n/a}globalall
120;n-n || n---If `n` is zero, drop `n` and exit the current word. If non-zero, leave `n` alone and allow execution to continue.class:macro{n/a}{n/a}globalall
13;---End the current definition.class:macro{n/a}{n/a}globalall
14?dupn-nn || n-n--Duplicate top value on stack if not zero. If zero, do nothing.class:word #1 ?dup\n #0 ?dup{n/a}globalall
15ASCII:ACK-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
16ASCII:BEL-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
17ASCII:BS-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
18ASCII:CAN-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
19ASCII:CR-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
20ASCII:DC1-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
21ASCII:DC2-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
22ASCII:DC3-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
23ASCII:DC4-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
24ASCII:DEL-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
25ASCII:DLE-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
26ASCII:EM-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
27ASCII:ENQ-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
28ASCII:EOT-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
29ASCII:ESC-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
30ASCII:ETB-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
31ASCII:ETX-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
32ASCII:FF-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
33ASCII:FS-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
34ASCII:GS-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
35ASCII:HT-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
36ASCII:LF-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
37ASCII:NAK-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
38ASCII:NUL-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
39ASCII:RS-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
40ASCII:SI-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
41ASCII:SO-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
42ASCII:SOH-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
43ASCII:SPACE-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
44ASCII:STX-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
45ASCII:SUB-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
46ASCII:SYN-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
47ASCII:US-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
48ASCII:VT-n--Constant. Refers to specific ASCII code.class:data{n/a}{n/a}ASCIIall
49Compiler-a--Variable. Holds the compiler state. If TRUE, the compiler is active. If FALSE, it is not.class:data{n/a}{n/a}globalall
50Dictionary-a--Variable. Holds a pointer to the most recent dictionary header.class:data{n/a}{n/a}globalall
51EOM-n--Constant. Returns the last addressable memory address.class:word{n/a}{n/a}globalall
52FALSE-n--Returns `0`, the value used to indicate a FALSE result.class:word{n/a}{n/a}globalall
53FREE-n--Returns the number of cells available to your application. This is the amount of memory, less the already consumed portion and buffers mapped for RETRO's internal use.class:word{n/a}{n/a}globalall
54Heap-a--Variable. Holds the address of the next available cell.class:data{n/a}{n/a}globalall
55I-n--Access the loop index for the current loop. (For loops made using `times<with-index>`)class:word{n/a}{n/a}globalall
56J-n--Access the parent loop index for the current loop. (For loops made using `times<with-index>`)class:word{n/a}{n/a}globalall
57K-n--Access the grandparent loop index for the current loop. (For loops made using `times<with-index>`)class:word{n/a}{n/a}globalall
58RewriteUnderscores-a--Variable. When set to `TRUE`, RETRO will replace underscores in strings with spaces. When `FALSE`, RETRO does not.class:data{n/a}{n/a}globalall
59STRINGS-a--Return the address of the start of the temporary string pool.class:word{n/a}{n/a}globalall
60ScopeList-a--Variable. This holds some information used by `{{` and `}}`.class:data{n/a}{n/a}globalall
61TRUE-n--Returns `-1`, the value used to indicate a TRUE result.class:word{n/a}{n/a}globalall
62TempStringMax-a--Variable. Holds the maximum length of a temporary string.class:data{n/a}{n/a}globalall
63TempStrings-a--Variable. Holds the number of temporary strings.class:data{n/a}{n/a}globalall
64Version-a--Variable. This stores the version number.class:data{n/a}{n/a}globalall
65[---Begin a quotation.class:macro{n/a}{n/a}globalall
66]---End a quotation.class:macro{n/a}{n/a}globalall
67again---Close an unconditional loop. Branches back to the prior `repeat`.class:macro{n/a}{n/a}globalall
68allotn---Allocate the specified number of cells from the `Heap`.class:word 'Buffer d:create #100 allot{n/a}globalall
69andnm-o--Perform a bitwise AND operation between the two provided values.class:primitive{n/a}{n/a}globalall
70array:-eq?aa-f--Compare all values in the array. Return `FALSE` if all values are equal or `TRUE` otherwise. This assumes the array contains only numeric values.class:word{n/a}{n/a}arrayall
71array:contains-string?sa-f--Return `TRUE` if the string value is in the array or`FALSE` otherwise.class:word{n/a}{n/a}arrayall
72array:contains?na-f--Return `TRUE` if the value is in the array or `FALSE` otherwise.class:word{n/a}{n/a}arrayall
73array:counted-resultsq-a--Run a quote and construct a new array from the returned values. The quote should return the values and the number of values to put into the array.class:word{n/a}{n/a}arrayall
74array:dupa-b--Make a copy of an array. Return the address of the copy.class:word{n/a}{n/a}arrayall
75array:eq?aa-f--Compare all values in the array. Return `TRUE` if all values are equal or `FALSE` otherwise. This assumes the array contains only numeric values.class:word{n/a}{n/a}arrayall
76array:filteraq-b--For each item in the initial array, run the specified quote. If the quote returns `TRUE`, copy the item into a new array. If `FALSE`, discard it. Returns a pointer to the new array.class:word{n/a}{n/a}arrayall
77array:for-eachaq---Execute the quote once for each item in the array.class:word{n/a}{n/a}arrayall
78array:from-strings-a--Create a new array with the characters in the source string.class:word{n/a}{n/a}arrayall
79array:lengtha-n--Return the length of a array.class:word{n/a}{n/a}arrayall
80array:makeq-a--Execute quote. Return a new array containing the values the quote leaves on the stack. This is identical to doing `array:counted-results array:reverse`class:word{n/a}{n/a}arrayall
81array:mapaq---Execute quote once for each item in the array. Constructs a new array from the value returned by the quote.class:word{n/a}{n/a}arrayall
82array:nthan-b--Return the actual address of the nth item in the array.class:word{n/a}{n/a}arrayall
83array:reducepnq-n--Takes an array, a starting value, and a quote. This will apply the quote to each item in the array; the quote should consume two values and return one.class:word{n/a}{n/a}arrayall
84array:reversea-b--Reverse the order of items in a array. This will return a new array.class:word{n/a}{n/a}arrayall
85as{-f--Begin an assembly section.class:macro{n/a}{n/a}globalall
86banner---Display a welcome message on startup.class:word{n/a}{n/a}globalrre{n/a}
87bixqq-?--Execute q1 against x, then execute q2 against a copy of x.class:word #100 [ #10 * ] [ #10 - ] bi{n/a}globalall
88bi*xyqq-?--Execute q1 against x and q2 against y.class:word #10 #20 [ #2 * ] [ #10 / ] bi*{n/a}globalall
89bi@xyq-?--Execute q against x, then execute q against y.class:word #10 #20 [ #3 * ] bi@{n/a}globalall
90buffer:addn---Append a value to the current buffer.class:word{n/a}{n/a}bufferall
91buffer:empty---Reset the current buffer to an empty state.class:word{n/a}{n/a}bufferall
92buffer:end-a--Return a pointer to the current end of the active buffer.class:word{n/a}{n/a}bufferall
93buffer:get-n--Remove the last value from the current buffer.class:word{n/a}{n/a}bufferall
94buffer:preserveq---Save and restore the current buffer before and after executing the specified quote.class:word{n/a}{n/a}bufferall
95buffer:seta---Assign a new buffer as the current one.class:word{n/a}{n/a}bufferall
96buffer:size-n--Return the number of cells in the buffer.class:word{n/a}{n/a}bufferall
97buffer:start-a--Return the start address of the current buffer.class:word{n/a}{n/a}bufferall
98bye---Exit RETRO.class:word{n/a}{n/a}globalrre
99c:-consonant?c-f--Return TRUE if character is a not consonant or FALSE otherwise.class:word{n/a}{n/a}call
100c:-digit?c-f--Return TRUE if character is a not numeric digit or FALSE otherwise.class:word{n/a}{n/a}call
101c:-lowercase?c-f--Return TRUE if character is not lowercase or FALSE otherwise.class:word{n/a}{n/a}call
102c:-uppercase?c-f--Return TRUE if character is not uppercase or FALSE otherwise.class:word{n/a}{n/a}call
103c:-visible?c-f--Return TRUE if character is not printable or FALSE otherwise.class:word{n/a}{n/a}call
104c:-vowel?c-f--Return TRUE if character is not a vowel or FALSE otherwise.class:word{n/a}{n/a}call
105c:-whitespace?c-f--Return TRUE if character is not whitespace, or FALSE otherwise.class:word{n/a}{n/a}call
106c:consonant?c-f--Return TRUE if character is a consonant or FALSE otherwise.class:word{n/a}{n/a}call
107c:digit?c-f--Return TRUE if character is a numeric digit or FALSE otherwise.class:word{n/a}{n/a}call
108c:get-c--Read a single keypress.class:word{n/a}{n/a}globalrre
109c:letter?c-f--Return TRUE if character is an ASCII letter or FALSE otherwise.class:word{n/a}{n/a}call
110c:lowercase?c-f--Return TRUE if character is lowercase or FALSE otherwise.class:word{n/a}{n/a}call
111c:putc---Display a single character.class:word{n/a}{n/a}globalall
112c:to-lowerc-c--Convert character to lowercase equivalent.class:word{n/a}{n/a}call
113c:to-numberc-n--Convert an ASCII digit character into the corresponding decimal valueclass:word{n/a}{n/a}globalall
114c:to-stringc-s--Convert character into a string.class:word{n/a}{n/a}call
115c:to-upperc-c--Convert character to uppercase equivalent.class:word{n/a}{n/a}call
116c:toggle-casec-c--Convert an ASCII character to the opposite case.class:word{n/a}{n/a}call
117c:uppercase?c-f--Return TRUE if character is uppercase or FALSE otherwise.class:word{n/a}{n/a}call
118c:visible?c-f--Return TRUE if character is printable or FALSE otherwise.class:word{n/a}{n/a}call
119c:vowel?c-f--Return TRUE if character is a vowel or FALSE otherwise.class:word{n/a}{n/a}call
120c:whitespace?c-f--Return TRUE if character is whitespace, or FALSE otherwise.class:word{n/a}{n/a}call
121calla---Call a function.class:primitive{n/a}{n/a}globalall
122casenmq- || nmq-n--If `n` is equal to `m`, drop both and execute the specified quote before exiting the calling word. If not equal, leave `n` on the stack and let execution continue.class:word{n/a}{n/a}globalall
123choosefqq---Execute q1 if the flag is true (-1) or q2 if the flag is false (0). Only these flags are valid when using `choose`.class:word{n/a}{n/a}globalall
124class:datan- || n-n--Class handler for data structures.Keep the address or value on the stack.Compile the value or address as a literal into the current definition.class:word{n/a}{n/a}classall
125class:macroa---Class handler for compiler macros (immediate words)Execute the function at the provided address.Execute the function at the provided address.class:word{n/a}{n/a}classall
126class:primitivea---Class handler for primitive words (words which map to Nga instructions)Execute the function.Compile the machine code in the definiton into the current definition.class:word{n/a}{n/a}classall
127class:worda---Class handler for normal words.Execute the function at the provided address.Compile a call to the specified address into the current definition.class:word{n/a}{n/a}classall
128clock:day-n--Return the current day.class:word{n/a}{n/a}clockiOS
129clock:hour-n--Return the current hour.class:word{n/a}{n/a}clockiOS
130clock:minute-n--Return the current minute.class:word{n/a}{n/a}clockiOS
131clock:month-n--Return the current month.class:word{n/a}{n/a}clockiOS
132clock:second-n--Return the current second.class:word{n/a}{n/a}clockiOS
133clock:year-n--Return the current year.class:word{n/a}{n/a}clockiOS
134compile:calla---Compile a call to the specified address into the current definition.class:word{n/a}{n/a}compileall
135compile:jumpa---Compile a jump to the specified address into the current definition.class:word{n/a}{n/a}compileall
136compile:litn---Compile the code to push a number to the stack into the current definition.class:word{n/a}{n/a}compileall
137compile:ret---Compile a return instruction into the current definition.class:word{n/a}{n/a}compileall
138compiling?-f--Return `TRUE` if compiler is on or `FALSE` otherwise.class:word{n/a}{n/a}globalall
139constns---Create a constant returning the specified value.class:word{n/a}{n/a}globalall
140copysdl---Copy `l` cells from memory at `s` to the memory at `d`. These should not overlap.class:word{n/a}{n/a}globalall
141currynq-q--Bind a value to a function and return a new quote that calls the bound action.class:word{n/a}{n/a}globalall
142dn---Inline a numeric value to the current assembly segment.class:word{n/a}{n/a}globalall
143d:add-headersaa---Create a header. Provide a string (s) for the name, a pointer to the class handler (a1) and a pointer to the word definition (a2) Generally this won't be used directly.class:word{n/a}{n/a}dall
144d:classd-a--Given a dictionary header, return the class field.class:word{n/a}{n/a}dall
145d:creates---Create a new dictionary header named the specified string. The new header will point to `here` and have a class of `class:data`.class:word{n/a}{n/a}dall
146d:for-eachq---Execute the specified quote once for each header in the dictionary. Before running the quote, this also pushes a pointer to the header onto the stack.class:word{n/a}{n/a}dall
147d:last-d--Return the most recent dictionary header.class:word{n/a}{n/a}dall
148d:last<class>-a--Return a pointer to the class field of the most recent dictionary header.class:word{n/a}{n/a}dall
149d:last<name>-s--Return a pointer to the name field of the most recent dictionary header.class:word{n/a}{n/a}dall
150d:last<xt>-a--Return a pointer to the xt field of the most recent dictionary header.class:word{n/a}{n/a}dall
151d:linkd-a--Given a dictionary header, return the link field.class:word{n/a}{n/a}dall
152d:lookups-d--Lookup the specified name in the dictionary and return a pointer to its dictionary header. This returns zero if the word is not found.class:word{n/a}{n/a}dall
153d:lookup-xta-d--Lookup the specified address in the dictionary and return a pointer to its dictionary header. This returns zero if the word is not found.class:word{n/a}{n/a}dall
154d:named-s--Given a dictionary header, return the name field.class:word{n/a}{n/a}dall
155d:words---Display a list of all named items in the `Dictionary`.class:word{n/a}{n/a}drre
156d:words-withs---Display a list of all named items in the `Dictionary` that contain the provided substring.class:word{n/a}{n/a}drre
157d:xtd-a--Given a dictionary header, return the xt field.class:word{n/a}{n/a}dall
158data---Change the class of the most recently defined word to `class:data`.class:word{n/a}{n/a}globalall
159depth-n--Return the number of items on the stack.class:word{n/a}{n/a}globalall
160dipnq-n--Temporarily remove n from the stack, execute the quotation, and then restore n to the stack.class:word{n/a}{n/a}globalall
161doesq---Attach an action to the most recently created word. This is used in a manner similar to CREATE/DOES> in traditional Forth.class:word{n/a}{n/a}globalall
162dropn---Discard the top value on the stack.class:primitive{n/a}{n/a}globalall
163drop-pairnn---Remove top two items on the stack.class:word{n/a}{n/a}globalall
164dump-stack---Display the items on the data stack.class:word{n/a}{n/a}globalall
165dupn-nn--Duplicate the top item on the stack.class:primitive{n/a}{n/a}globalall
166dup-pairnm-nmnm--Duplicate the top two items on the stack.class:word{n/a}{n/a}globalall
167e:-INF-u--Constant. Negative infinity. For encoded floating point values.class:word{n/a}{n/a}erre{n/a}
168e:-inf?u-f--Is encoded value negative infinity?class:word{n/a}{n/a}erre{n/a}
169e:INF-u--Constant. Infinity. For encoded floating point values.class:word{n/a}{n/a}erre{n/a}
170e:MAX-u--Constant. Maximum value. For encoded floating point values.class:word{n/a}{n/a}erre
171e:MIN-u--Constant. Minimum value. For encoded floating point values.class:word{n/a}{n/a}erre{n/a}
172e:NAN-u--Constant. Not a Number. For encoded floating point values.class:word{n/a}{n/a}erre{n/a}
173e:clipu-U--Constrain the encoded value to the allowable range.class:word{n/a}{n/a}erre
174e:inf?u-f--Is encoded value infinity?class:word{n/a}{n/a}erre{n/a}
175e:max?u-f--Is encoded value at the maximum?class:word{n/a}{n/a}erre{n/a}
176e:min?u-f--Is encoded value at the minimum?class:word{n/a}{n/a}erre{n/a}
177e:n?u-f--Return `TRUE` if the encoded value is a valid number, or `FALSE` otherwise.class:word{n/a}{n/a}erre
178e:nan?u-f--Is encoded value a Nan?class:word{n/a}{n/a}erre{n/a}
179e:putu---Display an encoded number.class:word{n/a}{n/a}erre
180e:to-fu---nDecode an encoded floating point value.class:word{n/a}{n/a}erre
181e:zero?u-f--Return `TRUE` if the value is zero, or `FALSE` otherwise.class:word{n/a}{n/a}erre
182eq?nn-f--Compare two values for equality. Returns `TRUE` if they are equal or `FALSE` otherwise.class:primitive #1 #2 eq?\n $a $b eq?{n/a}globalall
183err:notfound---Error handler. Called when a word is not found by `interpret`.class:word{n/a}{n/a}errall
184f:*--FF-FMultiply two floating point numbers, returning the result.class:word .3.1415 .22 f:*{n/a}frre
185f:+--FF-FAdd two floating point numbers, returning the result.class:word .3.1 .22 f:+{n/a}frre
186f:---FF-FSubtract F2 from F1 returing the result.class:word .22.3 .0.12 f:-{n/a}frre
187f:-INF---nReturn a value corresponding to negative infinityclass:word{n/a}{n/a}frre
188f:-eq?-f-FF-Compare two floating point values for inequality. Returns `TRUE` if they are not equal or `FALSE` otherwise.class:word{n/a}{n/a}frre
189f:-inf?-f-F-Return `TRUE` if floating point value is -INF or `FALSE` otherwise.class:word{n/a}{n/a}frre
190f:/--FF-FDivide floating point value F1 by F2.class:word{n/a}{n/a}frre
191f:E---FReturn the floating point value for Euler's number.class:word{n/a}{n/a}frre
192f:E1---fHook. Return a constant used as the scaling factor for the e: words.class:word{n/a}{n/a}frre{n/a}
193f:INF---nReturn a value corresponding to positive infinityclass:word{n/a}{n/a}frre
194f:NAN---nReturn a value corresponding to NaNclass:word{n/a}{n/a}frre
195f:PI---FReturn the floating point value for PI.class:word{n/a}{n/a}frre
196f:abs--F-FReturn the absolute value for a floating point value.class:word{n/a}{n/a}frre
197f:acos--F-FReturn the arc cosine of a floating point number.class:word{n/a}{n/a}frre
198f:adepth-n--Return the number of items on the alternate floating point stack.class:word{n/a}{n/a}frre
199f:asin--F-FReturn the arc sine of a floating point number.class:word{n/a}{n/a}frre
200f:atan--F-FReturn the arc tangent of a floating point number.class:word{n/a}{n/a}frre
201f:between?-f-nlu-Return TRUE if number is between the lower (l) and upper (u) bounds. If not, return FALSE. This is inclusive of the limits.class:word .3 .1 .100 f:between?\n .100 .200 .300 f:between?{n/a}frre
202f:caseq--nm-nIf `n` is equal to `m`, drop both and execute the specified quote before exiting the calling word. If not equal, leave `n` on the stack and let execution continue.class:word{n/a}{n/a}frre
203f:ceiling--F-FReturn the smallest integral value greater than or equal to the specified value.class:word{n/a}{n/a}frre
204f:cos--F-FReturn the cosine of a floating point number.class:word{n/a}{n/a}frre
205f:dec--n-mDecrement n by one.class:word .100 f:dec{n/a}frre
206f:depth-n--Return the number of items on the floating point stack.class:word{n/a}{n/a}frre
207f:drop--F-Discard the top item on the floating point stack.class:word{n/a}{n/a}frre
208f:drop-pair--FF-Remove top two items on the stack.class:word{n/a}{n/a}frre
209f:dump-astack---Display the items on the alternate floating point stack.class:word{n/a}{n/a}frre
210f:dump-stack---Display the items on the floating point stack.class:word{n/a}{n/a}frre
211f:dup--F-FFDuplicate the top item on the floating point stack.class:word{n/a}{n/a}frre
212f:dup-pair--nm-nmnmDuplicate the top two items on the stack.class:word{n/a}{n/a}frre
213f:eq?-f-FF-Compare two floating point values for equality. Returns `TRUE` if they are equal or `FALSE` otherwise.class:word{n/a}{n/a}frre
214f:fetcha---nFetch a stored floating point value.class:word{n/a}{n/a}frre
215f:floor--F-FPerform a mathmatical floor operation on the floating point value.class:word{n/a}{n/a}frre
216f:gt?-f-FF-Compare two floating point values for greater than.class:word{n/a}{n/a}frre
217f:inc--n-mIncrement n by one.class:word .100 f:inc{n/a}frre
218f:inf?-f-F-Return `TRUE` if floating point value is INF or `FALSE` otherwise.class:word{n/a}{n/a}frre
219f:limit--nlu-mReturn n if it is within the lower (l) and upper (u) bounds. If outside the bounds, return the closes boundary value.class:word .-10 .5 .8 f:limit\n .10 .1 .15 f:limit{n/a}frre
220f:log--FF-FReturn log(F1) for base F2 for floating point values.class:word{n/a}{n/a}frre
221f:lt?-f-FF-Compare two floating point values for less than.class:word{n/a}{n/a}frre
222f:max--mn-oReturn the greater of two values.class:word .1 .7 f:max\n .-8 .-10 f:max{n/a}frre
223f:min--mn-oReturn the lesser of two values.class:word .1 .7 f:min\n .-8 .-10 f:min{n/a}frre
224f:nan?-f-F-Return `TRUE` if floating point value is NaN or `FALSE` otherwise.class:word{n/a}{n/a}frre
225f:negate--F-FInvert the sign of the floating point value.class:word .3.1415 f:negate{n/a}frre
226f:negative?-f-F-Return `TRUE` if floating point value is negative or `FALSE` if not.class:word{n/a}{n/a}frre
227f:nip--NM-MRemove the second item from the stack.class:word{n/a}{n/a}frre
228f:over--FG-FGFPut a copy of the second floating point value over the top one.class:word{n/a}{n/a}frre
229f:pop---FPop a floating point value from the alternate stack.class:word{n/a}{n/a}frre
230f:positive?-f-F-Return `TRUE` if floating point value is positive or `FALSE` otherwise.class:word{n/a}{n/a}frre
231f:power--FF-FReturn F1^F2 for floating point values.class:word{n/a}{n/a}frre
232f:push--F-Push a floating point value to an alternative stack.class:word{n/a}{n/a}frre
233f:put--F-Display a floating point number.class:word{n/a}{n/a}globalrre
234f:rot--abc-bcaRotate the top three values.class:word{n/a}{n/a}frre
235f:round--f-fRound a floating point value.class:word{n/a}{n/a}frre
236f:sign-n-F-Return 1 if the floating point value is positive or -1 if it is negative.class:word .3.1415 f:sign{n/a}frre
237f:signed-sqrt--F-FReturn the square root of a floating point number.class:word{n/a}{n/a}frre
238f:signed-square--f-fReturn the square of a floating point number.class:word{n/a}{n/a}frre
239f:sin--F-FReturn the sine of a floating point number.class:word{n/a}{n/a}frre
240f:sqrt--F-FReturn the square root of a floating point number.class:word{n/a}{n/a}frre
241f:square--f-fReturn the square of a floating point number.class:word{n/a}{n/a}frre
242f:storea--n-Store a floating point value to the specified memory location.class:word{n/a}{n/a}frre
243f:swap--FG-GFExchange the top and second items on the floating point stack.class:word{n/a}{n/a}frre
244f:tan--F-FReturn the tangent of a floating point number.class:word{n/a}{n/a}frre
245f:to-e-u-n-Encode the floating point value to an integer.class:word{n/a}{n/a}frre
246f:to-number-n-F-Convert a floating point value into a number.class:word{n/a}{n/a}frre
247f:to-string-s-F-Convert a floating point value into a string.class:word{n/a}{n/a}frre
248f:tuck--FG-GFGTuck a copy of the top floating point value under the second one.class:word{n/a}{n/a}frre
249fetcha-n--Fetch the value stored at the specified address.class:primitive &Version fetch{n/a}globalall
250fetch-nexta-an--Fetch the value stored at the specified address. Returns the next address and the value.class:word{n/a}{n/a}globalall
251file:A-n--Constant for opening a file in APPEND mode.class:data{n/a}{n/a}filerre
252file:R-n--Constant for opening a file in READ mode.class:data{n/a}{n/a}filerre
253file:R+-n--Constant for opening a file in READ & WRITE mode.class:data{n/a}{n/a}filerre
254file:W-n--Constant for opening a file in WRITE mode.class:data{n/a}{n/a}filerre
255file:closeh---Given a file handle, close the file.class:word{n/a}{n/a}filerre
256file:deletes---Delete the named file.class:word{n/a}{n/a}filerre
257file:exists?s-f--Given a file name, return `TRUE` if it exists or `FALSE` if it does not.class:word{n/a}{n/a}filerre
258file:flushh---Given a file handle, flush any pending writes to disk.class:word{n/a}{n/a}filerre
259file:for-each-linesq---Given a file name, open it and run the quote once for each line in the file.class:word{n/a}{n/a}filerre
260file:opensm-h--Open a named file (s) with the given mode (m). Returns a handle identifying the file.class:word '/etc/motd file:R file:open{n/a}filerre
261file:open<for-append>s-nn--Open a file for reading & writing. Returns the size (NOS) and a file ID (TOS)class:word{n/a}{n/a}filerre
262file:open<for-reading>s-nn--Open a file for reading. Returns the size (NOS) and a file ID (TOS)class:word{n/a}{n/a}filerre
263file:open<for-writing>s-n--Open a file for writing. Returns the file IDclass:word{n/a}{n/a}filerre
264file:readh-c--Given a file handle, read and return the next character in it.class:word{n/a}{n/a}filerre
265file:read-linef-s--Given a file handle, read a line and return a pointer to it.class:word{n/a}{n/a}filerre
266file:seeknh---Move the current offset into a file to the specified one.class:word{n/a}{n/a}filerre
267file:sizeh-n--Given a file handle, return the size of the file (in bytes).class:word{n/a}{n/a}filerre
268file:slurpas---Given an address and a file name, read the file contents into memory starting at the address.class:word{n/a}{n/a}filerre
269file:spewss---Given a string (s1) and a file name (s2), write the string into the file, replacing any existing cotent.class:word{n/a}{n/a}filerre
270file:tellh-n--Given a file handle, return the current offset in the file.class:word{n/a}{n/a}filerre
271file:writech---Write a character to the file represented by the handle.class:word{n/a}{n/a}filerre
272gopher:getasns-n--Takes an address, a server, a port, and a selector. Fetch the resource and store it at address. Return the number of bytes received.class:word here 'forthworks.com #70 '/ gopher:get\n here s:put{n/a}gopherrre
273gt?nn-f--Compare n1 and n2. Return `TRUE` if n1 is greater than n2, or `FALSE` otherwise.class:primitive{n/a}{n/a}globalall
274gteq?nn-f--Compare n1 and n2. Return `TRUE` if n1 is greater than or equal to n2, or `FALSE` otherwise.class:word{n/a}{n/a}globalall
275here-a--Return the next free address in memory.class:word{n/a}{n/a}globalall
276hook---Add a hook point into the current word. This should only be used as the first word in a definition.class:macro :foo hook ;{n/a}globalglobal
277is---Assemble the instructions specified by the string into the current assembly scope.class:word{n/a}{n/a}globalall
278iffq---Execute the quote if the flag is `TRUE`.class:word{n/a}{n/a}globalall
279if;fq---Execute the quotation if the flag is `TRUE`. If true, also exit the word.class:word{n/a}{n/a}globalall
280image:saves---Save the current system to a new image file.class:word{n/a}{n/a}imagerre
281immediate---Change the class of the most recently defined word to `class:macro`.class:word{n/a}{n/a}globalall
282includes---Run the code in the specified file. class:word{n/a}{n/a}globalrre
283interprets---Interpret a single input token.class:word '#100 interpret\n 'words interpret{n/a}globalall
284io:enumerate-n--Return the number of I/O devices.class:word{n/a}{n/a}ioall
285io:file-operation...n---Trigger a file I/O operation. This is not intended to be used directly.class:word{n/a}{n/a}iorre
286io:float-operation...n---Trigger a floating point operation. This is not intended to be used directly.class:word{n/a}{n/a}iorre
287io:invoken---Invoke an interaction with an I/O device.class:word{n/a}{n/a}ioall
288io:queryn-mN--Ask an I/O device to identify itself. Returns a version (m) and device ID (N).class:word{n/a}{n/a}ioall
289io:scan-forn-m--Scan the I/O devices for a device with a specified ID. Returns the device number, or -1 if not found.class:word{n/a}{n/a}ioall
290io:unix-syscall...n---Trigger a Unix system call. This is not intended to be used directly.class:word{n/a}{n/a}iorre
291lt?nn-f--Compare n1 and n2. Return `TRUE` if n1 is less than n2, or `FALSE` otherwise.class:primitive{n/a}{n/a}globalall
292lteq?nn-f--Compare n1 and n2. Return `TRUE` if n1 is less than or equal to n2, or `FALSE` otherwise.class:word{n/a}{n/a}globalall
293modnm-o--Divide `n` by `m` and return the remainder.class:word{n/a}{n/a}globalall
294n:-zero?n-f--Return `TRUE` if number is not zero, or `FALSE` otherwise.class:word{n/a}{n/a}nall
295n:MAX-n--Return the maximum value that will fit in a cell.class:word{n/a}{n/a}nall
296n:MIN-n--Return the minimum value that will fit in a cell.class:word{n/a}{n/a}nall
297n:absn-n--Return the absolute value of a number.class:word #10 n:abs\n #-10 n:abs\n{n/a}nall
298n:between?nlu-f--Return TRUE if number is between the lower (l) and upper (u) bounds. If not, return FALSE. This is inclusive of the limits.class:word #3 #1 #100 n:between?\n $q $a $b n:between?{n/a}nall
299n:decn-m--Decrement n by one.class:word #100 n:dec{n/a}nall
300n:even?n-f--Return `TRUE` if number is even, or `FALSE` if not.class:word #12 n:even?\n #11 n:even?{n/a}nall
301n:incn-m--Increment n by one.class:word #100 n:inc{n/a}nall
302n:limitnlu-m--Return n if it is within the lower (l) and upper (u) bounds. If outside the bounds, return the closes boundary value.class:word #-10 #5 #8 n:limit\n #10 #1 #15 n:limit{n/a}nall
303n:maxmn-o--Return the greater of two values.class:word #1 #7 n:max\n #-8 #-10 n:max{n/a}nall
304n:minmn-o--Return the lesser of two values.class:word #1 #7 n:min\n #-8 #-10 n:min{n/a}nall
305n:negaten-n--Invert the sign of a number.class:word #10 n:negate\n #-10 n:negate{n/a}nrre
306n:negative?n-f--Return `TRUE` if number is negative, or `FALSE` if not.class:word{n/a}{n/a}nall
307n:odd?n-f--Return `TRUE` if number is odd, or `FALSE` if not.class:word{n/a}{n/a}nall
308n:positive?n-f--Return `TRUE` if number is positive, or `FALSE` if not.class:word{n/a}{n/a}nall
309n:powbp-n--Return base (b) to power (p).class:word{n/a}{n/a}nall
310n:putn---Display a number.class:word{n/a}{n/a}globalall
311n:random-n--Return a random numberclass:word n:random n:put{n/a}nrre, ri
312n:sqrtn-m--Return the square root of a number.class:word{n/a}{n/a}nall
313n:squaren-m--Return the square of a number.class:word{n/a}{n/a}nall
314n:strictly-positive?n-f--Return TRUE if number is greater than zero or FALSE if it is zero or less.class:word{n/a}{n/a}nall
315n:to-floatn---FConvert a number into a floating point value.class:word{n/a}{n/a}nrre
316n:to-stringn-s--Convert a number into a string.class:word{n/a}{n/a}nall
317n:zero?n-f--Return `TRUE` if number is zero, or `FALSE` otherwise.class:word{n/a}{n/a}nall
318nipnm-m--Remove the second item from the stack.class:word{n/a}{n/a}globalall
319nl---Display a newline.class:word{n/a}{n/a}globalall
320notn-m--Perform a logical NOT operation.class:word{n/a}{n/a}globalall
321ormn-o--Perform a bitwise OR between the provided values.class:primitive{n/a}{n/a}globalall
322overnm-nmn--Put a copy of n over m.class:word{n/a}{n/a}globalall
323parse-untilq-s--Read input from stdin (via `c:get`) until the returned character is matched by the quote. Returns a string.class:word :read-until-period (-s)\n [ $. eq? ] parse-until ;{n/a}allrre
324pb:geta---Copy a string from the pasteboard to the specified address.class:word{n/a}{n/a}pbiOS{n/a}
325pb:length-n--Return the length of the string on the pasteboard.class:word{n/a}pbpbiOS
326pb:sets---Copy a string to the pasteboard.class:word{n/a}{n/a}pbiOS
327pop-nn--Move a value from the return stack to the data stack.class:macro{n/a}{n/a}globalall
328prefix:!ns---Store a value into a variable.Store a value into the named variable.Compile the code to store a value into a named variable.class:macro{n/a}{n/a}prefixall
329prefix:#s-n--Process token as a number.Convert the string into a number and leave on the stack.Convert the string into a number and compile into the current definition as a literal.class:macro{n/a}{n/a}prefixall
330prefix:$s-c--Process token as an ASCII character.Fetch first character from string. Leave on stack.Fetch first character from the string. Compile into the current definition as literal.class:macro{n/a}{n/a}prefixall
331prefix:&s-a--Return a pointer to a named item.Lookup name in dictionary, return contents of the xt field on the stack.Lookup name in dictionary, compile code to push the contents of the xt field into the current definition.class:macro{n/a}{n/a}prefixall
332prefix:'s-s--Process token as a string.Move string into temporary buffer. If `RewriteUnderscores` is `TRUE`, replace all instances of _ with space.Move string into temporary buffer. If `RewriteUnderscores` is `TRUE`, replace all instances of _ with space. Then compile the string into the current definition.class:macro{n/a}{n/a}prefixall
333prefix:(s---Process token as a comment.Discard the string.Discard the string.class:macro{n/a}{n/a}prefixall
334prefix:.s---FInterpret time: convert string to a floating point value. Compile time: convert string to a floating point value and compile code to push this value to the float stack.class:macro{n/a}{n/a}prefixrre
335prefix::s---Process token as a new definition.Create a header pointing to `here` with the provided string as the name. Sets class to `class:word`.class:macro{n/a}{n/a}prefixall
336prefix:@s-n--Fetch from a stored variable.Fetch a value from a named variable.Compile the code to fetch a value from a named variable into the current definition.class:macro{n/a}{n/a}prefixall
337prefix:`s---Process token as a bytecode.Discard the string.Convert the string to a number and use `,` to inline it into the current definition.class:macro{n/a}{n/a}prefixall
338prefix:|s---POSTPONE equivalent.Discard the string.Convert the string to a number and use `,` to inline it into the current definition.class:macro{n/a}{n/a}prefixall
339primitive---Change the class of the most recently defined word to `class:primitive`.class:word{n/a}{n/a}globalall
340pushn--n-Move a value from the data stack to the return stack.class:macro{n/a}{n/a}globalall
341rs---Lookup a reference by name and inline its pointer to the current assembly segment.class:word{n/a}{n/a}globalall
342random:mersenne-n--Return a random number using a mersenne shifterclass:word{n/a}{n/a}randomrre, ri
343random:mersenne:set-seedn---Seed random:mersenne with the specified valueclass:word{n/a}{n/a}randomrre, ri
344random:xoroshiro128**-n--Return a random number using xoroshiro128**class:word{n/a}{n/a}randomrre, ri
345random:xoroshiro128**:jump---Updates the internal xoroshiro128** state registers with the equivalent of 2^64 calls to random:xoroshiro128**.class:word{n/a}{n/a}randomrre, ri
346random:xoroshiro128**:set-seedn---Seed random:xoroshiro128** with the specified valueclass:word{n/a}{n/a}randomrre, ri
347random:xoroshiro128**:test-seednnnn---Sets the internal xoroshiro128** state registers s0..s3 starting with TOS.class:word{n/a}{n/a}randomrre, ri
348reclassa---Change the class handler of the most recently defined word to the specified one.class:word{n/a}{n/a}globalall
349reorder...ss-?--Restructure the order of items on the stack.class:word{n/a}{n/a}globalall
350repeat---Begin an unconditional loop.class:macro{n/a}{n/a}globalall
351reset...---Remove all items from the stack.class:word{n/a}{n/a}globalall
352rotabc-bca--Rotate the top three values.class:word{n/a}{n/a}globalall
353s,s---Compile the code needed to push a string pointer to the stack and inline the string data into the current definition.class:word{n/a}{n/a}globalall
354s:ASCII-LETTERS-s--Constant. Returns a string of the ASCII letters (upper and lower case)class:data{n/a}{n/a}sall
355s:ASCII-LOWERCASE-s--Constant. Returns a string of the ASCII letters in lowercaseclass:data{n/a}{n/a}sall
356s:ASCII-UPPERCASE-s--Constant. Returns a string of the ASCII letters in uppercaseclass:data{n/a}{n/a}sall
357s:DIGITS-s--Constant. Return a string of characters recognized as numeric digits.class:data{n/a}{n/a}sall
358s:PUNCTUATION-s--Constant. Return a string of characters recognized as punctuation.class:data{n/a}{n/a}sall
359s:WHITESPACE-s--Constant. Returns a string of characters recognized as whitespace.class:data{n/a}{n/a}sall
360s:appendss-s--Return a new string consisting of s1 followed by s2.class:word{n/a}{n/a}sall
361s:begins-with?ss-f--Return `TRUE` if s1 begins with s2 or `FALSE` otherwise.class:word{n/a}{n/a}sall
362s:casesSq- || sSq-s--If the `s` matches `S`, discard `s` and run the quote before exiting the caller. If they do not match, discard the quote and leave `s` on the stack.class:word{n/a}{n/a}sall
363s:chops-s--Remove the last character from a string.class:word{n/a}{n/a}sall
364s:constss---Create a constant named s2, returning a pointer to s1. This will use `s:keep` to preserve the original string.class:word{n/a}{n/a}sall
365s:contains-char?sc-f--Return `TRUE` if the character is present in the string or `FALSE` otherwise.class:word{n/a}{n/a}sall
366s:contains-string?ss-f--Return `TRUE` if the second string is present in the first string or `FALSE` otherwise.class:word{n/a}{n/a}sall
367s:copysa---Copy a string (s) to a destination (a). This will include the terminator character when copying.class:word{n/a}{n/a}sall
368s:empty-s--Return an empty string.class:word{n/a}{n/a}sall
369s:ends-with?ss-f--Return `TRUE` if s1 ends with s2 or `FALSE` otherwise.class:word{n/a}{n/a}sall
370s:eq?ss-f--Compare two strings for equality. Return `TRUE` if identical or `FALSE` if not.class:word 'hello 'again s:eq?\n 'test 'test s:eq?{n/a}sall
371s:evaluates-?--Evaluate string as if it was typed into the interpreter.class:word{n/a}{n/a}sall
372s:filtersq-s--Execute the quote once for each value in the string. If the quote returns `TRUE`, append the value into a new string. If `FALSE` the value will be discarded.class:word{n/a}{n/a}sall
373s:for-eachsq---Execute the quote once for each value in the string.class:word{n/a}{n/a}sall
374s:format...s-s--Construct a new string using the template passed and items from the stack.class:word{n/a}{n/a}sall
375s:get-s--Read input from standard in (via `c:get`) until a CR or LF is encountered. Returns a strig.class:word{n/a}{n/a}allrre
376s:hashs-n--Calculate a hash value for a string. This uses the djb2 algorithm.class:word{n/a}{n/a}sall
377s:index-ofsc-n--Return the location of the first instance of the specified character in the string.class:word{n/a}{n/a}sall
378s:index-of-stringss-n--Return the location of the first instance of the specified substring (s2) in the string (s1). Returns -1 if not found.class:word{n/a}{n/a}sall
379s:keeps-s--Store a string into the heap and return a pointer to the start of it.class:word{n/a}{n/a}sall
380s:leftsn-s--Return a new string containing the first `n` characters from the source string.class:word{n/a}{n/a}sall
381s:lengths-n--Return the number of characters in a string, excluding the NULL terminator.class:word{n/a}{n/a}sall
382s:mapsq-s--Execute the specified quote once for each character in the string. Builds a new string from the return value of the quote. The quote should return only one value.class:word{n/a}{n/a}sall
383s:prependss-s--Return a new string consisting of s2 followed by s1.class:word{n/a}{n/a}sall
384s:puts---Display a string.class:word{n/a}{n/a}globalall
385s:replacesss-s--Replace the first instance of s2 in s1 with s3.class:word{n/a}{n/a}sall
386s:reverses-s--Reverse the order of ASCII characters in a string.class:word{n/a}{n/a}sall
387s:rightsn-s--Return a new string containing the specified number of characters from the right side of the string.class:word{n/a}{n/a}sall
388s:skip---Internal helper function used to skip over a string in a definition.class:word{n/a}{n/a}sall
389s:splitsc-ss--Split a string on the first occurrance of the specified character.class:word{n/a}{n/a}sall
390s:split-on-stringss-ss--Split a string on the first occurrance of the specified string. After the split, the top stack item will be the part of the string before the specified subsring, and the second item will be the rest of the original string.class:word 'Hello_Brave_World! 'Brave s:split-on-string s:put nl s:put nl{n/a}sall
391s:substrsfl-s--Extract a substring from the specified string. This will take the characters starting at `f` and extend `l` characters in length.class:word{n/a}{n/a}sall
392s:temps-s--Move a string into the temporary string buffers.class:word{n/a}{n/a}sall
393s:to-floats---FConvert a string representation into a floating point value.class:word{n/a}{n/a}srre
394s:to-lowers-s--Convert uppercase ASCII characters in a string to lowercase.class:word{n/a}{n/a}sall
395s:to-numbers-n--Convert a string to a number.class:word{n/a}{n/a}sall
396s:to-uppers-s--Convert lowercase ASCII characters in a string to uppercase.class:word{n/a}{n/a}sall
397s:tokenizesc-a--Takes a string and a character to use as a separator. It splits the string into substrings and returns an array containing pointers to each of them.class:word{n/a}{n/a}sall
398s:tokenize-on-stringss-a--Takes a string (s1) and a substring (s2) use as a separator. It splits the string into substrings and returns as array containing pointers to each of them.class:word{n/a}{n/a}sall
399s:trims-s--Trim leading and trailing whitespace from a string.class:word '__hello__ s:trim{n/a}sall
400s:trim-lefts-s--Trim leading whitespace from a string.class:word '__hello__ s:trim-left{n/a}sall
401s:trim-rights-s--Trim trailing whitespace from a string.class:word '__hello__ s:trim-right{n/a}sall
402set-hookaa---Patch the hook point in a2 to point to a1.class:word :foo hook ;\n :bar #1 ;\n &bar &foo set-hook{n/a}globalall
403shiftmn-o--Peform a bitwise shift of m by n bits. If n is positive, shift right. If negative, the shift will be to the left.class:primitive{n/a}{n/a}globalall
404sipnq-n--Run quote. After execution completes, put a copy of n back on top of the stack.class:word{n/a}{n/a}globalall
405sp---Display a space (`ASCII:SPACE`)class:word :spaces (n-) [ sp ] times ;\n #12 spaces{n/a}globalall
406storena---Store a value into the specified address.class:primitive 'Base var\n #10 &Base store{n/a}globalall
407store-nextna-a--Store a value into the specified address and return the next address.class:word{n/a}{n/a}globalall
408swapnm-mn--Exchange the position of the top two items on the stackclass:primitive{n/a}{n/a}globalall
409sys:argc-n--Return the number of arguments passed to the program.class:word{n/a}{n/a}sysrre
410sys:argvn-s--Given an argument number, return the argument as a string.class:word{n/a}{n/a}sysrre
411sys:name-s--Return the filename of the program being run.class:word{n/a}{n/a}sysrre
412tab---Display a tab (`ASCII:HT`)class:word{n/a}{n/a}globalall
413timesnq---Run the specified quote the specified number of times.class:word #12 [ $- c:put ] times{n/a}globalall
414times<with-index>nq---Run a quote the specified number of times, tracking the loop index in `I`.class:word{n/a}{n/a}globalall
415trixqqq-?--Apply q1 against x, then q2 against a copy of x, and finally q3 against another copy of x.class:word{n/a}{n/a}globalall
416tri*xyzqqq-?--Apply q1 against x, q2 against y, and q3 against z.class:word{n/a}{n/a}globalall
417tri@xyzq-?--Apply q against x, then against y, and finally against z.class:word{n/a}{n/a}globalall
418tucknm-mnm--Put a copy of the top item on the stack under the second one.class:word{n/a}{n/a}globalall
419unhooka---Reset the hook point in a1 to the default definition.class:word :foo hook #1 ;\n :bar #2 ;\n &bar &foo set-hook\n &foo unhook{n/a}globalall
420unix:chdirs---Change the current working directory to the specified one.class:word '/etc unix:chdir{n/a}unixrre
421unix:count-files-in-cwd-n--Return the number of files (and subdirectories) in the current working directoryclass:word{n/a}{n/a}unixrre
422unix:exec0s---Execute a process by running the application specified by s.class:word{n/a}{n/a}unixrre
423unix:exec1ss---Execute a process by running the application specified by s1. Pass s2 as an argument.class:word{n/a}{n/a}unixrre
424unix:exec2sss---Execute a process by running the application specified by s1. Pass s2 and s3 as arguments.class:word{n/a}{n/a}unixrre
425unix:exec3ssss---Execute a process by running the application specified by s1. Pass s2, s3, and s4 as arguments.class:word{n/a}{n/a}unixrre
426unix:exitn---Exit the current process, returning the specified return code.class:word{n/a}{n/a}unixrre
427unix:for-each-fileq---Run a quote once for each file or subdirectory in the current directory. The quote will receive the file name as a string and should consume this and return nothing on the stack.class:word{n/a}{n/a}unixrre
428unix:fork-n--Fork the current process. Returns a PID.class:word{n/a}{n/a}unixrre
429unix:get-cwd-s--Return the current working directoryclass:word{n/a}{n/a}unixrre
430unix:getenvsa---Get an environment variable. Provide the name and an address to store it in.class:word 'SHELL s:empty [ unix:getenv ] sip s:put nl{n/a}unixrre
431unix:getpid-n--Return the PID of the current process.class:word{n/a}{n/a}unixrre
432unix:io:n:putn---Display a number (in base 10) to the standard output device. This is faster than `n:put`, but not portable.class:word{n/a}{n/a}unix:iorre
433unix:io:s:puts---Display a string to stdout. This is faster than `s:put`, but not portable.class:word{n/a}{n/a}unix:iorre
434unix:killnn---Terminates a process. Takes a process and a signal to send.class:word{n/a}{n/a}unixrre
435unix:pclosen---Close a pipe.class:word{n/a}{n/a}unixrre
436unix:popensn-n--Open a pipe. Takes a command to run, and a file mode (`file:R` or `file:W`; `file:R+` may work on some systems). Returns a file ID usable with words in the `file:` namespace.class:word{n/a}{n/a}unixrre
437unix:putenvs---Takes a string in the form `name=value` and sets an environment variable named `name` to `value`.class:word 'EDITOR=vi unix:putenv{n/a}unixrre
438unix:sleepn---Sleep for the specified number of seconds.class:word{n/a}{n/a}unixrre
439unix:systems---Runs another application using the system shell and returns after execution is completed.class:word 'ls_-lh_/etc unix:system{n/a}unixrre
440unix:time-n--Return a timestamp.class:word{n/a}{n/a}unixrre
441unix:wait-n--Waits for a child process to complete. This maps to the wait() system call.class:word{n/a}{n/a}unixrre
442unix:writesh---Write a string to the specified file handle.class:word{n/a}{n/a}unixrre
443untilq---Execute quote repeatedly while the quote returns a value of `FALSE`. The quote should return a flag of either `TRUE` or `FALSE`, though `until` will treat any non-zero value as `TRUE`.class:word #10 [ dup n:put nl n:dec dup n:zero? ] until{n/a}globalall
444v:deca---Decrement the value stored at the specified address by 1.class:word{n/a}{n/a}vall
445v:dec-byna---Decrement the value stored at the specified address by the specified value.class:word{n/a}{n/a}vall
446v:inca---Increment the value stored at the specified address by 1.class:word{n/a}{n/a}vall
447v:inc-byna---Increment the value stored at the specified address by the specified value.class:word{n/a}{n/a}vall
448v:limitalu---Fetch the value stored at the address, then run `n:limit` against it, using the specified lower and upper bounds. Then store the resulting value back to the original address.class:word{n/a}{n/a}vall
449v:offa---Set a variable to 0.class:word{n/a}{n/a}vall
450v:ona---Set a variable to -1.class:word{n/a}{n/a}vall
451v:preserveaq---Make a copy of the value at the address, then run the quote. Once the quote completes, restore the address to the specified value.class:word{n/a}{n/a}vall
452v:update-usingaq---Fetch a value from the specified address, then run the quotation with this value on the stack. Afterwards, store the returned value at the original address.class:word{n/a}{n/a}vall
453vars---Create a variable. The variable is initialized to 0.class:word 'Base var{n/a}globalall
454var<n>ns---Create a variable with the specified initial value.class:word #10 'Base var<n>\n{n/a}globalall
455whileq---Execute quote repeatedly while the quote returns a `TRUE` value. The quote should return a flag of either `TRUE` or `FALSE`, though `while` will treat any non-zero value as `TRUE`.class:word #10 [ dup n:put nl n:dec dup n:-zero? ] while{n/a}globalall
456xormn-o--Perform a bitwise XOR operation.class:primitive{n/a}{n/a}globalall
457{---Begin an array. This is intended to make creating arrays a bit cleaner than using a quotation and `array:counted-results`.class:word{n/a}{n/a}globalall
458{{---Begin a lexically scoped area.class:word{n/a}{n/a}globalall
459}-a--Complete an array begun by `{`. Returns a pointer to the data.class:word{n/a}{n/a}globalall
460}asf---End an assembly section.class:macro{n/a}{n/a}globalall
461}}---End a lexically scoped area. This will hide any headers between `{{` and `---reveal---`, leaving only headers between `---reveal---` and the `}}` visible.class:word{n/a}{n/a}globalall