Rewrite

git-svn-id: svn://svn.cc65.org/cc65/trunk@1605 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/libsrc/runtime/pushw.s b/libsrc/runtime/pushw.s
index a560bef1842298da4a4e2350028a6e986997112f..a88ebc3d26118a3d3c04cd8000e376e114021703 100644 (file)
--- 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