home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / monitors / rsys / rsyssrc.lha / RSysSprintf.asm < prev    next >
Assembly Source File  |  1993-06-21  |  771b  |  28 lines
  1.    ;
  2.    ; Simple version of the C "sprintf" function.  Assumes C-style
  3.    ; stack-based function conventions.
  4.    ;
  5.       XDEF     _sprintf
  6.       XREF     _SysBase
  7.       XREF     _LVORawDoFmt
  8.  
  9.    _sprintf:                        ; ( ostring, format, {values} )
  10.       movem.l  a2/a3/a6,-(sp)
  11.  
  12.       move.l   4*4(sp),a3           ;Get the output string pointer
  13.       move.l   5*4(sp),a0           ;Get the FormatString pointer
  14.       lea.l    6*4(sp),a1           ;Get the pointer to the DataStream
  15.  
  16.       lea.l    stuffChar(pc),a2
  17.  
  18.       move.l   _SysBase,a6
  19.       jsr      _LVORawDoFmt(a6)
  20.  
  21.       movem.l  (sp)+,a2/a3/a6
  22.       rts
  23.  
  24.    ;------ PutChProc function used by RawDoFmt -----------
  25.    stuffChar:
  26.       move.b   d0,(a3)+        ;Put data to output string
  27.       rts
  28.