rom/dos/ioerr.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include "dos_intern.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/dos.h>
  15
  16         AROS_LH0(LONG, IoErr,
  17
  18 /*  SYNOPSIS */
  19
  20 /*  LOCATION */
  21         struct DosLibrary *, DOSBase, 22, Dos)
  22
  23 /*  FUNCTION
  24         Get the dos error code for the current process.
  25
  26     INPUTS
  27
  28     RESULT
  29         Error code.
  30
  31     NOTES
  32
  33     EXAMPLE
  34
  35     BUGS
  36
  37     SEE ALSO
  38
  39     INTERNALS
  40
  41 *****************************************************************************/
  42 {
  43     AROS_LIBFUNC_INIT
  44     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  45
  46     /* Get pointer to process structure */
  47     struct Process *me=(struct Process *)FindTask(NULL);
  48
  49     /* Nothing spectacular */
  50     return me->pr_Result2;
  51     AROS_LIBFUNC_EXIT
  52 } /* IoErr */