arch/all-mingw32/bootstrap/hostinterface.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <stdarg.h>
   7 #include <stdio.h>
   8
   9 #include "../kernel/hostinterface.h"
  10
  11 #include "hostlib.h"
  12 #include "shutdown.h"
  13
  14 /*
  15  * Our debug output goes to stderr.
  16  * bootstrap's file redirection code expects this.
  17  */
  18 static int __aros KPutC(int chr)
  19 {
  20     int ret;
  21
  22     ret = fputc(chr, stderr);
  23     if (chr == '\n')
  24         fflush(stderr);
  25
  26     return ret;
  27 }
  28
  29 /*
  30  * Some helpful functions that link us to the underlying host OS.
  31  * Without them we would not be able to estabilish any interaction with it.
  32  */
  33 static struct HostInterface _HostIFace =
  34 {
  35     "Windows",
  36     HOSTINTERFACE_VERSION,
  37     Host_HostLib_Open,
  38     Host_HostLib_Close,
  39     Host_HostLib_GetPointer,
  40     Host_HostLib_FreeErrorStr,
  41     KPutC,
  42     Host_Shutdown
  43 };
  44
  45 void *HostIFace = &_HostIFace;
  46