ext/sf_log.c in gsl-1.14.7 vs ext/sf_log.c in gsl-1.15.3
- old
+ new
@@ -45,11 +45,12 @@
{
gsl_sf_result *rslt1 = NULL, *rslt2 = NULL;
gsl_complex *z = NULL;
VALUE vlnr, vtheta;
double re, im;
- int status;
+ // local variable "status" was defined and set, but never used
+ //int status;
switch (argc) {
case 1:
CHECK_COMPLEX(argv[0]);
Data_Get_Struct(argv[0], gsl_complex, z);
re = GSL_REAL(*z);
@@ -63,10 +64,10 @@
rb_raise(rb_eArgError, "wrong number of arguments (%d for 1 or 2)", argc);
break;
}
vlnr = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt1);
vtheta = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt2);
- status = gsl_sf_complex_log_e(re, im, rslt1, rslt2);
+ /*status =*/ gsl_sf_complex_log_e(re, im, rslt1, rslt2);
return rb_ary_new3(2, vlnr, vtheta);
}
static VALUE rb_gsl_sf_log_1plusx(VALUE obj, VALUE x)
{