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)
 {