;--------------------------------------------------------------------------
;
; $Id: format.a,v 1.1 92/09/20 12:16:17 rwm Exp Locker: rwm $
; $Revision: 1.1 $
; $Date: 92/09/20 12:16:17 $
;
;--------------------------------------------------------------------------

	INCLUDE "exec/funcdef.i"
	INCLUDE "exec/exec_lib.i"

	XDEF	_SPrintF
;	XREF	_LVORawDoFmt

	SECTION text,code

_SPrintF:
	movem.l	a2/a3/a6,-(sp)

	move.l	 4+12(sp),a3
	move.l	 8+12(sp),a0
	lea	12+12(sp),a1
	lea	stuffchar(pc),a2
	move.l	4,a6
	jsr	_LVORawDoFmt(a6)
	movem.l	(sp)+,a2/a3/a6
	rts

stuffchar:
	move.b	d0,(a3)+
	rts

	end