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

Remove TOSIXB

Browse Source
This commit is contained in:
Alexander Noack
2025-11-18 22:28:01 +01:00
parent a4b20bb390
commit fb52341375
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/sudoku.s
View File

@@ -52,6 +52,7 @@ GETJCL: PUSH P,A ;Save the register A.
MOVE A,[JCL,,JCL+30] MOVE A,[JCL,,JCL+30]
BLT A,JCL+30 BLT A,JCL+30
.BREAK 12,[..RJCL,,JCL] ;Request the JCL. .BREAK 12,[..RJCL,,JCL] ;Request the JCL.
MOVE A,[JCL]
MOVE A,[BPTR,,JCL] ;Load the command parameters into A. MOVE A,[BPTR,,JCL] ;Load the command parameters into A.
MOVE B,[BPTR,,FNAME1] ;Pointer to the first file name. MOVE B,[BPTR,,FNAME1] ;Pointer to the first file name.
;PUSHJ P,TOSIXB ;Transfer the first word into FNAME1 ;PUSHJ P,TOSIXB ;Transfer the first word into FNAME1
@@ -60,7 +61,7 @@ GETJCL: PUSH P,A ;Save the register A.
POP P,B ;Restore the B register. POP P,B ;Restore the B register.
POP P,A ;Restore the A register. POP P,A ;Restore the A register.
POPJ P, ;Return from routine. POPJ P, ;Return from routine.
;Subroutine to convert an ASCII string into SIXBIT. Takes a byte ;Subroutine to convert an ASCII string into SIXBIT. Takes a byte
;pointer in A and B, where A is the source and B is the destination. ;pointer in A and B, where A is the source and B is the destination.
TOSIXB: PUSH P,D ;Store the contents of register D. TOSIXB: PUSH P,D ;Store the contents of register D.