These are the words which I have not (yet) done as primitives. They
probably should be done in high-level
*/ n1 n2 n3 -- n4 core star_slash
*/mode n1 n2 n3 -- n4 n5 core star_slash_mod
phrases in the standard document
m*/ d1 n1 +n2 -- d2 double m_star_slash
aligned c_addr -- a_addr core
here -- addr core
unloop -- core
2>r w1 w2 -- core-ext
2r> w1 -- w2 core-ext
2r@ -- w1 w2 core-ext
do2con -- w1 w2 new (double)
2lit -- w1 w2 new (double)
/* implement as lit lit ? */
date -- n1 n2 n3 n4 n5 n6 core-ext
ms u -- core-ext
roll u -- core-ext
leave -- fig
/* new meaning in ANSI Forth */
(find) ... pfind
enclose ...
?terminal ...
write-line c_addr u1 wfileid -- u2 wior file
falog r1 -- r2 float-ext
f~ r1 r2 r3 -- flag float-ext f-proximate
/* we should do primitives for the sub-functions */
ekey -- char toolkit-ext
emit? -- flag toolkit-ext
key? -- flag toolkit-ext
lex c_addr1 u1 c_addr2 u2 -- ... string-ext
available -- u memory-ext
/* there is no way to make that one without implementing our own
allocation package */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>