Oops, avoid an infinite recursion.
[pspp] / lib / realloc.c
1 /* realloc() function that is glibc compatible.
2
3    Copyright (C) 1997, 2003, 2004, 2006, 2007 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 2, or (at your option)
8    any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software Foundation,
17    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
18
19 /* written by Jim Meyering and Bruno Haible */
20
21 #include <config.h>
22 /* Only the AC_FUNC_REALLOC macro defines 'realloc' already in config.h.  */
23 #ifdef realloc
24 # define NEED_REALLOC_GNU
25 # undef realloc
26 #endif
27
28 /* Specification.  */
29 #include <stdlib.h>
30
31 #include <errno.h>
32
33 /* Call the system's malloc and realloc below.  */
34 #undef malloc
35 #undef realloc
36
37 /* Change the size of an allocated block of memory P to N bytes,
38    with error checking.  If N is zero, change it to 1.  If P is NULL,
39    use malloc.  */
40
41 void *
42 rpl_realloc (void *p, size_t n)
43 {
44   void *result;
45
46 #ifdef NEED_REALLOC_GNU
47   if (n == 0)
48     {
49       n = 1;
50
51       /* In theory realloc might fail, so don't rely on it to free.  */
52       free (p);
53       p = NULL;
54     }
55 #endif
56
57   result = (p == NULL ? malloc (n) : realloc (p, n));
58
59 #if !HAVE_REALLOC_POSIX
60   if (result == NULL)
61     errno = ENOMEM;
62 #endif
63
64   return result;
65 }