prtsp68k.lib

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

*
*  prtsp68k.lib      library routine to print a space to the output device (68xxx)
*
*  This routine simply sends a space to the current output device, using
*  the library function outch in outch.lib.
*
*  This routine preserves all registers.
*

_prtspc
	move.l	d0,-(a7)		save d0
	move.b	#$20,d0			get space
	jsr	_outch			send it
	move.l	(a7)+,d0		restore d0
	rts