1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
Description: Fix FTBFS with gsl/2.8
Bug-Debian: https://bugs.debian.org/1076659
Author: Yavor Doganov <yavor@gnu.org>
Forwarded: no
Last-Update: 2024-07-21
---
--- ruby-gsl-2.1.0.3+dfsg1.orig/ext/gsl_native/bspline.c
+++ ruby-gsl-2.1.0.3+dfsg1/ext/gsl_native/bspline.c
@@ -98,7 +98,11 @@
break;
case 1:
x = NUM2DBL(argv[0]);
+#if GSL_MAJOR_VERSION == 2 && GSL_MINOR_VERSION > 7
+ B = gsl_vector_alloc(w->nbreak+w->spline_order-2);
+#else
B = gsl_vector_alloc(w->nbreak+w->k-2);
+#endif
vB = Data_Wrap_Struct(cgsl_vector, 0, gsl_vector_free, B);
break;
default:
--- ruby-gsl-2.1.0.3+dfsg1.orig/ext/gsl_native/matrix_complex.c
+++ ruby-gsl-2.1.0.3+dfsg1/ext/gsl_native/matrix_complex.c
@@ -1094,7 +1094,7 @@
return Data_Wrap_Struct(cgsl_matrix, 0, gsl_matrix_free, m);
}
-static void gsl_matrix_complex_conjugate(gsl_matrix_complex *cm)
+static void gsl_matrix_complex_conjugate1(gsl_matrix_complex *cm)
{
gsl_complex z;
size_t i, j;
@@ -1122,7 +1122,7 @@
{
gsl_matrix_complex *cm = NULL;
Data_Get_Struct(obj, gsl_matrix_complex, cm);
- gsl_matrix_complex_conjugate(cm);
+ gsl_matrix_complex_conjugate1(cm);
return obj;
}
@@ -1140,7 +1140,7 @@
{
gsl_matrix_complex *cm = NULL;
Data_Get_Struct(obj, gsl_matrix_complex, cm);
- gsl_matrix_complex_conjugate(cm);
+ gsl_matrix_complex_conjugate1(cm);
gsl_matrix_complex_transpose(cm);
return obj;
}
|
