;------------------------------------------------------------------------
; A small replacement for the sprintf() function.  Uses DoRamFmt()
; from Exec library.


                XREF    _LVORawDoFmt


                XDEF    _SB_msprintf
_SB_msprintf
                movem.l a2-a3/a6,-(sp)
                move.l  16(sp),a3
                move.l  20(sp),a0
                lea     24(sp),a1
                lea     putc(pc),a2
                movea.l $4,a6
                jsr     _LVORawDoFmt(a6)
                movem.l (sp)+,a2-a3/a6
                rts


putc            move.b  d0,(a3)+
                rts


                END