File: eprintf.c

package info (click to toggle)
libdbd-informix-perl 2003.04-3
  • links: PTS
  • area: contrib
  • in suites: etch, etch-m68k, sarge
  • size: 1,232 kB
  • ctags: 467
  • sloc: perl: 7,349; ansic: 5,340; sh: 184; makefile: 58
file content (27 lines) | stat: -rw-r--r-- 664 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
/*
@(#)File:            $RCSfile: eprintf.c,v $
@(#)Version:         $Revision: 60.1 $
@(#)Last changed:    $Date: 1998/06/16 16:03:30 $
@(#)Purpose:         GCC assert() macro support function __eprintf()
*/

/*TABSTOP=4*/

#undef NULL /* Avoid errors if stdio.h and our stddef.h mismatch.  */

#include <stdio.h>

#ifndef lint
static const char rcs[] = "@(#)$Id: eprintf.c,v 60.1 1998/06/16 16:03:30 jleffler Exp $";
#endif

/* This is used by the `assert' macro.  */
void __eprintf(const char *string,
			   const char *expression,
			   int line,
			   const char *filename)
{
	fprintf(stderr, string, expression, line, filename);
	fflush(stderr);
	abort();
}