1995-03-16 16:59:07 -05:00
|
|
|
/* Part of CPP library. (memory allocation - xmalloc etc)
|
|
|
|
Copyright (C) 1986, 87, 89, 92, 93, 94, 1995 Free Software Foundation, Inc.
|
|
|
|
Written by Per Bothner, 1994.
|
|
|
|
Based on CCCP program by by Paul Rubin, June 1986
|
|
|
|
Adapted to ANSI C, Richard Stallman, Jan 1987
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify it
|
|
|
|
under the terms of the GNU General Public License as published by the
|
|
|
|
Free Software Foundation; either version 2, or (at your option) any
|
|
|
|
later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
|
|
|
|
|
In other words, you are welcome to use, share and improve this program.
|
|
|
|
You are forbidden to forbid anyone else to use, share and improve
|
|
|
|
what you give them. Help stamp out software-hoarding! */
|
|
|
|
|
1995-04-10 09:22:01 -04:00
|
|
|
#include "config.h"
|
|
|
|
|
1995-03-16 16:59:07 -05:00
|
|
|
static void
|
|
|
|
memory_full ()
|
|
|
|
{
|
|
|
|
fatal ("Memory exhausted.");
|
|
|
|
}
|
|
|
|
|
|
|
|
char *
|
|
|
|
xmalloc (size)
|
|
|
|
unsigned size;
|
|
|
|
{
|
|
|
|
register char *ptr = (char *) malloc (size);
|
|
|
|
if (ptr != 0) return (ptr);
|
|
|
|
memory_full ();
|
|
|
|
/*NOTREACHED*/
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
char *
|
|
|
|
xrealloc (old, size)
|
|
|
|
char *old;
|
|
|
|
unsigned size;
|
|
|
|
{
|
|
|
|
register char *ptr = (char *) realloc (old, size);
|
1995-04-07 02:19:22 -04:00
|
|
|
if (ptr == 0)
|
|
|
|
memory_full ();
|
|
|
|
return ptr;
|
1995-03-16 16:59:07 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
char *
|
|
|
|
xcalloc (number, size)
|
|
|
|
unsigned number, size;
|
|
|
|
{
|
|
|
|
register unsigned total = number * size;
|
1995-04-07 02:19:22 -04:00
|
|
|
register char *ptr = (char *) calloc (number, size);
|
|
|
|
if (ptr == 0)
|
|
|
|
memory_full ();
|
|
|
|
return ptr;
|
1995-03-16 16:59:07 -05:00
|
|
|
}
|