prtnl68k.lib

来自「open source of basic interpreter of 68」· LIB 代码 · 共 19 行

*
*  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