Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

applied patch for gsl 1.15

  • Loading branch information...
commit ff9ded52e69cb4eb0f14e3fec969852b089a8d2d 1 parent e114039
@kitop kitop authored
Showing with 4 additions and 4 deletions.
  1. +2 −2 ext/matrix_complex.c
  2. +2 −2 ext/vector_complex.c
View
4 ext/matrix_complex.c
@@ -1520,7 +1520,7 @@ static VALUE rb_gsl_matrix_complex_indgen_singleton(int argc, VALUE *argv, VALUE
}
-static int gsl_matrix_complex_equal(const gsl_matrix_complex *m1,
+static int gsl_matrix_complex_equal_witg_eps(const gsl_matrix_complex *m1,
const gsl_matrix_complex *m2, double eps)
{
gsl_complex z1, z2;
@@ -1555,7 +1555,7 @@ static VALUE rb_gsl_matrix_complex_equal(int argc, VALUE *argv, VALUE obj)
Data_Get_Struct(obj, gsl_matrix_complex, m1);
CHECK_MATRIX_COMPLEX(argv[0]);
Data_Get_Struct(argv[0], gsl_matrix_complex, m2);
- ret = gsl_matrix_complex_equal(m1, m2, eps);
+ ret = gsl_matrix_complex_equal_witg_eps(m1, m2, eps);
if (ret == 1) return Qtrue;
else return Qfalse;
}
View
4 ext/vector_complex.c
@@ -1986,7 +1986,7 @@ static VALUE rb_gsl_vector_complex_zip(int argc, VALUE *argv, VALUE obj)
return ary;
}
-static int gsl_vector_complex_equal(const gsl_vector_complex *v1,
+static int gsl_vector_complex_equal_with_eps(const gsl_vector_complex *v1,
const gsl_vector_complex *v2, double eps)
{
gsl_complex z1, z2;
@@ -2019,7 +2019,7 @@ static VALUE rb_gsl_vector_complex_equal(int argc, VALUE *argv, VALUE obj)
Data_Get_Struct(obj, gsl_vector_complex, v1);
CHECK_VECTOR_COMPLEX(argv[0]);
Data_Get_Struct(argv[0], gsl_vector_complex, v2);
- ret = gsl_vector_complex_equal(v1, v2, eps);
+ ret = gsl_vector_complex_equal_with_eps(v1, v2, eps);
if (ret == 1) return Qtrue;
else return Qfalse;
}
Please sign in to comment.
Something went wrong with that request. Please try again.