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

Insert line breaks into .CALL instructions

Browse Source 
Hoping to get rid of the "unknown system call name" error.
This commit is contained in:
Alexander Noack
2025-09-09 23:09:55 +02:00
parent 251cf22aad
commit 6122aaf515
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/SUDOKU.MID
View File

@@ -101,11 +101,14 @@ PUTLN: PUSHJ P,OUTSTR ;Calls the OUTSTR subroutine
POPJ P, ;before returning. POPJ P, ;before returning.
;Subroutine that reads the contents of the file into the buffer at FIELD ;Subroutine that reads the contents of the file into the buffer at FIELD
IMPRTF: .CALL [SETZ ? SIXBIT/OPEN/ [.UAI,,CHDSKI] ? A ? B ((SETZ))] IMPRTF: .CALL [SETZ ? SIXBIT/OPEN/
[.UAI,,CHDSKI] ? A ? B ((SETZ))]
.LOSE %LSFIL ;Handle errors after opening the file .LOSE %LSFIL ;Handle errors after opening the file
.CALL [SETZ ? SIXBIT/SIOT/ [,,CHDSKI] ? [BPTR,,C] ? [,,33] ((SETZ))] .CALL [SETZ ? SIXBIT/SIOT/
[,,CHDSKI] ? [BPTR,,C] ? [,,33] ((SETZ))]
.LOSE %LSFIL .LOSE %LSFIL
.CALL [SETZ ? SIXBIT/CLOSE/ [,,CHDSKI] ((SETZ))] .CALL [SETZ ? SIXBIT/CLOSE/
[,,CHDSKI] ((SETZ))]
.LOSE %LSFIL .LOSE %LSFIL
POPJ P ;Return from the input subroutine, POPJ P ;Return from the input subroutine,
DONE: .LOGOUT 2, ;Exit point for the program. DONE: .LOGOUT 2, ;Exit point for the program.