str-tuck:dstrings — ordinary primitive
FORTH
$TUCK
($: a$ b$ -- b$ a$ b$ )( | ) ; |
; |
Copy the top string stack item just below the second item. The string value is not copied. <ansref>"string-tuck"</ansref>
NOTE: Because of essential string space bookkeeping, the system level implementation can be little more efficient than the high-level definition:
: $TUCK $SWAP $OVER ;