compiler/alib/erroroutput.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id:$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <dos/dosextens.h>
  10 #include <proto/exec.h>
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/alib.h>
  16
  17         BPTR ErrorOutput(
  18
  19 /*  SYNOPSIS */
  20         void)
  21
  22 /*  FUNCTION
  23         Returns the current error stream or 0 if there is no current
  24         input stream.
  25
  26     INPUTS
  27
  28     RESULT
  29         Error stream handle.
  30
  31     NOTES
  32         This function is source-compatible with AmigaOS v4.
  33
  34     EXAMPLE
  35
  36     BUGS
  37
  38     SEE ALSO
  39
  40     INTERNALS
  41
  42 *****************************************************************************/
  43 {
  44     /* Get pointer to process structure */
  45     struct Process *me=(struct Process *)FindTask(NULL);
  46
  47     /* Nothing spectacular */
  48     return me->pr_CES;
  49 }