compiler/arossupport/_kprintf.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Low-level debugging support.
   6 */
   7
   8 #include <exec/execbase.h>
   9 #include <proto/exec.h>
  10 #include <aros/asmcall.h>
  11 #include <stdarg.h>
  12
  13 /* All I need is a global variable SysBase */
  14 extern struct ExecBase *SysBase;
  15
  16 AROS_UFH2 (void, KPutChar,
  17         AROS_UFHA(UBYTE, chr, D0),
  18         AROS_UFHA(struct ExecBase *,SysBase,A3)
  19 )
  20 {
  21     AROS_USERFUNC_INIT
  22     RawPutChar(chr);
  23     AROS_USERFUNC_EXIT
  24 }
  25
  26 void KPrintF(STRPTR format, ...) __stackparm;
  27
  28 void KPrintF(STRPTR format, ...)
  29 {
  30     RawDoFmt(format,&format+1,(VOID_FUNC)KPutChar,SysBase);
  31 }