home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / misc / emu / AROSdev.lha / AROS / rom / dos / input.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-01-27  |  1.6 KB  |  76 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: input.c,v 1.6 1997/01/27 00:36:22 ldp Exp $
  4.     $Log: input.c,v $
  5.     Revision 1.6  1997/01/27 00:36:22  ldp
  6.     Polish
  7.  
  8.     Revision 1.5  1996/12/09 13:53:32  aros
  9.     Added empty templates for all missing functions
  10.  
  11.     Moved #include's into first column
  12.  
  13.     Revision 1.4  1996/10/24 15:50:30  aros
  14.     Use the official AROS macros over the __AROS versions.
  15.  
  16.     Revision 1.3  1996/08/13 13:52:47  digulla
  17.     Replaced <dos/dosextens.h> by "dos_intern.h" or added "dos_intern.h"
  18.     Replaced AROS_LA by AROS_LHA
  19.  
  20.     Revision 1.2  1996/08/01 17:40:52  digulla
  21.     Added standard header for all files
  22.  
  23.     Desc:
  24.     Lang: english
  25. */
  26. #include <proto/exec.h>
  27. #include "dos_intern.h"
  28.  
  29. /*****************************************************************************
  30.  
  31.     NAME */
  32. #include <proto/dos.h>
  33.  
  34.     AROS_LH0(BPTR, Input,
  35.  
  36. /*  SYNOPSIS */
  37.  
  38. /*  LOCATION */
  39.     struct DosLibrary *, DOSBase, 9, Dos)
  40.  
  41. /*  FUNCTION
  42.     Returns the current input stream or 0 if there is no current
  43.     input stream.
  44.  
  45.     INPUTS
  46.  
  47.     RESULT
  48.     Input stream handle.
  49.  
  50.     NOTES
  51.  
  52.     EXAMPLE
  53.  
  54.     BUGS
  55.  
  56.     SEE ALSO
  57.  
  58.     INTERNALS
  59.  
  60.     HISTORY
  61.     29-10-95    digulla automatically created from
  62.                 dos_lib.fd and clib/dos_protos.h
  63.  
  64. *****************************************************************************/
  65. {
  66.     AROS_LIBFUNC_INIT
  67.     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  68.  
  69.     /* Get pointer to process structure */
  70.     struct Process *me=(struct Process *)FindTask(NULL);
  71.  
  72.     /* Nothing spectacular */
  73.     return me->pr_CIS;
  74.     AROS_LIBFUNC_EXIT
  75. } /* Input */
  76.