aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/aligned.asm
blob: dfdd37b50931009abea28844e88045d1d11e3766 (plain)
1
2
3
4
;C ALIGNED  addr -- a-addr       align given addr
;   DUP 1 AND + ;
        HEADER(XT_ALIGNED,7,"aligned",DOCOLON)
        DW  XT_DUP,XT_ONE,XT_AND,XT_PLUS,XT_EXIT