ext/sf_coupling.c in gsl-1.14.7 vs ext/sf_coupling.c in gsl-1.15.3
- old
+ new
@@ -23,15 +23,16 @@
static VALUE rb_gsl_sf_coupling_3j_e(VALUE obj, VALUE two_ja, VALUE two_jb, VALUE two_jc, VALUE two_ma, VALUE two_mb, VALUE two_mc)
{
gsl_sf_result *rslt = NULL;
VALUE v;
- int status;
+ // local variable "status" declared and set, but never used
+ //int status;
CHECK_FIXNUM(two_ja); CHECK_FIXNUM(two_jb); CHECK_FIXNUM(two_jc);
CHECK_FIXNUM(two_ma); CHECK_FIXNUM(two_mb); CHECK_FIXNUM(two_mc);
v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt);
- status = gsl_sf_coupling_3j_e(FIX2INT(two_ja), FIX2INT(two_jb),
+ /*status =*/ gsl_sf_coupling_3j_e(FIX2INT(two_ja), FIX2INT(two_jb),
FIX2INT(two_jc), FIX2INT(two_ma),
FIX2INT(two_mb), FIX2INT(two_mc),
rslt);
return v;
@@ -48,15 +49,16 @@
static VALUE rb_gsl_sf_coupling_6j_e(VALUE obj, VALUE two_ja, VALUE two_jb, VALUE two_jc, VALUE two_jd, VALUE two_je, VALUE two_jf)
{
gsl_sf_result *rslt = NULL;
VALUE v;
- int status;
+ // local variable "status" declared and set, but never used
+ //int status;
CHECK_FIXNUM(two_ja); CHECK_FIXNUM(two_jb); CHECK_FIXNUM(two_jc);
CHECK_FIXNUM(two_jd); CHECK_FIXNUM(two_je); CHECK_FIXNUM(two_jf);
v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt);
- status = gsl_sf_coupling_6j_e(FIX2INT(two_ja), FIX2INT(two_jb),
+ /*status =*/ gsl_sf_coupling_6j_e(FIX2INT(two_ja), FIX2INT(two_jb),
FIX2INT(two_jc), FIX2INT(two_jd),
FIX2INT(two_je), FIX2INT(two_jf),
rslt);
return v;
}
@@ -81,15 +83,16 @@
VALUE two_jf, VALUE two_jg, VALUE two_jh,
VALUE two_ji)
{
gsl_sf_result *rslt = NULL;
VALUE v;
- int status;
+ // local variable "status" declared and set, but never used
+ //int status;
CHECK_FIXNUM(two_ja); CHECK_FIXNUM(two_jb); CHECK_FIXNUM(two_jc);
CHECK_FIXNUM(two_jd); CHECK_FIXNUM(two_je); CHECK_FIXNUM(two_jf);
CHECK_FIXNUM(two_jg); CHECK_FIXNUM(two_jh); CHECK_FIXNUM(two_ji);
v = Data_Make_Struct(cgsl_sf_result, gsl_sf_result, 0, free, rslt);
- status = gsl_sf_coupling_9j_e(FIX2INT(two_ja), FIX2INT(two_jb),
+ /*status =*/ gsl_sf_coupling_9j_e(FIX2INT(two_ja), FIX2INT(two_jb),
FIX2INT(two_jc), FIX2INT(two_jd),
FIX2INT(two_je), FIX2INT(two_jf),
FIX2INT(two_jg), FIX2INT(two_jh),
FIX2INT(two_ji), rslt);
return v;