rom/dos/fputc.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8 #include <exec/memory.h>
   9 #include <proto/exec.h>
  10
  11 #include <dos/stdio.h>
  12 #include <dos/dosextens.h>
  13
  14 #include "dos_intern.h"
  15
  16 #include <aros/debug.h>
  17
  18 /*****************************************************************************
  19
  20     NAME */
  21 #include <proto/dos.h>
  22
  23         AROS_LH2(LONG, FPutC,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(BPTR, file,      D1),
  27         AROS_LHA(LONG, character, D2),
  28
  29 /*  LOCATION */
  30         struct DosLibrary *, DOSBase, 52, Dos)
  31
  32 /*  FUNCTION
  33
  34     INPUTS
  35         file      - Filehandle to write to.
  36         character - Character to write.
  37
  38     RESULT
  39         The character written or EOF in case of an error.
  40         IoErr() gives additional information in that case.
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49         FGetC(), IoErr()
  50
  51     INTERNALS
  52
  53 *****************************************************************************/
  54 {
  55     AROS_LIBFUNC_INIT
  56
  57     BYTE c = character;
  58     return (1 == FWriteChars(file, &c, 1, DOSBase))
  59         ? character
  60         : EOF;
  61
  62     AROS_LIBFUNC_EXIT
  63 } /* FPutC */