]> git.sur5r.net Git - cc65/blobdiff - libsrc/common/strpbrk.s
Removed (pretty inconsistently used) tab chars from source code base.
[cc65] / libsrc / common / strpbrk.s
index e34468b53c013a5e0daef7ad601edc668f6bcb47..5d1482913d73f0366f8707de12bb0b8e7c601b18 100644 (file)
@@ -1,59 +1,59 @@
-;                                                  
+;                                                   
 ; Ullrich von Bassewitz, 11.06.1998
 ;
 ; char* strpbrk (const char* s1, const char* s2);
 ;
 
-       .export         _strpbrk
-       .import         popax, return0
-       .importzp       ptr1, ptr2, tmp1, tmp2, tmp3
+        .export         _strpbrk
+        .import         popax, return0
+        .importzp       ptr1, ptr2, tmp1, tmp2, tmp3
 
 _strpbrk:
-               jsr     popax           ; get s2
-       sta     ptr2
-       stx     ptr2+1
-       jsr     popax           ; get s1
-       sta     ptr1
-       stx     ptr1+1
-       ldy     #$00
-
-L1:    lda     (ptr1),y        ; get next char from s1
-               beq     L9              ; jump if done
-       sta     tmp2            ; save char
-       iny
-       bne     L2
-       inc     ptr1+1
-L2:    sty     tmp3            ; save index into s1
-
-       ldy     #0              ; get index into s2
-L3:    lda     (ptr2),y        ;
-       beq     L4              ; jump if done
-       cmp     tmp2
-       beq     L6
-       iny
-       bne     L3
+        jsr     popax           ; get s2
+        sta     ptr2
+        stx     ptr2+1
+        jsr     popax           ; get s1
+        sta     ptr1
+        stx     ptr1+1
+        ldy     #$00
+
+L1:     lda     (ptr1),y        ; get next char from s1
+        beq     L9              ; jump if done
+        sta     tmp2            ; save char
+        iny
+        bne     L2
+        inc     ptr1+1
+L2:     sty     tmp3            ; save index into s1
+
+        ldy     #0              ; get index into s2
+L3:     lda     (ptr2),y        ;
+        beq     L4              ; jump if done
+        cmp     tmp2
+        beq     L6
+        iny
+        bne     L3
 
 ; The character was not found in s2. Increment the counter and start over
 
-L4:            ldy     tmp3            ; reload index
-       inx
-       bne     L1
-       inc     tmp1
-       bne     L1
+L4:     ldy     tmp3            ; reload index
+        inx
+        bne     L1
+        inc     tmp1
+        bne     L1
 
 ; A character was found. Calculate a pointer to this char in s1 and return it.
 
-L6:    ldx     ptr1+1
-       lda     tmp3            ; get y offset
-       clc
-       adc     ptr1
-       bcc     L7
-       inx
-L7:    rts
+L6:     ldx     ptr1+1
+        lda     tmp3            ; get y offset
+        clc
+        adc     ptr1
+        bcc     L7
+        inx
+L7:     rts
 
 ; None of the characters in s2 was found - return NULL
 
-L9:    jmp     return0
+L9:     jmp     return0