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.
|
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
|
||||||
|
|||||||
Reference in New Issue
Block a user