Debug: print as ASCIZ

This commit is contained in:
2025-12-16 13:16:44 +01:00
parent 27a2a92be4
commit ef8ddfb6a9

View File

@@ -39,7 +39,7 @@ START: MOVE P,[-PDLLEN,,PDL-1] ;Initialize the stack.
PUSHJ P,GETJCL ;Read the command line. PUSHJ P,GETJCL ;Read the command line.
MOVE A,[BPTR,,LOADING] ;Print the loading message MOVE A,[BPTR,,LOADING] ;Print the loading message
PUSHJ P,OUTSTR PUSHJ P,OUTSTR
MOVEI A,001 ;Pretend the field name is SIXBIT MOVEI A,000 ;Pretend the field name is SIXBIT
MOVEM A,PFLAGS ;Store flags in PFLAGS MOVEM A,PFLAGS ;Store flags in PFLAGS
MOVE A,[BPTR,,FNAME1] ;Load FNAME1 into the A MOVE A,[BPTR,,FNAME1] ;Load FNAME1 into the A
PUSHJ P,OUTSTR ;Print the name in a single line PUSHJ P,OUTSTR ;Print the name in a single line