rom/dos/freedeviceproc.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: FreeDeviceProc() - Clean up after calls to GetDeviceProc()
   6     Lang: english
   7 */
   8 #include "dos_intern.h"
   9 #include <proto/exec.h>
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <dos/dosextens.h>
  15 #include <proto/dos.h>
  16
  17         AROS_LH1(void, FreeDeviceProc,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(struct DevProc *, dp, D1),
  21
  22 /*  LOCATION */
  23         struct DosLibrary *, DOSBase, 108, Dos)
  24
  25 /*  FUNCTION
  26         FreeDeviceProc() will clean up after a call to GetDeviceProc().
  27
  28     INPUTS
  29         dp              - DevProc structure as returned by GetDeviceProc().
  30
  31     RESULT
  32         Some memory and other resources returned to the system.
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41         GetDeviceProc()
  42
  43     INTERNALS
  44
  45 *****************************************************************************/
  46 {
  47     AROS_LIBFUNC_INIT
  48     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  49
  50     if( dp )
  51     {
  52         if( dp->dvp_Flags & DVPF_UNLOCK )
  53             UnLock( dp->dvp_Lock );
  54         FreeMem( dp, sizeof(struct DevProc) );
  55     }
  56
  57     AROS_LIBFUNC_EXIT
  58 } /* FreeDeviceProc */