version 1.3, 2015/04/01 06:10:34 |
version 1.5, 2017/04/01 12:01:25 |
|
|
#define oxprintf(...) printf(__VA_ARGS__) |
#include <R.h> |
#define oxprintfe(...) fprintf(stderr,__VA_ARGS__) |
#include <R_ext/Utils.h> |
#define oxflush() fflush(NULL) |
#include <R_ext/Print.h> |
#define oxabort() abort() |
#include <Rinternals.h> |
#define oxstdout stdout |
#include <R_ext/Rdynload.h> |
#define oxexit(a) exit(a) |
#define oxprintf(...) Rprintf(__VA_ARGS__) |
#define oxexit0(a) exit(a) |
#define oxprintfe(...) REprintf(__VA_ARGS__) |
|
#define oxflush() |
|
#define oxabort() error("Fatal error in the shared lib hgm.\n") |
|
#define oxstdout NULL |
|
#define oxstdin NULL |
|
#define oxexit(a) error("Fatal error in the shared lib hgm.\n"); |
|
#define oxexit0(a) error("Fatal error in the shared lib hgm.\n"); |