rom/oop/releaseattrbase.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: OOP function OOP_ReleaseAttrBase
   6     Lang: english
   7 */
   8
   9 #include "intern.h"
  10 #include "hash.h"
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/exec.h>
  15 #include <exec/memory.h>
  16 #include <aros/libcall.h>
  17
  18 #include <aros/debug.h>
  19
  20         AROS_LH1(VOID, OOP_ReleaseAttrBase,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(CONST_STRPTR   , interfaceID, A0),
  24
  25 /*  LOCATION */
  26         struct Library *, OOPBase, 9, OOP)
  27
  28 /*  FUNCTION
  29         Release an OOP_AttrBase previosly obtained with
  30         OOP_ObtainAttrBase()
  31
  32
  33     INPUTS
  34         interfaceID     - globally unique interface identifier.
  35                           for which to release an attrbase.
  36
  37     RESULT
  38         None.
  39
  40     NOTES
  41         The call must be paired wit OOP_ObtainAttrBase().
  42
  43     EXAMPLE
  44
  45     BUGS
  46
  47     SEE ALSO
  48
  49     INTERNALS
  50
  51     HISTORY
  52
  53 ******************************************************************************/
  54 {
  55     AROS_LIBFUNC_INIT
  56
  57
  58     EnterFunc(bug("OOP_ReleaseAttrBase(interfaceID=%s)\n", interfaceID));
  59
  60     release_idbucket(interfaceID, GetOBase(OOPBase));
  61
  62     ReturnVoid ("OOP_ReleaseAttrBase");
  63
  64     AROS_LIBFUNC_EXIT
  65
  66 } /* OOP_ReleaseAttrBase  */
  67