ext/sf_gamma.c in gsl-1.14.7 vs ext/sf_gamma.c in gsl-1.15.3

- old
+ new

@@ -33,15 +33,16 @@ static VALUE rb_gsl_sf_lngamma_sgn_e(VALUE obj, VALUE x) { gsl_sf_result *rslt = NULL; VALUE v; - int status; + // local variable "status" declared and set, but never used + //int status; double sgn; Need_Float(x); v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt); - status = gsl_sf_lngamma_sgn_e(NUM2DBL(x), rslt, &sgn); + /*status =*/ gsl_sf_lngamma_sgn_e(NUM2DBL(x), rslt, &sgn); return rb_ary_new3(2, v, rb_float_new(sgn)); } static VALUE rb_gsl_sf_gammastar(VALUE obj, VALUE x) { @@ -163,14 +164,15 @@ static VALUE rb_gsl_sf_lnchoose_e(VALUE obj, VALUE n, VALUE m) { gsl_sf_result *rslt = NULL; VALUE v; - int status; + // local variable "status" declared and set, but never used + //int status; CHECK_FIXNUM(n); CHECK_FIXNUM(m); v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt); - status = gsl_sf_lnchoose_e(FIX2INT(n), FIX2INT(m), rslt); + /*status =*/ gsl_sf_lnchoose_e(FIX2INT(n), FIX2INT(m), rslt); return v; } static VALUE rb_gsl_sf_poch(VALUE obj, VALUE a, VALUE x) { @@ -195,13 +197,14 @@ static VALUE rb_gsl_sf_lnpoch_sgn_e(VALUE obj, VALUE a, VALUE x) { gsl_sf_result *rslt = NULL; VALUE v; double sgn; - int status; + // local variable "status" declared and set, but never used + //int status; Need_Float(a); Need_Float(x); v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt); - status = gsl_sf_lnpoch_sgn_e(NUM2DBL(a), NUM2DBL(x), rslt, &sgn); + /*status =*/ gsl_sf_lnpoch_sgn_e(NUM2DBL(a), NUM2DBL(x), rslt, &sgn); return rb_ary_new3(2, v, rb_float_new(sgn)); } static VALUE rb_gsl_sf_pochrel(VALUE obj, VALUE a, VALUE x) {