aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/m-plus.asm
blob: 633e2f80f4483ece0f07b39382ab338b2cf3805c (plain)
1
2
3
4
5
6
;X M+       d n -- d         add single to double
        CODEHEADER(XT_MPLUS,2,"m+")
        ADD     TOS,2(PSP)
        ADDC    #0,0(PSP)
        MOV     @PSP+,TOS
        NEXT