;
; PRINT MACRO - OUTPUT N AS A SIGNED OCTAL
;		NUMBER IF 'SIGN' IS GIVEN,
;		OR MAGNITUDE IF NOT GIVEN
;
	.MACRO	POCT N,SIGN
	.MCALL	QT$SGN
	MOV	N,-(SP)
	QT$SGN	SIGN
	CALL	QUTOPT
	.ENDM