d-zero-less:double — ordinary primitive
FORTH
D0< ( d1.d1 -- flag )();p4:"d-zero-less";
D0< ( d1.d1 -- flag )(
)
the double-cell less-than-zero operation ( 0< )