Debug: print as ASCIZ
This commit is contained in:
@@ -39,7 +39,7 @@ START: MOVE P,[-PDLLEN,,PDL-1] ;Initialize the stack.
|
||||
PUSHJ P,GETJCL ;Read the command line.
|
||||
MOVE A,[BPTR,,LOADING] ;Print the loading message
|
||||
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
|
||||
MOVE A,[BPTR,,FNAME1] ;Load FNAME1 into the A
|
||||
PUSHJ P,OUTSTR ;Print the name in a single line
|
||||
|
||||
Reference in New Issue
Block a user