File: basics.c

package info (click to toggle)
tetex-bin 3.0-30
  • links: PTS
  • area: main
  • in suites: etch-m68k
  • size: 54,960 kB
  • ctags: 34,640
  • sloc: ansic: 317,441; cpp: 41,854; sh: 22,369; perl: 17,643; makefile: 4,270; yacc: 2,187; awk: 1,126; lex: 932; pascal: 858; lisp: 571; sed: 423; asm: 139; csh: 47
file content (34 lines) | stat: -rw-r--r-- 589 bytes parent folder | download | duplicates (7)
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
28
29
30
31
32
33
34
/* FILE:    basics.c
 * PURPOSE: basic functions
 * AUTHOR:  Piet Tutelaers
 * VERSION: 1.0 (September 1995)
 */

#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#include <sys/stat.h>   /* stat() */
#ifdef WIN32
#include <win32lib.h>
#endif

/* Give up ... */
void fatal(char *fmt, ...)
{  va_list args;

   va_start(args, fmt);
   vfprintf(stderr, fmt, args);
   va_end(args);
   exit(1);
}

/* Give a message ... */
void msg(char *fmt, ...)
{  va_list args;

   va_start(args, fmt);
   vfprintf(stderr, fmt, args);
   fflush(stderr);
   va_end(args);
}