Shrank Telestrat initcwd.s by 3 bytes.

Changing when a loop test is done allowed the removal of an extra STA instruction.

diff --git a/libsrc/telestrat/initcwd.s b/libsrc/telestrat/initcwd.s
index f359ebeb4bad91d80186ee7e25758beebdbef116..dc3c5325757d8bb7814011b4751d48d686a47738 100644 (file)
--- a/libsrc/telestrat/initcwd.s
+++ b/libsrc/telestrat/initcwd.s
@@ -10,22 +10,19 @@
 
 
 initcwd:
-       
         ldx     #PWD_PTR
         BRK_TELEMON XVARS
-        
+
         sta     ptr1
         sty     ptr1+1
-        
+
         ldy     #$00
-        
-loop:        
+loop:
         lda     (ptr1),y
-        beq     done
         sta     __cwd,y
+        beq     done
         iny
         bne     loop
-       
-done:   
-        sta     __cwd,y
+
+done:
         rts