jali/PDP10Sudoku
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Debug change the form the file name is given.

Browse Source
This commit is contained in:
Alexander Noack
2025-12-16 13:58:15 +01:00
parent 963e74b1e4
commit 4f98ceccb2
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/sudoku.s
View File

@@ -159,7 +159,7 @@ IMPRTF: PUSH P,A ;Save the A register.
MOVE X,[440400,,FIELD] ;Init a 4-bit byte pointer to FIELD. MOVE X,[440400,,FIELD] ;Init a 4-bit byte pointer to FIELD.
.CALL [SETZ ? SIXBIT/OPEN/ ;Open a file descriptor. .CALL [SETZ ? SIXBIT/OPEN/ ;Open a file descriptor.
[.UAI,,CHDSKI] ? [SIXBIT/DSK/] ;Mode, channel and device name [.UAI,,CHDSKI] ? [SIXBIT/DSK/] ;Mode, channel and device name
FNAME1 ? FNAME2 ((SETZ))] FNAME1 ? 400000,,FNAME2]
.LOSE %LSFIL ;Handle errors after opening the file .LOSE %LSFIL ;Handle errors after opening the file
IMPRD: .IOT CHDSKI,A ;Read an ascii char into A. IMPRD: .IOT CHDSKI,A ;Read an ascii char into A.
JUMPL A,IMPREX ;If there was nothing read, exit. JUMPL A,IMPREX ;If there was nothing read, exit.