diff --git a/libsrc/runtime/pushw.s b/libsrc/runtime/pushw.s index a560bef18..a88ebc3d2 100644 --- a/libsrc/runtime/pushw.s +++ b/libsrc/runtime/pushw.s @@ -1,22 +1,18 @@ ; ; Ullrich von Bassewitz, 31.08.1998 ; -; CC65 runtime: Push word from stack +; CC65 runtime: Fetch word indirect and push ; .export pushw, pushwidx .import pushax .importzp ptr1 + +pushw: ldy #1 pushwidx: - sty ptr1 - clc - adc ptr1 - bcc pushw - inx -pushw: sta ptr1 + sta ptr1 stx ptr1+1 - ldy #1 lda (ptr1),y tax dey