pd.if.org Git - pdclib/blob - functions/stdlib/free.c

   1 /* void free( void * )
   2
   3    This file is part of the Public Domain C Library (PDCLib).
   4    Permission is granted to use, modify, and / or redistribute at will.
   5 */
   6
   7 #include <stdlib.h>
   8
   9 #ifndef REGTEST
  10
  11 #include <_PDCLIB_int.h>
  12
  13 /* TODO: Primitive placeholder. Much room for improvement. */
  14
  15 /* structure holding first and last element of free node list */
  16 extern struct _PDCLIB_headnode_t _PDCLIB_memlist;
  17
  18 void free( void * ptr )
  19 {
  20     if ( ptr == NULL )
  21     {
  22         return;
  23     }
  24     ptr = (void *)( (char *)ptr - sizeof( struct _PDCLIB_memnode_t ) );
  25     ( (struct _PDCLIB_memnode_t *)ptr )->next = NULL;
  26     if ( _PDCLIB_memlist.last != NULL )
  27     {
  28         _PDCLIB_memlist.last->next = ptr;
  29     }
  30     else
  31     {
  32         _PDCLIB_memlist.first = ptr;
  33     }
  34     _PDCLIB_memlist.last = ptr;
  35 }
  36
  37 #endif
  38
  39 #ifdef TEST
  40 #include <_PDCLIB_test.h>
  41 #include <stdbool.h>
  42
  43 int main( void )
  44 {
  45     free( NULL );
  46     TESTCASE( true );
  47     return TEST_RESULTS;
  48 }
  49
  50 #endif