2 files changed, 4 insertions, 2 deletions

diff --git a/lib/Numeric/GSL/gsl-aux.c b/lib/Numeric/GSL/gsl-aux.c
index 1a4a3e6..410d157 100644
--- a/lib/Numeric/GSL/gsl-aux.c
+++ b/lib/Numeric/GSL/gsl-aux.c
@@ -810,7 +810,9 @@ int integrate_cquad(double f(double,void*), double a, double b, double aprec, do
     gsl_function F;
     F.function = f;
     F.params = NULL;
-    int res = gsl_integration_cquad (&F, a, b, aprec, prec, wk, result, error, neval);
+    size_t * sneval = NULL;
+    int res = gsl_integration_cquad (&F, a, b, aprec, prec, wk, result, error, sneval);
+    *neval = *sneval;
     CHECK(res,res);
     gsl_integration_cquad_workspace_free (wk); 
     OK
diff --git a/lib/Numeric/GSL/gsl-ode.c b/lib/Numeric/GSL/gsl-ode.c
index 7386d10..3f2771b 100644
--- a/lib/Numeric/GSL/gsl-ode.c
+++ b/lib/Numeric/GSL/gsl-ode.c
@@ -148,7 +148,7 @@ int ode(int method, double h, double eps_abs, double eps_rel,
 
     double* y = (double*)calloc(xin,sizeof(double));
     int i,j;
-    int status;
+    int status=0;
     for(i=0; i< xin; i++) {
         y[i] = xip[i];
         solp[i] = xip[i];