* ENDCAT ( -- $: cat$ ) If there is no concatenating string, do nothing. If there is, leave it as a string bound to the string stack, and terminate concatenation, permitting normal copies into the string buffer. "end-cat"
ENDCAT
( -- $: cat$ )
dstrings ordinary primitive