Moved IRQ hooking / unhooking from startup code to constructor / destructor to avoid linking in the hooking / unhooking code (and callirq) for the majority of cc65 prorams not linking in interruptors.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5985 b7a2c559-68d2-44c3-8de9-860c34a00d81
2013-02-12 22:39:38 +00:00
parent 1607b05104
commit 7c9171ee87
36 changed files with 886 additions and 732 deletions
--- a/libsrc/atmos/irq.s
+++ b/libsrc/atmos/irq.s
@@ -0,0 +1,64 @@
+;
+; IRQ handling (Oric version)
+;
+
+	.export		initirq, doneirq
+	.import		callirq
+
+	.include	"atmos.inc"
+
+; ------------------------------------------------------------------------
+
+.segment	"INIT"
+
+initirq:
+	lda	IRQVec
+	ldx	IRQVec+1
+	sta	IRQInd+1
+	stx	IRQInd+2
+	lda	#<IRQStub
+	ldx	#>IRQStub
+	sei
+	sta	IRQVec
+	stx	IRQVec+1
+	cli
+	rts
+
+; ------------------------------------------------------------------------
+
+.code
+
+doneirq:
+	beq	NoIRQ2
+	lda	IRQInd+1
+	ldx	IRQInd+2
+	sei
+	sta	IRQVec
+	stx	IRQVec+1
+	cli
+	rts
+
+; ------------------------------------------------------------------------
+
+.segment	"LOWCODE"
+
+IRQStub:
+	cld				; Just to be sure
+	pha
+	txa
+	pha
+	tya
+	pha
+	jsr	callirq			; Call the functions
+	pla
+	tay
+	pla
+	tax
+	pla
+	jmp	IRQInd			; Jump to the saved IRQ vector
+
+; ------------------------------------------------------------------------
+
+.data
+
+IRQInd:	jmp	$0000