Mercurial > hg-old > index.cgi

comparison old-trunk/lwlib/lw_mem.c @ 339:eb230fa7d28e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Prepare for migration to hg
author lost
date Fri, 19 Mar 2010 02:54:14 +0000
parents
children
comparison
equal deleted inserted replaced
338:e7885b3ee266 339:eb230fa7d28e
1 /*
2 lw_mem.c
3
4 Copyright © 2008 William Astle
5
6 This file is part of LWASM.
7
8 LWASM is free software: you can redistribute it and/or modify it under the
9 terms of the GNU General Public License as published by the Free Software
10 Foundation, either version 3 of the License, or (at your option) any later
11 version.
12
13 This program is distributed in the hope that it will be useful, but WITHOUT
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 more details.
17
18 You should have received a copy of the GNU General Public License along with
19 this program. If not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include <stdlib.h>
23
24 void (*lw_mem_error)(size_t s) = NULL;
25
26 void *lw_malloc(size_t s)
27 {
28 void *r;
29
30 if (s < 1)
31 s = 1;
32 r = malloc(s);
33 if (!r && lw_mem_error)
34 (*lw_mem_error)(s);
35 return r;
36 }
37
38 void *lw_calloc(size_t s)
39 {
40 void *r;
41
42 if (s < 1)
43 s = 1;
44 r = calloc(s, 1);
45 if (!r && lw_mem_error)
46 (*lw_mem_error)(s);
47 return r;
48 }
49
50 void lw_free(void *p)
51 {
52 if (p)
53 free(p);
54 }
55
56 void *lw_realloc(void *p, size_t s)
57 {
58 void *r;
59
60 if (s < 1)
61 {
62 free(p);
63 return NULL;
64 }
65
66 r = realloc(p, s);
67 if (!r && lw_mem_error)
68 (*lw_mem_error)(s);
69 return r;
70 }