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