nsz Git - libfirm/blob - ir/adt/xmalloc.c

   1 /*
   2  * Project:     libFIRM
   3  * File name:   ir/adt/xmalloc.c
   4  * Purpose:     Xmalloc --- never failing wrappers for malloc() & friends.
   5  * Author:      Markus Armbruster
   6  * Modified by:
   7  * Created:     1999 by getting from fiasco
   8  * CVS-ID:      $Id$
   9  * Copyright:   (c) 1995, 1996 Markus Armbruster
  10  * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  11  */
  12
  13 /* @@@ ToDo: replace this file with the one from liberty.
  14    [reimplement xstrdup, ... ] */
  15
  16 #ifdef HAVE_CONFIG_H
  17 # include <config.h>
  18 #endif
  19
  20 #include <stdlib.h>
  21 #include <string.h>
  22
  23 #include "xmalloc.h"
  24 #include "panic.h"
  25
  26
  27 void *
  28 (xmalloc) (size_t size)
  29 {
  30   void *res = malloc (size);
  31
  32   if (!res) xnomem ();
  33   return res;
  34 }
  35
  36
  37 void *
  38 (xrealloc) (void *ptr, size_t size)
  39 {
  40   /* ANSI blesses realloc (0, x) but SunOS chokes on it */
  41   void *res = ptr ? realloc (ptr, size) : malloc (size);
  42
  43   if (!res) xnomem ();
  44   return res;
  45 }
  46
  47
  48 char *
  49 (xstrdup) (const char *str)
  50 {
  51   size_t len = strlen (str) + 1;
  52   return memcpy ((xmalloc) (len), str, len);
  53 }
  54
  55
  56 void
  57 xnomem (void)
  58 {
  59   panic ("out of memory");
  60 }