aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/greater.asm
blob: 30979aba494876b8ca6cd1a993c2ee78609f1e78 (plain)
1
2
3
;C >     n1 n2 -- flag         test n1>n2, signed
        HEADER(XT_GREATER,1,">",DOCOLON)
        DW XT_SWAP,XT_LESS,XT_EXIT