]> git.sur5r.net Git - cc65/blobdiff - libsrc/vic20/irq.s
Added SER_ prefix. Whitespace cleanup
[cc65] / libsrc / vic20 / irq.s
index c6bc137faf5e5ddaa46b3076866f916bfdd15007..4c7c832accc487e7353002ed210d7439b2a8b55f 100644 (file)
@@ -2,52 +2,48 @@
 ; IRQ handling (Vic20 version)
 ;
 
-       .export         initirq, doneirq
-       .import         callirq
+        .export         initirq, doneirq
+        .import         callirq
 
-       .include        "vic20.inc"
+        .include        "vic20.inc"
 
 ; ------------------------------------------------------------------------
 
-.segment       "INIT"
+.segment        "ONCE"
 
 initirq:
-       lda     IRQVec
-       ldx     IRQVec+1
-       sta     IRQInd+1
-       stx     IRQInd+2
-       lda     #<IRQStub
-       ldx     #>IRQStub
-       sei
-       sta     IRQVec
-       stx     IRQVec+1
-       cli
-       rts
+        lda     IRQVec
+        ldx     IRQVec+1
+        sta     IRQInd+1
+        stx     IRQInd+2
+        lda     #<IRQStub
+        ldx     #>IRQStub
+        jmp     setvec
 
 ; ------------------------------------------------------------------------
 
 .code
 
 doneirq:
-       lda     IRQInd+1
-       ldx     IRQInd+2
-       sei
-       sta     IRQVec
-       stx     IRQVec+1
-       cli
-       rts
+        lda     IRQInd+1
+        ldx     IRQInd+2
+setvec: sei
+        sta     IRQVec
+        stx     IRQVec+1
+        cli
+        rts
 
 ; ------------------------------------------------------------------------
 
-.segment       "LOWCODE"
+.segment        "LOWCODE"
 
 IRQStub:
-       cld                             ; Just to be sure
-       jsr     callirq                 ; Call the functions
-       jmp     IRQInd                  ; Jump to the saved IRQ vector
+        cld                             ; Just to be sure
+        jsr     callirq                 ; Call the functions
+        jmp     IRQInd                  ; Jump to the saved IRQ vector
 
 ; ------------------------------------------------------------------------
 
 .data
 
-IRQInd:        jmp     $0000
+IRQInd: jmp     $0000