Remove Debug message, add missing comma

This commit is contained in:
2025-10-07 21:50:53 +02:00
parent cf17b0b923
commit 9b3842f9ee

View File

@@ -43,8 +43,6 @@ START: MOVE P,[-PDLLEN,,PDL-1] ;Initialize the stack.
MOVEI B,FNAME2 ;Store the second file name in B MOVEI B,FNAME2 ;Store the second file name in B
MOVEI C,FIELD ;Store the address of field in C MOVEI C,FIELD ;Store the address of field in C
PUSHJ P,IMPRTF ;Load the file PUSHJ P,IMPRTF ;Load the file
MOVE A,[BPTR,,WELCOME]
PUSHJ P,PUTLN
PUSHJ P,PFIELD ;Print the loaded field. PUSHJ P,PFIELD ;Print the loaded field.
JRST DONE ;Jump to the end of the program. JRST DONE ;Jump to the end of the program.
@@ -156,7 +154,7 @@ IMPREX: .CALL [SETZ ? SIXBIT/CLOSE/ ;Close the file, before returning.
.LOSE %LSFIL .LOSE %LSFIL
POP P,X ;Restore the X register. POP P,X ;Restore the X register.
POP P,A ;Restore the A register. POP P,A ;Restore the A register.
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.
WELCOME:ASCIZ /SUDOKU SOLVER v0.1/ ;Text of the welcome banner. WELCOME:ASCIZ /SUDOKU SOLVER v0.1/ ;Text of the welcome banner.
LOADING:ASCIZ /LOADING / ;Load message. LOADING:ASCIZ /LOADING / ;Load message.