Bug #6066 » tk.return.patch
| ext/tk/tcltklib.c (working copy) | ||
|---|---|---|
|
} else {
|
||
|
return 0;
|
||
|
}
|
||
|
return 0; /* not reached */
|
||
|
}
|
||
|
static int
|
||
| ... | ... | |
|
} else {
|
||
|
return 0;
|
||
|
}
|
||
|
return 0; /* not reached */
|
||
|
}
|
||
| ... | ... | |
|
#if TCL_MAJOR_VERSION < 8 || (TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 6)
|
||
|
rb_raise(rb_eNotImpError,
|
||
|
"cancel_eval is supported Tcl/Tk8.6 or later.");
|
||
|
return 0; /* not reached */
|
||
|
#else
|
||
|
Tcl_Obj *msg_obj;
|
||
| ... | ... | |
|
default:
|
||
|
rb_raise(rb_eRuntimeError, "tcltklib has invalid release type number");
|
||
|
}
|
||
|
return Qnil; /* not reached */
|
||
|
}
|
||
| ... | ... | |
|
return Qnil;
|
||
|
}
|
||
|
}
|
||
|
return Qnil; /* not reached */
|
||
|
#else
|
||
|
return name;
|
||
|
#endif
|
||
| ext/tk/tkutil/tkutil.c (working copy) | ||
|---|---|---|
|
}
|
||
|
rb_raise(rb_eArgError, "Hash is expected for 1st argument");
|
||
|
}
|
||
|
return Qnil; /* not reached */
|
||
|
}
|
||
|
static VALUE
|
||