git.sur5r.net Git - cc65/blob - libsrc/geos/memory/doublespop.s

   1
   2 ;
   3 ; Maciej 'YTM/Alliance' Witkowiak
   4 ;
   5 ; 22.12.99
   6
   7             .import popax
   8             .importzp ptr3, ptr4
   9             .export DoubleSPop
  10
  11             .include "../inc/geossym.inc"
  12
  13 DoubleSPop:
  14             sta ptr4
  15             stx ptr4+1
  16             jsr popax
  17             sta ptr3
  18             stx ptr3+1
  19             lda #ptr4
  20             ldx #ptr3
  21             rts