From 87562354b173aa54c7f5b718f3aa4dd411ce6361 Mon Sep 17 00:00:00 2001
From: Jali <jali@orca-central.de>
Date: Tue, 5 Aug 2025 22:32:20 +0200
Subject: [PATCH] fix overlong labels 2

---
 src/SUDOKU.MID | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/SUDOKU.MID b/src/SUDOKU.MID
index 9d604ed..4d904f8 100644
--- a/src/SUDOKU.MID
+++ b/src/SUDOKU.MID
@@ -41,9 +41,9 @@ GETJCL: PUSH  P,A                      ;Save the register A.
         .BREAK 12,[..RJCL,,JCL]        ;Request the JCL.
         MOVE  A,[BPTR,,JCL]            ;Load the command parameters into A.
         MOVE  B,[BPTR,,FNAME1]         ;Pointer to the first file name.
-        PUSHJ TOSIXBIT                 ;Transfer the first word into FNAME1
+        PUSHJ TOSIXB                   ;Transfer the first word into FNAME1
         MOVE  B,[BPTR,,FNAME2]         ;Pointer to the second file name.
-        PUSHJ TOSIXBIT                 ;Transfer the second word into FNAME2
+        PUSHJ TOSIXB                   ;Transfer the second word into FNAME2
         POP   P,B                      ;Restore the B register.
         POP   P,A                      ;Restore the A register.
         POPJ  P,                       ;Return from routine.