Add __fastcall__ stuff

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

diff --git a/libsrc/lynx/lynx-snd.s b/libsrc/lynx/lynx-snd.s
index 3f02efd0e68820c0f23913344e27fd79d4026729..4585ce17354de155238a8bd3ff8d2dc951049a41 100644 (file)
--- a/libsrc/lynx/lynx-snd.s
+++ b/libsrc/lynx/lynx-snd.s
@@ -11,8 +11,10 @@
         .export                _lynx_snd_play
         .export                _lynx_snd_stop
         .export                _lynx_snd_pause
-        .export                _lynx_snd_unpause
+        .export                _lynx_snd_continue
        .interruptor    lynx_snd_handler
+       .import         popa
+        .importzp       ptr1
 
 ;----------------------------------------------------------------------------
 ; ZP variables that go into APPZP
@@ -1101,7 +1103,12 @@ set0:                ldy SndOffsets,x
 
 
 _lynx_snd_play:
-
+       sta ptr1
+       stx ptr1+1
+       jsr popa
+       tax
+       lda ptr1
+       ldy ptr1+1
                 php
                 pha
                 lda SndActive,x
@@ -1213,7 +1220,7 @@ _lynx_snd_pause:    php
                 rts
 
 
-_lynx_snd_unpause:   php
+_lynx_snd_continue:   php
                 sei
 SndPauseOff1:    lda #0 ; Selbsmodifizierter Code!!!
                 sta STIMCTLA