rom/intuition/freeremember.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include "intuition_intern.h"
   8 #include <exec/memory.h>
   9 #include <proto/exec.h>
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <intuition/intuition.h>
  15 #include <proto/intuition.h>
  16
  17 AROS_LH2(void, FreeRemember,
  18
  19          /*  SYNOPSIS */
  20          AROS_LHA(struct Remember **, rememberKey, A0),
  21          AROS_LHA(LONG              , reallyForget, D0),
  22
  23          /*  LOCATION */
  24          struct IntuitionBase *, IntuitionBase, 68, Intuition)
  25
  26 /*  FUNCTION
  27
  28     INPUTS
  29
  30     RESULT
  31
  32     NOTES
  33
  34     EXAMPLE
  35
  36     BUGS
  37
  38     SEE ALSO
  39
  40     INTERNALS
  41
  42     HISTORY
  43     27-11-96    digulla automatically created from
  44                 intuition_lib.fd and clib/intuition_protos.h
  45
  46 *****************************************************************************/
  47 {
  48     AROS_LIBFUNC_INIT
  49
  50     struct Remember *next, *key;
  51
  52     DEBUG_REMEMBER(dprintf("FreeRemember: Key 0x%lx ReallyForget %d\n",
  53                            rememberKey, reallyForget));
  54
  55     for (next = *rememberKey; (key = next); )
  56     {
  57         next = key->NextRemember;
  58
  59         if (reallyForget)
  60             FreeMem (key->Memory, key->RememberSize);
  61
  62         FreeMem (key, sizeof (struct Remember));
  63     }
  64
  65     *rememberKey = NULL;
  66
  67     AROS_LIBFUNC_EXIT
  68 } /* FreeRemember */