aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/dabs.asm
blob: 4f8259e6d10be30b517090e6773e0fe8aef0e430 (plain)
1
2
3
4
;X DABS     d1 -- +d2    absolute value dbl.prec.
;   DUP ?DNEGATE ;
    HEADER(XT_DABS,4,"dabs",DOCOLON)
        DW XT_DUP,XT_QDNEGATE,XT_EXIT