rom/dos/putstr.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Lang: english
   6 */
   7 #include <proto/exec.h>
   8 #include <dos/dosextens.h>
   9
  10 #include "dos_intern.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/dos.h>
  16
  17         AROS_LH1(LONG, PutStr,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(CONST_STRPTR, string, D1),
  21
  22 /*  LOCATION */
  23
  24         struct DosLibrary *, DOSBase, 158, Dos)
  25
  26 /*  FUNCTION
  27         This routine writes an unformatted string to the default output.  No
  28         newline is appended to the string and any error is returned.  This
  29         routine is buffered.
  30
  31     INPUTS
  32         str   - Null-terminated string to be written to default output
  33
  34     RESULT
  35         error - 0 for success, -1 for any error.
  36
  37     SEE ALSO
  38         FGetC(), IoErr()
  39
  40 *****************************************************************************/
  41 {
  42     AROS_LIBFUNC_INIT
  43
  44     BPTR file=((struct Process *)FindTask(NULL))->pr_COS;
  45
  46     return(FPuts(file, string));
  47
  48     AROS_LIBFUNC_EXIT
  49 } /* PutStr */