===================================================================
RCS file: /home/cvs/OpenXM/src/hgm/oxprint/oxprint.h,v
retrieving revision 1.2
retrieving revision 1.5
diff -u -p -r1.2 -r1.5
--- OpenXM/src/hgm/oxprint/oxprint.h	2015/03/24 06:10:33	1.2
+++ OpenXM/src/hgm/oxprint/oxprint.h	2017/04/01 12:01:25	1.5
@@ -1,5 +1,13 @@
-#define oxprintf(...)  printf(__VA_ARGS__)
-#define oxprintfe(...) fprintf(stderr,__VA_ARGS__)
-#define oxflush()  fflush(NULL)
-#define oxabort()  abort()
-#define oxstdout  stdout
+#include <R.h>
+#include <R_ext/Utils.h>
+#include <R_ext/Print.h>
+#include <Rinternals.h>
+#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");