s-to-d:core — ordinary primitive
FORTH
S>D ( a -- a,a' )();p4:"s-to-d";
S>D ( a -- a,a' )(
)
signed extension of a single-cell value to a double-cell value