Project

General

Profile

Bug #6066 ยป tk.return.patch

ext/tk patch - drbrain (Eric Hodel), 02/23/2012 09:39 AM

View differences:

ext/tk/tcltklib.c (working copy)
1407 1407
    } else {
1408 1408
        return 0;
1409 1409
    }
1410

  
1411
    return 0; /* not reached */
1410 1412
}
1411 1413

  
1412 1414
static int
......
1448 1450
    } else {
1449 1451
        return 0;
1450 1452
    }
1453

  
1454
    return 0; /* not reached */
1451 1455
}
1452 1456

  
1453 1457

  
......
7781 7785
#if TCL_MAJOR_VERSION < 8 || (TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 6)
7782 7786
    rb_raise(rb_eNotImpError,
7783 7787
	     "cancel_eval is supported Tcl/Tk8.6 or later.");
7788

  
7789
    return 0; /* not reached */
7784 7790
#else
7785 7791
    Tcl_Obj *msg_obj;
7786 7792

  
......
10014 10020
    default:
10015 10021
      rb_raise(rb_eRuntimeError, "tcltklib has invalid release type number");
10016 10022
    }
10023

  
10024
    return Qnil; /* not reached */
10017 10025
}
10018 10026

  
10019 10027

  
......
10117 10125
      return Qnil;
10118 10126
    }
10119 10127
  }
10128

  
10129
  return Qnil; /* not reached */
10120 10130
#else
10121 10131
    return name;
10122 10132
#endif
ext/tk/tkutil/tkutil.c (working copy)
803 803
        }
804 804
        rb_raise(rb_eArgError, "Hash is expected for 1st argument");
805 805
    }
806

  
807
    return Qnil; /* not reached */
806 808
}
807 809

  
808 810
static VALUE