rom/oop/releaseattrbases.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: OOP function OOP_ReleaseAttrBases
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include <exec/memory.h>
  10 #include <aros/libcall.h>
  11 #include <aros/debug.h>
  12
  13 #include "intern.h"
  14 #include "hash.h"
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <oop/oop.h>
  19 #include <proto/oop.h>
  20
  21         AROS_LH1(VOID, OOP_ReleaseAttrBases,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(struct OOP_ABDescr *, abd, A0),
  25
  26 /*  LOCATION */
  27         struct Library *, OOPBase, 19, OOP)
  28
  29 /*  FUNCTION
  30
  31     INPUTS
  32
  33     RESULT
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42
  43     INTERNALS
  44
  45     HISTORY
  46
  47 ******************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51
  52     for (; abd->interfaceID; abd ++)
  53     {
  54         if ( *abd->attrBase != 0 )
  55         {
  56             OOP_ReleaseAttrBase(abd->interfaceID);
  57             *abd->attrBase = 0;
  58         }
  59     }
  60
  61
  62     AROS_LIBFUNC_EXIT
  63
  64 } /* OOP_ReleaseAttrBases  */
  65