compiler/stdc/free.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     C99 function free().
   6 */
   7
   8 #include "__stdc_intbase.h"
   9 #include "__memalign.h"
  10
  11 #include <exec/memory.h>
  12 #include <proto/exec.h>
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <stdlib.h>
  18
  19         void free (
  20
  21 /*  SYNOPSIS */
  22         void * memory)
  23
  24 /*  FUNCTION
  25         Return memory allocated with malloc() or a similar function to the
  26         system.
  27
  28     INPUTS
  29         memory - The result of the previous call to malloc(), etc. or
  30                 NULL.
  31
  32     RESULT
  33         None.
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42         malloc()
  43
  44     INTERNALS
  45
  46 ******************************************************************************/
  47 {
  48     if (memory)
  49     {
  50         struct StdCIntBase *StdCBase = (struct StdCIntBase *)__aros_getbase_StdCBase();
  51
  52         unsigned char *mem;
  53         size_t         size;
  54
  55         mem = ((UBYTE *)memory) - AROS_ALIGN(sizeof(size_t));
  56
  57         size = *((size_t *) mem);
  58         if (size == MEMALIGN_MAGIC)
  59             free(((void **) mem)[-1]);
  60         else {
  61             size += AROS_ALIGN(sizeof(size_t));
  62             FreePooled (StdCBase->mempool, mem, size);
  63         }
  64     }
  65
  66 } /* free */
  67