From 46b43bacf06a174bdd7059869c4733f0ebb491f6 Mon Sep 17 00:00:00 2001 From: Jali Date: Sun, 28 Sep 2025 17:04:27 +0200 Subject: [PATCH] Set the path names for the OPEN call --- src/sudoku.s | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/sudoku.s b/src/sudoku.s index d35128c..3b1c8b3 100644 --- a/src/sudoku.s +++ b/src/sudoku.s @@ -138,10 +138,10 @@ IMPRTF: PUSH P,A ;Save the A register. MOVE X,[440400,,FIELD] ;Init a 4-bit byte pointer to FIELD. .CALL [SETZ ? SIXBIT/OPEN/ ;Open a file descriptor. [.UAI,,CHDSKI] ? [SIXBIT/DSK/] ;Mode, channel and device name - A ? B ((SETZ))] + [A] ? [B] ((SETZ))] .LOSE %LSFIL ;Handle errors after opening the file IMPRD: .IOT CHDSKI,A ;Read an ascii char into A. - JUMPE A,IMPREX ;If there was nothing read, exit. + JUMPL A,IMPREX ;If there was nothing read, exit. CAIGE A,060 ;Is A >= '0' then skip, JUMPA IMPRD ;else read the next char. CAILE A,071 ;If A <= '9', then skip.