packages/infra/v2_0/src/eprintf.c

   1 //========================================================================
   2 //
   3 //      eprintf.c
   4 //
   5 //      __eprintf() used by libgcc
   6 //
   7 //========================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 //
  13 // eCos is free software; you can redistribute it and/or modify it under
  14 // the terms of the GNU General Public License as published by the Free
  15 // Software Foundation; either version 2 or (at your option) any later version.
  16 //
  17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20 // for more details.
  21 //
  22 // You should have received a copy of the GNU General Public License along
  23 // with eCos; if not, write to the Free Software Foundation, Inc.,
  24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  25 //
  26 // As a special exception, if other files instantiate templates or use macros
  27 // or inline functions from this file, or you compile this file and link it
  28 // with other works to produce a work based on this file, this file does not
  29 // by itself cause the resulting work to be covered by the GNU General Public
  30 // License. However the source code for this file must still be made available
  31 // in accordance with section (3) of the GNU General Public License.
  32 //
  33 // This exception does not invalidate any other reasons why a work based on
  34 // this file might be covered by the GNU General Public License.
  35 //
  36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  37 // at http://sources.redhat.com/ecos/ecos-license/
  38 // -------------------------------------------
  39 //####ECOSGPLCOPYRIGHTEND####
  40 //========================================================================
  41 //#####DESCRIPTIONBEGIN####
  42 //
  43 // Author(s):     jlarmour
  44 // Contributors:
  45 // Date:          2001-08-21
  46 // Purpose:       Provide __eprintf() as used by libgcc.
  47 // Description:   libgcc calls __eprintf() to display errors and abort.
  48 // Usage:
  49 //
  50 //####DESCRIPTIONEND####
  51 //
  52 //========================================================================
  53
  54 // CONFIGURATION
  55
  56 #include <pkgconf/system.h>
  57
  58 #ifdef CYGPKG_ISOINFRA
  59 # include <pkgconf/isoinfra.h>     // Configuration header
  60 #endif
  61
  62 // INCLUDES
  63
  64 #include <cyg/infra/cyg_type.h>    // Common type definitions and support
  65 #include <cyg/infra/cyg_ass.h>     // Default assertion
  66 #include <cyg/infra/diag.h>
  67
  68 #ifdef CYGPKG_ISOINFRA
  69 # if defined(CYGINT_ISO_STDIO_FORMATTED_IO) || \
  70      defined(CYGINT_ISO_STDIO_FILEACCESS)
  71 #  include <stdio.h>
  72 # endif
  73 # if CYGINT_ISO_EXIT
  74 #  include <stdlib.h>
  75 # endif
  76 #endif
  77
  78 // FUNCTIONS
  79
  80 __externC void
  81 __eprintf (const char *string, const char *expression,
  82            unsigned int line, const char *filename)
  83 {
  84 #ifdef CYGINT_ISO_STDIO_FORMATTED_IO
  85     fprintf(stderr, string, expression, line, filename);
  86 #else
  87     diag_printf(string, expression, line, filename);
  88 #endif
  89 #ifdef CYGINT_ISO_STDIO_FILEACCESS
  90     fflush (stderr);
  91 #endif
  92 #if CYGINT_ISO_EXIT
  93     abort();
  94 #else
  95     CYG_FAIL( "Aborting" );
  96     for (;;);
  97 #endif
  98 } // __eprintf()
  99
 100 // EOF eprintf.c