nsz Git - libfirm/blob - ir/common/panic.c

   1 /* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe
   2 ** All rights reserved.
   3 **
   4 ** Authors: Martin Trapp, Christian Schaefer
   5 **
   6 */
   7
   8 /* $Id$ */
   9
  10 #ifdef HAVE_CONFIG_H
  11 # include <config.h>
  12 #endif
  13
  14 # include "panic.h"
  15 # include "xprintf.h"
  16
  17 void
  18 panic (const char *fmt, ...)
  19 {
  20   va_list ap;
  21
  22   fputs ("(panic) ", stderr);
  23   va_start (ap, fmt);
  24   xvfprintf (stderr, fmt, ap);
  25   va_end (ap);
  26   putc ('\n', stderr);
  27   exit (1);
  28 }