prtnl68k.lib

open source of basic interpreter of 68

*
*  prtnl68k.lib      library routine to print a CRLF on the output device (68xxx)
*
*  This routine simply sends a CR/LF sequence to the active output,
*  using the outch routine in outch.lib.
*
*  This routine preserves all registers.
*

_prtnl
	move.l	d0,-(a7)		save d0
	move.b	#$0d,d0			get CR
	jsr	_outch			send it
	move.b	#$0a,d0			get LF
	jsr	_outch			send it
	move.l	(a7)+,d0		restore d0
	rts