From: Efraim Flashner <efraim@flashner.co.il>
To: guix-devel@gnu.org
Subject: [PATCH 1/2] gnu: gsl: Update to 2.0.
Date: Sun, 1 Nov 2015 10:09:59 +0200 [thread overview]
Message-ID: <1446365400-18257-2-git-send-email-efraim@flashner.co.il> (raw)
In-Reply-To: <1446365400-18257-1-git-send-email-efraim@flashner.co.il>
* gnu/packages/maths.scm (gsl): Update to 2.0.
[source]: Remove patches.
* gnu/packages/patches/gsl-poly-test-fix-pt1.patch: Remove file.
* gnu/packages/patches/gsl-poly-test-fix-pt2.patch: Remove file.
* gnu-system.am (dist_patch_DATA): Remove patch.
---
gnu-system.am | 2 -
gnu/packages/maths.scm | 6 +-
gnu/packages/patches/gsl-poly-test-fix-pt1.patch | 84 ------------------------
gnu/packages/patches/gsl-poly-test-fix-pt2.patch | 27 --------
4 files changed, 2 insertions(+), 117 deletions(-)
delete mode 100644 gnu/packages/patches/gsl-poly-test-fix-pt1.patch
delete mode 100644 gnu/packages/patches/gsl-poly-test-fix-pt2.patch
diff --git a/gnu-system.am b/gnu-system.am
index 3b7e62c..2a1ecf3 100644
--- a/gnu-system.am
+++ b/gnu-system.am
@@ -486,8 +486,6 @@ dist_patch_DATA = \
gnu/packages/patches/grep-CVE-2015-1345.patch \
gnu/packages/patches/grub-gets-undeclared.patch \
gnu/packages/patches/grub-freetype.patch \
- gnu/packages/patches/gsl-poly-test-fix-pt1.patch \
- gnu/packages/patches/gsl-poly-test-fix-pt2.patch \
gnu/packages/patches/guile-1.8-cpp-4.5.patch \
gnu/packages/patches/guile-arm-fixes.patch \
gnu/packages/patches/guile-default-utf8.patch \
diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index b4b930d..1aba362 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -149,7 +149,7 @@ semiconductors.")
(define-public gsl
(package
(name "gsl")
- (version "1.16")
+ (version "2.0")
(source
(origin
(method url-fetch)
@@ -157,9 +157,7 @@ semiconductors.")
version ".tar.gz"))
(sha256
(base32
- "0lrgipi0z6559jqh82yx8n4xgnxkhzj46v96dl77hahdp58jzg3k"))
- (patches (map search-patch '("gsl-poly-test-fix-pt1.patch"
- "gsl-poly-test-fix-pt2.patch")))))
+ "0bfahlsgil0695104a44c3c8vjkyvxmg3s92371fddcrj6qz0qg3"))))
(build-system gnu-build-system)
(arguments
`(#:parallel-tests? #f
diff --git a/gnu/packages/patches/gsl-poly-test-fix-pt1.patch b/gnu/packages/patches/gsl-poly-test-fix-pt1.patch
deleted file mode 100644
index 3d1ed42..0000000
--- a/gnu/packages/patches/gsl-poly-test-fix-pt1.patch
+++ /dev/null
@@ -1,84 +0,0 @@
-From 9cc12d0377dd634b1b97954d076b715f982853b7 Mon Sep 17 00:00:00 2001
-From: Patrick Alken <alken@colorado.edu>
-Date: Fri, 4 Apr 2014 13:36:16 -0600
-Subject: [PATCH] bug fix in sorting of complex numbers (bug #39055)
-
----
- poly/test.c | 49 ++++++++++++++++++++++++++++++-------------------
- 1 file changed, 30 insertions(+), 19 deletions(-)
-
-diff --git a/poly/test.c b/poly/test.c
-index 9c147f6..d090802 100644
---- a/poly/test.c
-+++ b/poly/test.c
-@@ -25,11 +25,21 @@
- #include <gsl/gsl_poly.h>
- #include <gsl/gsl_heapsort.h>
-
-+/* sort by Re(z) then by Im(z) */
- static int
- cmp_cplx(const double *a, const double *b)
- {
-- double t = (a[0] * a[0] + a[1] * a[1]) - (b[0] * b[0] + b[1] * b[1]);
-- return t < 0.0 ? -1 : t > 0.0 ? 1 : 0;
-+ double r = a[0] - b[0];
-+
-+ if (r == 0.0)
-+ {
-+ double t = a[1] - b[1];
-+ return t < 0.0 ? -1 : t > 0.0 ? 1 : 0;
-+ }
-+ else if (r < 0.0)
-+ return -1;
-+ else
-+ return 1;
- }
-
- int
-@@ -534,25 +544,26 @@ main (void)
- Problem reported by Munagala Ramanath (bug #39055)
- */
-
-- double a[16] = { 32, -48, -8, 28, -8, 16, -16, 12, -16, 6, 10, -17, 10, 2, -4, 1 };
-+ double a[16] = { 32, -48, -8, 28, -8, 16, -16, 12,
-+ -16, 6, 10, -17, 10, 2, -4, 1 };
- double z[16*2];
-
-- double expected[16*20] = {
-- 1.0000000000000000, 0.00000000000000000,
-- 1.0000000000000000, 0.00000000000000000,
-- -1.0000000000000000, 0.00000000000000000,
-- -0.65893856175240950, 0.83459757287426684,
-- -0.65893856175240950, -0.83459757287426684,
-- -0.070891117403341281, -1.1359249087587791,
-- -0.070891117403341281, 1.1359249087587791,
-- 1.1142366961812986, -0.48083981203389980,
-- 1.1142366961812986, 0.48083981203389980,
-- -1.3066982484920768, 0.00000000000000000,
-- 0.57284747839410854, 1.1987808988289705,
-- 0.57284747839410854, -1.1987808988289705,
-- -1.6078107423472359, 0.00000000000000000,
-- 2.0000000000000000, 0.00000000000000000,
-- 2.0000000000000000, 0.00000000000000000 };
-+ double expected[16*2] = {
-+ -1.6078107423472359, 0.00000000000000000,
-+ -1.3066982484920768, 0.00000000000000000,
-+ -1.0000000000000000, 0.00000000000000000,
-+ -0.65893856175240950, -0.83459757287426684,
-+ -0.65893856175240950, 0.83459757287426684,
-+ -0.070891117403341281, -1.1359249087587791,
-+ -0.070891117403341281, 1.1359249087587791,
-+ 0.57284747839410854, -1.1987808988289705,
-+ 0.57284747839410854, 1.1987808988289705,
-+ 1.0000000000000000, 0.00000000000000000,
-+ 1.0000000000000000, 0.00000000000000000,
-+ 1.1142366961812986, -0.48083981203389980,
-+ 1.1142366961812986, 0.48083981203389980,
-+ 2.0000000000000000, 0.00000000000000000,
-+ 2.0000000000000000, 0.00000000000000000 };
-
- int i;
-
---
-2.4.3
-
diff --git a/gnu/packages/patches/gsl-poly-test-fix-pt2.patch b/gnu/packages/patches/gsl-poly-test-fix-pt2.patch
deleted file mode 100644
index 0e6fcf1..0000000
--- a/gnu/packages/patches/gsl-poly-test-fix-pt2.patch
+++ /dev/null
@@ -1,27 +0,0 @@
-From 0466df8660a7b6ddf2e082a1ec38bc6ea25a3c5c Mon Sep 17 00:00:00 2001
-From: Patrick Alken <alken@colorado.edu>
-Date: Mon, 7 Apr 2014 10:59:58 -0600
-Subject: [PATCH] change error test for 15th degree polynomial (bug #39055)
-
----
- poly/test.c | 4 ++--
- 1 file changed, 2 insertions(+), 2 deletions(-)
-
-diff --git a/poly/test.c b/poly/test.c
-index d090802..f6a7e3f 100644
---- a/poly/test.c
-+++ b/poly/test.c
-@@ -579,8 +579,8 @@ main (void)
-
- for (i = 0; i<15; i++)
- {
-- gsl_test_abs (z[2*i], expected[2*i], 1e-7, "z%d.real, 15th-order polynomial", i);
-- gsl_test_abs (z[2*i+1], expected[2*i+1], 1e-7, "z%d.imag, 15th-order polynomial", i);
-+ gsl_test_rel (z[2*i], expected[2*i], 1e-7, "z%d.real, 15th-order polynomial", i);
-+ gsl_test_rel (z[2*i+1], expected[2*i+1], 1e-7, "z%d.imag, 15th-order polynomial", i);
- }
- }
-
---
-2.4.3
-
--
2.6.2
next prev parent reply other threads:[~2015-11-01 8:10 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-11-01 8:09 [PATCH 0/2] Update GNU Scientific Library Efraim Flashner
2015-11-01 8:09 ` Efraim Flashner [this message]
2015-11-01 9:06 ` [PATCH 1/2] gnu: gsl: Update to 2.0 Ricardo Wurmus
2015-11-01 9:12 ` Efraim Flashner
2015-11-01 12:05 ` Andreas Enge
2015-11-01 8:10 ` [PATCH 2/2] gnu: gsl: Enable tests Efraim Flashner
2015-11-01 9:08 ` Ricardo Wurmus
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1446365400-18257-2-git-send-email-efraim@flashner.co.il \
--to=efraim@flashner.co.il \
--cc=guix-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).