src/allocate.c

   1 /* Allocate and clear storage for bison,
   2    Copyright (C) 1984, 1989 Free Software Foundation, Inc.
   3
   4 This file is part of Bison, the GNU Compiler Compiler.
   5
   6 Bison is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 Bison is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with Bison; see the file COPYING.  If not, write to
  18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19 Boston, MA 02111-1307, USA.  */
  20
  21
  22 #include "system.h"
  23
  24 #ifdef NEED_DECLARATION_CALLOC
  25 #if defined (__STDC__) || defined (_MSC_VER)
  26 extern void *calloc ();
  27 #else
  28 extern char *calloc ();
  29 #endif
  30 #endif  /* NEED_DECLARATION_CALLOC */
  31
  32 #ifdef NEED_DECLARATION_REALLOC
  33 #if defined (__STDC__) || defined (_MSC_VER)
  34 extern void *realloc ();
  35 #else
  36 extern char *realloc ();
  37 #endif
  38 #endif  /* NEED_DECLARATION_REALLOC */
  39
  40 extern char *xmalloc PARAMS((register unsigned));
  41 extern char *xrealloc PARAMS((register char *, register unsigned));
  42
  43 extern void done PARAMS((int));
  44
  45 extern char *program_name;
  46
  47 char *
  48 xmalloc (register unsigned n)
  49 {
  50   register char *block;
  51
  52   /* Avoid uncertainty about what an arg of 0 will do.  */
  53   if (n == 0)
  54     n = 1;
  55   block = calloc (n, 1);
  56   if (block == NULL)
  57     {
  58       fprintf (stderr, _("%s: memory exhausted\n"), program_name);
  59       done (1);
  60     }
  61
  62   return block;
  63 }
  64
  65 char *
  66 xrealloc (register char *block, register unsigned n)
  67 {
  68   /* Avoid uncertainty about what an arg of 0 will do.  */
  69   if (n == 0)
  70     n = 1;
  71   block = realloc (block, n);
  72   if (block == NULL)
  73     {
  74       fprintf (stderr, _("%s: memory exhausted\n"), program_name);
  75       done (1);
  76     }
  77
  78   return block;
  79 }