|
|
#include <io.h> | #include <io.h> |
#include <stdarg.h> | #include <stdarg.h> |
#else | #else |
#include <varargs.h> |
#include <stdarg.h> |
#define strupr strlwr | #define strupr strlwr |
#endif | #endif |
#include <fcntl.h> | #include <fcntl.h> |
|
|
} | } |
| |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
void fatal(int diff, char *format, ...) | void fatal(int diff, char *format, ...) |
#else |
//#else |
void fatal(va_alist) |
//void fatal(va_alist) |
va_dcl |
// va_dcl |
#endif |
//#endif |
{ | { |
va_list arg; | va_list arg; |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
va_start(arg, format); | va_start(arg, format); |
#else |
/*#else |
int diff; | int diff; |
char *format; | char *format; |
va_start(arg); |
va_start(arg, format); |
diff = va_arg(arg,int); | diff = va_arg(arg,int); |
format = va_arg(arg,char *); | format = va_arg(arg,char *); |
#endif | #endif |
|
*/ |
| |
print_msg("Fatal", srcline-diff, format, arg); | print_msg("Fatal", srcline-diff, format, arg); |
va_end(arg); | va_end(arg); |
|
|
} | } |
| |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
void error(int diff, char *format, ...) | void error(int diff, char *format, ...) |
#else |
//#else |
void error(va_alist) |
//void error(int diff, char *format, ...) |
va_dcl |
//void error(va_alist) |
#endif |
// va_dcl |
|
//#endif |
{ | { |
va_list arg; | va_list arg; |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
va_start(arg, format); | va_start(arg, format); |
#else |
//#else |
int diff; |
/* int diff; |
char *format; | char *format; |
va_start(arg); | va_start(arg); |
diff = va_arg(arg,int); | diff = va_arg(arg,int); |
format = va_arg(arg,char *); | format = va_arg(arg,char *); |
#endif |
#endif*/ |
print_msg("Error", srcline-diff, format, arg); | print_msg("Error", srcline-diff, format, arg); |
va_end(arg); | va_end(arg); |
| |
|
|
} | } |
| |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
void warn(int diff, char *format, ...) | void warn(int diff, char *format, ...) |
#else |
/*#else |
void warn(va_alist) | void warn(va_alist) |
va_dcl | va_dcl |
#endif |
#endif*/ |
{ | { |
va_list arg; | va_list arg; |
#ifndef XFRACT |
//#ifndef XFRACT |
va_start(arg, format); | va_start(arg, format); |
#else |
/*#else |
int diff; | int diff; |
char *format; | char *format; |
va_start(arg); | va_start(arg); |
diff = va_arg(arg, int); | diff = va_arg(arg, int); |
format = va_arg(arg, char *); | format = va_arg(arg, char *); |
#endif |
#endif*/ |
print_msg("Warning", srcline-diff, format, arg); | print_msg("Warning", srcline-diff, format, arg); |
va_end(arg); | va_end(arg); |
| |
|
|
} | } |
| |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
void notice(char *format, ...) | void notice(char *format, ...) |
#else |
/*#else |
void notice(va_alist) | void notice(va_alist) |
va_dcl | va_dcl |
#endif |
#endif*/ |
{ | { |
va_list arg; | va_list arg; |
#ifndef XFRACT |
//#ifndef XFRACT |
va_start(arg, format); | va_start(arg, format); |
#else |
/*#else |
char *format; | char *format; |
| |
va_start(arg); | va_start(arg); |
format = va_arg(arg,char *); | format = va_arg(arg,char *); |
#endif |
#endif*/ |
print_msg("Note", srcline, format, arg); | print_msg("Note", srcline, format, arg); |
va_end(arg); | va_end(arg); |
} | } |
| |
| |
#ifndef XFRACT |
//#ifndef XFRACT |
void msg(char *format, ...) | void msg(char *format, ...) |
#else |
/*#else |
void msg(va_alist) | void msg(va_alist) |
va_dcl | va_dcl |
#endif |
#endif*/ |
{ | { |
va_list arg; | va_list arg; |
#ifdef XFRACT |
/*#ifdef XFRACT |
char *format; | char *format; |
#endif |
#endif*/ |
| |
if (quiet_mode) | if (quiet_mode) |
return; | return; |
#ifndef XFRACT |
//#ifndef XFRACT |
va_start(arg, format); | va_start(arg, format); |
#else |
/*#else |
va_start(arg); | va_start(arg); |
format = va_arg(arg,char *); | format = va_arg(arg,char *); |
#endif |
#endif*/ |
print_msg(NULL, 0, format, arg); | print_msg(NULL, 0, format, arg); |
va_end(arg); | va_end(arg); |
} | } |