home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
gondwana.ecr.mu.oz.au/pub/
/
Graphics.tar
/
Graphics
/
atomart.tar.gz
/
atomart.tar
/
message.c
< prev
next >
Wrap
C/C++ Source or Header
|
1990-06-14
|
652b
|
58 lines
#include <stdio.h>
extern int linecount;
extern FILE *logfile;
/*
* yyerror
*
* error routine for yacc, assumed fatal
*/
yyerror(s)
char *s;
{
fprintf(stderr, "atomart: line %d - %s\n", linecount, s);
fprintf(logfile, "atomart: line %d - %s\n", linecount, s);
exit(1);
}
/*
* message
*
* log a message.
*/
message(s)
char *s;
{
fprintf(logfile, s);
}
/*
* warning
*
* print and log a warning.
*/
warning(s)
char *s;
{
fprintf(stderr, s);
fprintf(logfile, s);
}
/*
* fatal
*
* print and log a fatal message and exit
*/
fatal(s)
char *s;
{
fprintf(stderr, s);
if (logfile != stdout)
fprintf(logfile, s);
exit(1);
}