=================================================================== RCS file: /home/cvs/OpenXM/src/hgm/gsl-t-1/src/t-error.c,v retrieving revision 1.1 retrieving revision 1.3 diff -u -p -r1.1 -r1.3 --- OpenXM/src/hgm/gsl-t-1/src/t-error.c 2013/02/07 07:38:23 1.1 +++ OpenXM/src/hgm/gsl-t-1/src/t-error.c 2015/03/24 04:59:24 1.3 @@ -23,6 +23,7 @@ #include #include "t-gsl_errno.h" +#include "oxprint.h" gsl_error_handler_t * gsl_error_handler = NULL; @@ -37,13 +38,12 @@ gsl_error (const char * reason, const char * file, int return ; } - fprintf (stderr,"ERROR file %s, line %d, code %d", file, (int) line, (int) reason); + oxprintfe("ERROR file %s, line %d, code %d", file, (int) line, (int) reason); - fflush (stdout); - fprintf (stderr, "Default GSL error handler invoked.\n"); - fflush (stderr); + oxprintfe("Default GSL error handler invoked.\n"); + oxflush(); - abort (); + oxabort(); } gsl_error_handler_t *