Optimize 3 more bytes.

dmsc · Feb 22, 2018 · a0c5444 · a0c5444
1 parent a157049
commit a0c5444
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/alloc.asm b/src/alloc.asm
@@ -150,11 +150,13 @@ loop:
         sty     alloc_size
         iny
         sty     alloc_size+1
-        jmp     add_pointers
+        bne     add_pointers
 .endproc
 
         ; Increase program memory area by A (size in bytes)
 .proc alloc_prog
+        .importzp       opos
+        lda     opos
         ; Move from "prog_end", up by "alloc_size"
         ldx     #prog_end - mem_start
         jsr     alloc_area_8

diff --git a/src/parse.asm b/src/parse.asm
@@ -134,7 +134,6 @@ ok_loop:
         bne     parser_error
 ok:     lda     #TOK_END
         jsr     emit_const
-        lda     opos
         jsr     alloc_prog
         clc
         bcc     restore_stack   ; exit
@@ -341,7 +340,6 @@ pexit_ok:
         bne     set_parse_error
 line_ok:
         ; Increases output buffer
-        lda     opos
         jsr     alloc_prog
         jmp     parse_line