rom/dos/putstr.c

   1 /*
   2     Copyright © 1995-2013, 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         struct DosLibrary *, DOSBase, 158, Dos)
  26
  27 /*  FUNCTION
  28         This routine writes an unformatted string to the default output.  No
  29         newline is appended to the string and any error is returned.  This
  30         routine is buffered.
  31
  32     INPUTS
  33         str   - Null-terminated string to be written to default output
  34
  35     RESULT
  36         error - 0 for success, -1 for any error.
  37
  38     SEE ALSO
  39         FGetC(), IoErr()
  40
  41 *****************************************************************************/
  42 {
  43     AROS_LIBFUNC_INIT
  44
  45     struct Process *me = (struct Process *)FindTask(NULL);
  46     BPTR file;
  47
  48     ASSERT_VALID_PROCESS(me);
  49
  50     file = me->pr_COS;
  51
  52     return(FPuts(file, string));
  53
  54     AROS_LIBFUNC_EXIT
  55 } /* PutStr */