Remove Debug message, add missing comma
This commit is contained in:
@@ -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.
|
||||||
|
|||||||
Reference in New Issue
Block a user