OpenXM/src/hgm/gsl-t-1/src/t-error.c - diff

Return to t-error.c CVS log

Up to [local] / OpenXM / src / hgm / gsl-t-1 / src

version 1.2, 2015/03/22 00:40:32

version 1.3, 2015/03/24 04:59:24

Line 23

#include <stdio.h>

#include "t-gsl_errno.h"

#include "oxprint.h"

gsl_error_handler_t * gsl_error_handler = NULL;

Line 37 gsl_error (const char * reason, const char * file, int

Line 38 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);

oxprintfe("Default GSL error handler invoked.\n");

fprintf (stderr, "Default GSL error handler invoked.\n");

oxflush();

fflush (stderr);

/* abort (); */

oxabort();

}

gsl_error_handler_t *