From 6f3a68d4a0c1cc4184e349202b00f86e034d1b27 Mon Sep 17 00:00:00 2001
From: Jali <jali@orca-central.de>
Date: Thu, 18 Dec 2025 18:42:50 +0100
Subject: [PATCH] Remove stack saves of register F

---
 src/sudoku.s | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/src/sudoku.s b/src/sudoku.s
index 2606893..ab0e6cb 100644
--- a/src/sudoku.s
+++ b/src/sudoku.s
@@ -88,15 +88,13 @@ TOSEN:  POP   P,D                     ;Restore the D register.
 ;Subroutine to print a string of text on the output.
 ;Clobbers A.
 OUTSTR: PUSH  P,B                      ;Save register B.
-        PUSH  P,F                      ;Save register F.
 OUT:    ILDB  B,A                      ;Load the next byte from A.
         JUMPE B,OUTEX                  ;Exit the routine, if all bytes are done.
         TLNN  A,000100                 ;Test, if the SIXBIT flag is set.
          ADDI B,40                     ;Convert SIXBIT to ASCII.
         .IOT  CHTTYO,B                 ;Print a character.
         JRST  OUT                      ;Jump back to print the next character.
-OUTEX:  POP   P,F                      ;Restore D to its original value.
-        POP   P,B                      ;Restore B to its original value.
+OUTEX:  POP   P,B                      ;Restore B to its original value.
         POPJ  P,                       ;Return from the output routine.
 
 ;Subroutine to print an entire line of text, including a line break.