From: ol.sc
Date: Mon, 2 Jan 2012 11:09:25 +0000 (+0000)
Subject: Moving the quit-hook towards the end of page 3 as far as possible slightly increases...
X-Git-Tag: V2.13.3~107
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=80a7a8df00c48095bf73faaf9ef28cc86dbbfb11;p=cc65
Moving the quit-hook towards the end of page 3 as far as possible slightly increases the compatibility with BIN programs making use of page 3 themselves.
git-svn-id: svn://svn.cc65.org/cc65/trunk@5358 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
diff --git a/libsrc/apple2/exec.s b/libsrc/apple2/exec.s
index f34c4e362..2660b6f86 100644
--- a/libsrc/apple2/exec.s
+++ b/libsrc/apple2/exec.s
@@ -188,12 +188,6 @@ source: jsr $BF00
; Go for it ...
jmp (data_buffer)
- ; Quit to ProDOS dispatcher
-quit = * - source + target
-: jsr $BF00
- .byte $65 ; QUIT
- .word quit_param
-
read_param = * - source + target
.byte $04 ; PARAM_COUNT
read_ref = * - source + target
@@ -208,6 +202,12 @@ close_param = * - source + target
close_ref = * - source + target
.byte $00 ; REF_NUM
+ ; Quit to ProDOS dispatcher
+quit = * - source + target
+: jsr $BF00
+ .byte $65 ; QUIT
+ .word quit_param
+
quit_param = * - source + target
.byte $04 ; PARAM_COUNT
.byte $00 ; QUIT_TYPE
@@ -215,8 +215,8 @@ quit_param = * - source + target
.byte $00 ; RESERVED
.word $0000 ; RESERVED
-size = * - source
+size = * - source
-target = DOSWARM - size
+target = DOSWARM - size
dosvec: jmp quit