* $SWAP ( $: a$ b$ -- b$ a$ ) Exchange the two most accessible strings on the string stack. Throw an error if there are less than two strings on the stack. Neither string value is copied. "string-swap"
$SWAP
( $: a$ b$ -- b$ a$ )
FORTH/DEF dstrings ordinary primitive