From fb523413758c8edbdc310c2f3c96ef27392ef610 Mon Sep 17 00:00:00 2001 From: Jali Date: Tue, 18 Nov 2025 22:28:01 +0100 Subject: [PATCH] Remove TOSIXB --- src/sudoku.s | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/sudoku.s b/src/sudoku.s index edba133..dc3ec56 100644 --- a/src/sudoku.s +++ b/src/sudoku.s @@ -52,6 +52,7 @@ GETJCL: PUSH P,A ;Save the register A. MOVE A,[JCL,,JCL+30] BLT A,JCL+30 .BREAK 12,[..RJCL,,JCL] ;Request the JCL. + MOVE A,[JCL] MOVE A,[BPTR,,JCL] ;Load the command parameters into A. MOVE B,[BPTR,,FNAME1] ;Pointer to the first file name. ;PUSHJ P,TOSIXB ;Transfer the first word into FNAME1 @@ -60,7 +61,7 @@ GETJCL: PUSH P,A ;Save the register A. POP P,B ;Restore the B register. POP P,A ;Restore the A register. POPJ P, ;Return from routine. - + ;Subroutine to convert an ASCII string into SIXBIT. Takes a byte ;pointer in A and B, where A is the source and B is the destination. TOSIXB: PUSH P,D ;Store the contents of register D.