[gsl/temp_odecrash] temporary diagnostic

Frantisek Kluknavsky fkluknav at fedoraproject.org
Wed Jan 23 16:06:39 UTC 2013


commit 861535a2571c2a011452d87932cbd7be3aaf6db2
Author: Frantisek Kluknavsky <fkluknav at redhat.com>
Date:   Wed Jan 23 17:06:28 2013 +0100

    temporary diagnostic

 wrk.patch |   15 +++++++++++++++
 1 files changed, 15 insertions(+), 0 deletions(-)
---
diff --git a/wrk.patch b/wrk.patch
index dd9ebfa..4df1814 100644
--- a/wrk.patch
+++ b/wrk.patch
@@ -1,3 +1,18 @@
+diff -up wrk/ode-initval2/control.c.wrk wrk/ode-initval2/control.c
+--- wrk/ode-initval2/control.c.wrk	2013-01-23 17:06:22.402902397 +0100
++++ wrk/ode-initval2/control.c	2013-01-23 17:04:34.920251364 +0100
+@@ -78,8 +78,11 @@ gsl_odeiv2_control_hadjust (gsl_odeiv2_c
+                             const double y[], const double yerr[],
+                             const double dydt[], double *h)
+ {
++	printf("pred hadjust\n%d\n",  s->type->order (s->state));
+   return c->type->hadjust (c->state, s->dimension, s->type->order (s->state),
+                            y, yerr, dydt, h);
++  printf("po hadjust\n%d\n",  s->type->order (s->state));
++
+ }
+ 
+ int
 diff -up wrk/ode-initval2/cstd.c.wrk wrk/ode-initval2/cstd.c
 --- wrk/ode-initval2/cstd.c.wrk	2013-01-18 16:02:19.566833381 +0100
 +++ wrk/ode-initval2/cstd.c	2013-01-23 17:00:49.934891485 +0100


More information about the scm-commits mailing list