8.6.1.0360
2CONSTANT
two-constant
DOUBLE
 
( x1 x2 "<spaces>name" -- )

Skip leading space delimiters. Parse name delimited by a space. Create a definition for name with the execution semantics defined below.

name is referred to as a "two-constant".

name Execution:
( -- x1 x2 )

Place cell pair x1 x2 on the stack.

See:
3.4.1 Parsing, A.8.6.1.0360 2CONSTANT.

Rationale:
Typical use: x1 x2 2CONSTANT name
Testing:
T{ 1 2 2CONSTANT 2c1 -> }T
T{ 2c1 -> 1 2 }T

T{ : cd1 2c1 ; -> }T
T{ cd1 -> 1 2 }T

T{ : cd2 2CONSTANT ; -> }T
T{ -1 -2 cd2 2c2 -> }T
T{ 2c2 -> -1 -2 }T

T{ 4 5 2CONSTANT 2c3 IMMEDIATE 2c3 -> 4 5 }T
T{ : cd6 2c3 2LITERAL ; cd6 -> 4 5 }T