* $DUP ( $: a$ -- a$ a$ ) Leave a copy of the topmost string stack entry. The string value is not copied. "string-dupe"
$DUP
( $: a$ -- a$ a$ )
FORTH/DEF dstrings ordinary primitive