| version 1.2, 2015/03/24 06:10:33 |
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 oxprintf(...) Rprintf(__VA_ARGS__) |
| |
#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"); |