d-equals:double — ordinary primitive
FORTH
D= ( d1.d1 d2.d2 -- flag )();p4:"d-equals";
D= ( d1.d1 d2.d2 -- flag )(
)
the double-cell is-equal operation ( = )
dpANS 8.6.1.1120 - standard forth word