git.sur5r.net Git - cc65/blob - libsrc/runtime/pushwsp.s

   1 ;
   2 ; Ullrich von Bassewitz, 31.08.1998
   3 ;
   4 ; CC65 runtime: Load word from stack slot and push
   5 ;
   6
   7         .export         pushwysp, pushw0sp
   8         .import         pushax
   9         .importzp       sp
  10
  11 pushw0sp:
  12         ldy     #1
  13 pushwysp:
  14         lda     (sp),y          ; get hi byte
  15         tax
  16         dey
  17         lda     (sp),y          ; get lo byte
  18         jmp     pushax          ; push that
  19
  20