| version 1.5, 2003/11/27 14:18:43 | version 1.7, 2004/07/11 00:32:17 | 
|  |  | 
| /* $OpenXM: OpenXM/src/ox_ntl/oxserv.c,v 1.4 2003/11/17 09:55:52 iwane Exp $ */ | /* $OpenXM: OpenXM/src/ox_ntl/oxserv.c,v 1.6 2004/07/04 11:38:42 iwane Exp $ */ | 
|  |  | 
| #include <stdio.h> | #include <stdio.h> | 
| #include <stdlib.h> | #include <stdlib.h> | 
|  |  | 
| #include "oxserv.h" | #include "oxserv.h" | 
| #include "oxstack.h" | #include "oxstack.h" | 
|  |  | 
|  | #include "gmp.h" | 
| #include "gc/gc.h" | #include "gc/gc.h" | 
|  |  | 
| #define DPRINTF(x)      printf x; fflush(stdout) | #define DPRINTF(x)      printf x; (void)fflush(stdout) | 
|  |  | 
| #define FP      stdout | #define FP      stdout | 
| #define EPRINTF(x)      fprintf x; fflush(FP) | #define EPRINTF(x)      fprintf x; (void)fflush(FP) | 
|  |  | 
| #if 1 |  | 
| /*===========================================================================* |  | 
| * for DEBUG |  | 
| *===========================================================================*/ |  | 
| #include <stdarg.h> |  | 
| void |  | 
| dprintf(const char *fmt, ...) |  | 
| { |  | 
| FILE *fp; |  | 
| va_list ap; |  | 
| va_start(ap, fmt); |  | 
|  |  | 
| fp = fopen("error.txt", "a"); |  | 
|  |  | 
| vfprintf(fp, fmt, ap); |  | 
|  |  | 
| fflush(fp); |  | 
| fclose(fp); |  | 
|  |  | 
| va_end(ap); |  | 
| } |  | 
| #endif |  | 
|  |  | 
| /*===========================================================================* | /*===========================================================================* | 
| * MACRO | * MACRO |