[gsl/temp_odecrash] minor cleanup of gsl.spec

Frantisek Kluknavsky fkluknav at fedoraproject.org
Wed Jan 9 11:56:10 UTC 2013


commit 037d25f8a73a8b449d45dbd04d1309dccf9cc030
Author: Frantisek Kluknavsky <fkluknav at redhat.com>
Date:   Wed Jan 9 12:55:51 2013 +0100

    minor cleanup of gsl.spec

 wrk.patch |   36 ++++++++++--------------------------
 1 files changed, 10 insertions(+), 26 deletions(-)
---
diff --git a/wrk.patch b/wrk.patch
index a9509f3..c537bad 100644
--- a/wrk.patch
+++ b/wrk.patch
@@ -1,33 +1,17 @@
 diff -up wrk/ode-initval2/msbdf.c.wrk wrk/ode-initval2/msbdf.c
 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-09 12:48:01.793077658 +0100
-@@ -2007,17 +2007,17 @@ test_extreme_problems (void)
++++ wrk/ode-initval2/test.c	2013-01-09 12:55:06.296699660 +0100
+@@ -2003,10 +2003,11 @@ test_extreme_problems (void)
+ 
+       for (i = 0; steppers[i] != 0; i++)
+         {
++	  printf("spustam driver p=%d i=%d\n", p, i);
+           int s = sys_driver (steppers[i], prob[p], start[p], end[p],
                                initstepsize[p], &y[sd[p] * i],
                                epsabs[p], epsrel[p], probname[p]);
- 
--          if (s != GSL_SUCCESS)
-+/*          if (s != GSL_SUCCESS)
+-
++	  printf("koniec drivera\n");
+           if (s != GSL_SUCCESS)
              {
                printf ("start=%.5e, initstepsize=%.5e\n", start[p],
-                       initstepsize[p]);
-               gsl_test (s, "test_extreme_problems %s %s", steppers[i]->name,
-                         probname[p]);
--            }
-+            }*/
-         }
- 
-       /* Compare results */
--
-+/*
-       for (i = 1; steppers[i] != 0; i++)
-         for (k = 0; k < sd[p]; k++)
-           {
-@@ -2029,6 +2029,7 @@ test_extreme_problems (void)
-                           steppers[0]->name, steppers[i]->name,
-                           probname[p], k);
-           }
-+	  */
-     }
- }
- 


More information about the scm-commits mailing list