Shave 2 bytes from PATH

2026-04-19 18:16:52 +00:00 · 2024-01-01 21:43:55 -08:00
parent 3360d44dd7
commit af1c8f1865
1 changed files with 3 additions and 4 deletions
@@ -171,16 +171,15 @@ nxtchr: jsr     ToUpperASCII
        lda     #>execute
        sta     XTRNADDR+1

-        ;; Mark command as external (zero).
-        lda     #0
-        sta     XCNUM
-
        ;; Set accepted parameter flags (optional name)
        lda     #PBitsFlags::FNOPT | PBitsFlags::FN1
        sta     PBITS
        lda     #0
        sta     PBITS+1

+        ;; Mark command as external (zero).
+        sta     XCNUM           ; A=0 from above
+
        clc                     ; Success (so far)
        rts                     ; Return to BASIC.SYSTEM