Correcting alignment

diff --git a/libsrc/telestrat/close.s b/libsrc/telestrat/close.s
index 240ebb0635ca1c66eebdbcf13508e0065e6491a5..04d8788d16dc4a03f62f099867ad4860e77149e3 100644 (file)
--- a/libsrc/telestrat/close.s
+++ b/libsrc/telestrat/close.s
@@ -6,7 +6,7 @@
         
     .include        "zeropage.inc"             
     .include        "telestrat.inc"
-    .include           "errno.inc"
+    .include        "errno.inc"
     .include        "fcntl.inc"        
        
 ; int open (const char* name, int flags, ...);    /* May take a mode argument */

diff --git a/libsrc/telestrat/mainargs.s b/libsrc/telestrat/mainargs.s
index fa388cbfa56804ee704a4dd4fb587708d2f05da8..41c3a51310164b9b9a528810d95174d3a070ff2e 100644 (file)
--- a/libsrc/telestrat/mainargs.s
+++ b/libsrc/telestrat/mainargs.s
@@ -26,14 +26,14 @@ initmainargs:
 L0:     lda     BUFEDT,x
         beq    L3
         cmp    #' '
-               bne     L1
-               lda     #0
-               beq     L3
+        bne    L1
+        lda    #0
+        beq    L3
 L1:     sta     name,x
         inx
-               cpx     #FNAME_LEN
+        cpx    #FNAME_LEN
         bne     L0
-               lda     #0
+        lda    #0
 L3:            
         sta    name,x
         inc     __argc          ; argc always is equal to, at least, 1
@@ -57,7 +57,7 @@ setterm:sta     term            ; Set end of argument marker
 ; Now, store a pointer, to the argument, into the next slot.
 
         txa                     ; Get low byte
-           clc
+        clc
         adc    #<BUFEDT
         bcc    L4
         inc    L5+1

diff --git a/libsrc/telestrat/write.s b/libsrc/telestrat/write.s
index 1c01905315245dc21f06996db7fbe1b13db51203..278c28c83c03540a8585938b864aa82393b79287 100644 (file)
--- a/libsrc/telestrat/write.s
+++ b/libsrc/telestrat/write.s
@@ -24,25 +24,23 @@
         stx     ptr1+1
         jsr     popax           ; get fd and discard
 
-               ; if fd=0001 then it stdout
-               
-               
-               cpx     #0
-               beq     next
-               jmp     L1
+        ; if fd=0001 then it stdout
+        cpx    #0
+        beq    next
+        jmp    L1
 next:          
-               cmp     #1
-               beq     L1              
+        cmp    #1
+        beq    L1              
                
-               ; Here it's a file opened
-               lda     ptr1
-               sta     PTR_READ_DEST
-               lda     ptr1+1
-               sta     PTR_READ_DEST+1
-               lda     ptr3
-               ldy     ptr3+1
-               BRK_TELEMON  XFWRITE
-               rts
+        ; Here it's a file opened
+        lda    ptr1
+        sta    PTR_READ_DEST
+        lda    ptr1+1
+        sta    PTR_READ_DEST+1
+        lda    ptr3
+        ldy    ptr3+1
+        BRK_TELEMON  XFWRITE
+        rts
                
                
 L1:     inc     ptr2
@@ -54,9 +52,9 @@ L2:     ldy     #0
         tax
         cpx     #$0A            ; Check for \n
         bne     L3
-               BRK_TELEMON  XWR0  ; Macro send char to screen (channel 0 in telemon terms)
+        BRK_TELEMON  XWR0  ; Macro send char to screen (channel 0 in telemon terms)
                lda     #$0D ; return to the beggining of the line
-               BRK_TELEMON  XWR0  ; Macro ; 
+        BRK_TELEMON  XWR0  ; Macro ; 
        
 
         ldx     #$0D