d-less:double — ordinary primitive
FORTH
D< ( d1.d1 d2.d2 -- flag )();p4:"d-less";
D< ( d1.d1 d2.d2 -- flag )(
)
the double-cell is-less operation ( < )