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 <aros/debug.h>
   8
   9 #include <proto/exec.h>
  10 #include <dos/dosextens.h>
  11
  12 #include "dos_intern.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <proto/dos.h>
  18
  19         AROS_LH1(LONG, PutStr,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(CONST_STRPTR, string, D1),
  23
  24 /*  LOCATION */
  25
  26         struct DosLibrary *, DOSBase, 158, Dos)
  27
  28 /*  FUNCTION
  29         This routine writes an unformatted string to the default output.  No
  30         newline is appended to the string and any error is returned.  This
  31         routine is buffered.
  32
  33     INPUTS
  34         str   - Null-terminated string to be written to default output
  35
  36     RESULT
  37         error - 0 for success, -1 for any error.
  38
  39     SEE ALSO
  40         FGetC(), IoErr()
  41
  42 *****************************************************************************/
  43 {
  44     AROS_LIBFUNC_INIT
  45
  46     struct Process *me = (struct Process *)FindTask(NULL);
  47     BPTR file;
  48
  49     ASSERT_VALID_PROCESS(me);
  50
  51     file = me->pr_COS;
  52
  53     return(FPuts(file, string));
  54
  55     AROS_LIBFUNC_EXIT
  56 } /* PutStr */