From 3ed3e98ec735c0fc8bebf28e4afebcac1d628fca Mon Sep 17 00:00:00 2001
From: Oliver Schmidt <ol.sc@web.de>
Date: Mon, 16 Feb 2015 15:43:08 +0100
Subject: [PATCH] Moved interrupt enabling to the interrupt constructor.

---
 libsrc/apple2/crt0.s | 4 ----
 libsrc/apple2/irq.s  | 4 ++++
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/libsrc/apple2/crt0.s b/libsrc/apple2/crt0.s
index 4a7463b27..0f134202e 100644
--- a/libsrc/apple2/crt0.s
+++ b/libsrc/apple2/crt0.s
@@ -164,10 +164,6 @@ basic:  lda     HIMEM
 :       sta     sp
         stx     sp+1
 
-        ; Enable interrupts, as old ProDOS versions (i.e. 1.1.1)
-        ; jump to SYS and BIN programs with interrupts disabled.
-        cli
-
         ; Call the module constructors.
         jsr     initlib
 
diff --git a/libsrc/apple2/irq.s b/libsrc/apple2/irq.s
index c81fa7108..0b0555695 100644
--- a/libsrc/apple2/irq.s
+++ b/libsrc/apple2/irq.s
@@ -21,6 +21,10 @@ initirq:
         .byte   $40             ; Alloc interrupt
         .addr   i_param
         bcs     prterr
+
+        ; Enable interrupts, as old ProDOS versions (i.e. 1.1.1)
+        ; jump to SYS and BIN programs with interrupts disabled.
+        cli
         rts
 
         ; Print error message and exit
-- 
2.39.5