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

   1 /*
   2  * Project:     libFIRM
   3  * File name:   ir/common/panic.c
   4  * Purpose:
   5  * Author:      Martin Trapp, Christian Schaefer
   6  * Modified by:
   7  * Created:
   8  * CVS-ID:      $Id$
   9  * Copyright:   (c) 1998-2003 Universität Karlsruhe
  10  * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  11  */
  12
  13
  14 #ifdef HAVE_CONFIG_H
  15 # include <config.h>
  16 #endif
  17
  18 # include <stdlib.h>
  19
  20 # include "panic.h"
  21 # include <stdio.h>
  22 # include <stdarg.h>
  23
  24
  25 void
  26 panic (const char *fmt, ...)
  27 {
  28   va_list ap;
  29
  30   fputs ("(panic) ", stderr);
  31   va_start (ap, fmt);
  32   vfprintf (stderr, fmt, ap);
  33   va_end (ap);
  34   putc ('\n', stderr);
  35   exit (1);
  36 }