SIGN SIGMSG SIGNAL
SIGN ( a -- )  
ansi .6.1.2210 <CORE>
put the sign of the value into the hold-space, this is the forth-style output formatting, see HOLD

reference: p4_sign in ../src/core.c:1709, export CO SIGN