[gsl/temp_odecrash] temporary diagnostic

Frantisek Kluknavsky fkluknav at fedoraproject.org
Thu Jan 17 15:01:07 UTC 2013


commit add5e091a1f1dd3574ce3e247dc96f2784ae5bbe
Author: Frantisek Kluknavsky <fkluknav at redhat.com>
Date:   Thu Jan 17 15:22:10 2013 +0100

    temporary diagnostic

 wrk.patch |   12 ++++++------
 1 files changed, 6 insertions(+), 6 deletions(-)
---
diff --git a/wrk.patch b/wrk.patch
index c4fb594..3511021 100644
--- a/wrk.patch
+++ b/wrk.patch
@@ -1,6 +1,6 @@
 diff -up wrk/ode-initval2/msbdf.c.wrk wrk/ode-initval2/msbdf.c
 --- wrk/ode-initval2/msbdf.c.wrk	2013-01-09 10:35:45.259960403 +0100
-+++ wrk/ode-initval2/msbdf.c	2013-01-17 15:16:29.529656745 +0100
++++ wrk/ode-initval2/msbdf.c	2013-01-17 15:21:59.555275606 +0100
 @@ -116,7 +116,6 @@ static void *
  msbdf_alloc (size_t dim)
  {
@@ -9,14 +9,14 @@ diff -up wrk/ode-initval2/msbdf.c.wrk wrk/ode-initval2/msbdf.c
    if (state == 0)
      {
        GSL_ERROR_NULL ("failed to allocate space for msbdf_state", GSL_ENOMEM);
-@@ -461,6 +460,7 @@ msbdf_failurehandler (void *vstate, cons
-      has occurred at this order and point.
+@@ -500,6 +499,7 @@ msbdf_calccoeffs (const size_t ord, cons
+      auxiliary order change evaluation coefficients.
     */
  
 +printf("ALOKUJEEEEEEEEEEEEEEEEEEEEEEEEEEM\n");
-   msbdf_state_t *state = (msbdf_state_t *) vstate;
- 
-   const size_t ord = state->ord;
+   if (ord == 1)
+     {
+       l[0] = 1.0;
 diff -up wrk/ode-initval2/test.c.wrk wrk/ode-initval2/test.c
 --- wrk/ode-initval2/test.c.wrk	2013-01-09 10:48:22.051415928 +0100
 +++ wrk/ode-initval2/test.c	2013-01-17 15:18:46.759826995 +0100


More information about the scm-commits mailing list