File: _eprintf.c

package info (click to toggle)
tcltrf 2.1.4-dfsg-2
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 8,308 kB
  • ctags: 9,127
  • sloc: ansic: 72,769; tcl: 1,343; makefile: 222; sh: 89; exp: 22
file content (16 lines) | stat: -rw-r--r-- 320 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#include <tcl.h>
#include <stdio.h>

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