* END-VARIANT ( outer-offset here some-offset -- outer-offset ) terminate definition of a new variant (mpe.000) : END-STRUCT TUCK SWAP ! 2DUP < IF NIP ELSE DROP THEN ;
END-VARIANT
( outer-offset here some-offset -- outer-offset )
: END-STRUCT TUCK SWAP ! 2DUP < IF NIP ELSE DROP THEN ;
EXTENSIONS struct ordinary primitive