"DOUBLE-Misc Compatibility words"

double_misc FORTH
* 2ROT ( d1,d1 d2,d2 d3,d3 -- d2,d2 d3,d3 d1,d1 )

the double-cell ROT operation.
actively moves six cells, i.e.
   ( x1 x2 x3 x4 x5 x6 -- x3 x4 x5 x6 x1 x2 )

FORTH/FORTH double_misc (dpANS8.6.2.0420) ordinary primitive

* DU< ( d1,d1 d2,d2 -- flag )

the double-cell unsigned-is-less operation ( U< )

FORTH/FORTH double_misc ordinary primitive

* LITERAL, ( value -- )

take the value from stack (or cs-stack) and compile a runtime-code and
the value as for LITERAL ... this word is never state-smart, it
is not immediate, and has therefore no complications with POSTPONE
(compare also with COMPILE, to make a call-stub with an exectoken)

FORTH/FORTH double_misc ordinary primitive

* 2LITERAL, ( x1,x2 -- )

take the double-value from stack (or cs-stack) and compile a runtime-code
and the value as for 2LITERAL ... this word is never state-smart, it
is not immediate, and has therefore no complications with POSTPONE
(compare also with COMPILE, to make a call-stub with an exectoken)

FORTH/FORTH double_misc ordinary primitive