$DUP
* $DUP ( $: a$ -- a$ a$ )

Leave a copy of the topmost string stack entry. The string value is
not copied. "string-dupe"

dstrings ordinary primitive