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 <stdio.h>
  23 #include "system.h"
  24
  25 #ifdef NEED_DECLARATION_CALLOC
  26 #if defined (__STDC__) || defined (_MSC_VER)
  27 extern void *calloc ();
  28 #else
  29 extern char *calloc ();
  30 #endif
  31 #endif  /* NEED_DECLARATION_CALLOC */
  32
  33 #ifdef NEED_DECLARATION_REALLOC
  34 #if defined (__STDC__) || defined (_MSC_VER)
  35 extern void *realloc ();
  36 #else
  37 extern char *realloc ();
  38 #endif
  39 #endif  /* NEED_DECLARATION_REALLOC */
  40
  41 extern char *xmalloc PARAMS((register unsigned));
  42 extern char *xrealloc PARAMS((register char *, register unsigned));
  43
  44 extern void done PARAMS((int));
  45
  46 extern char *program_name;
  47
  48 char *
  49 xmalloc (register unsigned n)
  50 {
  51   register char *block;
  52
  53   /* Avoid uncertainty about what an arg of 0 will do.  */
  54   if (n == 0)
  55     n = 1;
  56   block = calloc (n, 1);
  57   if (block == NULL)
  58     {
  59       fprintf (stderr, _("%s: memory exhausted\n"), program_name);
  60       done (1);
  61     }
  62
  63   return block;
  64 }
  65
  66 char *
  67 xrealloc (register char *block, register unsigned n)
  68 {
  69   /* Avoid uncertainty about what an arg of 0 will do.  */
  70   if (n == 0)
  71     n = 1;
  72   block = realloc (block, n);
  73   if (block == NULL)
  74     {
  75       fprintf (stderr, _("%s: memory exhausted\n"), program_name);
  76       done (1);
  77     }
  78
  79   return block;
  80 }