aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/unloop.asm
blob: ac8e5a6775dcfc606e926e1fc32f4e7a5e0b2b94 (plain)
1
2
3
4
5
;C UNLOOP   --   R: sys1 sys2 --  drop loop parms
        CODEHEADER(XT_UNLOOP,6,"unloop")
        MOV     @RSP+,INDEX     ; restore old loop values
        MOV     @RSP+,LIMIT
        NEXT