]> git.sur5r.net Git - cc65/blobdiff - libsrc/common/_sys.s
Removed (pretty inconsistently used) tab chars from source code base.
[cc65] / libsrc / common / _sys.s
index 12c28adee2829b9eacda25d35c4b3e7454648690..492e85673b38debbcc31c91db45af6d3345526c4 100644 (file)
@@ -4,22 +4,22 @@
 ; Ullrich von Bassewitz, 16.12.1998
 ;
 
-       .export         __sys
-       .import         jmpvec
-       .importzp       ptr1
+        .export         __sys
+        .import         jmpvec
+        .importzp       ptr1
 
 
-__sys: sta     ptr1
-       stx     ptr1+1          ; Save the pointer to r
+__sys:  sta     ptr1
+        stx     ptr1+1          ; Save the pointer to r
 
 ; Fetch the PC and store it into the jump vector
 
-       ldy     #5
-       lda     (ptr1),y
-       sta     jmpvec+2
-       dey
-       lda     (ptr1),y
-       sta     jmpvec+1
+        ldy     #5
+        lda     (ptr1),y
+        sta     jmpvec+2
+        dey
+        lda     (ptr1),y
+        sta     jmpvec+1
 
 ; Remember the flags so we can restore them to a known state after calling the
 ; routine
@@ -29,51 +29,51 @@ __sys:      sta     ptr1
 ; Get the flags, keep the state of bit 4 and 5 using the other flags from
 ; the flags value passed by the caller. Push the new flags and push A.
 
-       dey
+        dey
         php
         pla                     ; Current flags -> A
         eor     (ptr1),y
         and     #%00110000
         eor     (ptr1),y
-       pha                     ; Push new flags value
-       ldy     #0
-       lda     (ptr1),y
-       pha
+        pha                     ; Push new flags value
+        ldy     #0
+        lda     (ptr1),y
+        pha
 
 ; Get and assign X and Y
 
-       iny
-       lda     (ptr1),y
-       tax
-       iny
-       lda     (ptr1),y
-       tay
+        iny
+        lda     (ptr1),y
+        tax
+        iny
+        lda     (ptr1),y
+        tay
 
 ; Set a and the flags, call the machine code routine
 
-       pla
-       plp
-       jsr     jmpvec
+        pla
+        plp
+        jsr     jmpvec
 
 ; Back from the routine. Save the flags and A.
 
-       php
-       pha
+        php
+        pha
 
 ; Put the register values into the regs structure
 
-       tya
-       ldy     #2
-       sta     (ptr1),y
-       dey
-       txa
-       sta     (ptr1),y
-       dey
-       pla
-       sta     (ptr1),y
-       ldy     #3
-       pla
-       sta     (ptr1),y
+        tya
+        ldy     #2
+        sta     (ptr1),y
+        dey
+        txa
+        sta     (ptr1),y
+        dey
+        pla
+        sta     (ptr1),y
+        ldy     #3
+        pla
+        sta     (ptr1),y
 
 ; Restore the old flags value
 
@@ -81,5 +81,5 @@ __sys:        sta     ptr1
 
 ; Done
 
-       rts
+        rts