home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c100 / 4.ddi / COM.ZIP / ALLOCATE.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1990-08-02  |  1.4 KB  |  62 lines
  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 1, 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, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  19.  
  20.  
  21. #include <stdio.h>
  22.  
  23. #ifdef BORLAND
  24.  #include <stdlib.h>
  25. #else
  26.     #ifdef THINK_C
  27.      #include <stdlib.h>
  28.     #else
  29.      #ifdef ZORTECH
  30.       #include <stdlib.h>
  31.      #else
  32.       extern char *calloc();
  33.      #endif
  34.     #endif
  35. #endif
  36. extern void done(int);
  37.  
  38. char *
  39. mallocate(n)
  40. register unsigned n;
  41. {
  42.   register char *block;
  43.  
  44.   block = (char*)calloc(n,1);
  45.   if (block == NULL)
  46.     {
  47.       fprintf(stderr, "bison: memory exhausted\n");
  48.       done(1);
  49.     }
  50.  
  51.   return (block);
  52. }
  53.  
  54. /* This name is used by alloca.c.  */
  55.  
  56. char *
  57. xmalloc (n)
  58.      unsigned int n;
  59. {
  60.   return mallocate (n);
  61. }
  62.