inf 7275 ext/tk/tcltklib.c struct call_eval_info *inf = (struct call_eval_info *)arg; inf 7277 ext/tk/tcltklib.c Tcl_AllowExceptions(inf->ptr->ip); inf 7278 ext/tk/tcltklib.c inf->ptr->return_value = Tcl_EvalObj(inf->ptr->ip, inf->cmd); inf 7313 ext/tk/tcltklib.c struct call_eval_info inf; inf 7322 ext/tk/tcltklib.c inf.ptr = ptr; inf 7323 ext/tk/tcltklib.c inf.cmd = cmd; inf 7324 ext/tk/tcltklib.c ret = rb_protect(call_tcl_eval, (VALUE)&inf, &status); inf 8451 ext/tk/tcltklib.c struct invoke_info *inf = (struct invoke_info *)arg; inf 8454 ext/tk/tcltklib.c int argc = inf->objc; inf 8464 ext/tk/tcltklib.c inf->ptr->return_value = Tcl_EvalObjv(inf->ptr->ip, inf->objc, inf->objv, TCL_EVAL_DIRECT); inf 8472 ext/tk/tcltklib.c if (!inf->cmdinfo.isNativeObjectProc) { inf 8481 ext/tk/tcltklib.c argv[i] = Tcl_GetStringFromObj(inf->objv[i], &len); inf 8488 ext/tk/tcltklib.c Tcl_ResetResult(inf->ptr->ip); inf 8493 ext/tk/tcltklib.c if (inf->cmdinfo.isNativeObjectProc) { inf 8495 ext/tk/tcltklib.c inf->ptr->return_value inf 8496 ext/tk/tcltklib.c = (*(inf->cmdinfo.objProc))(inf->cmdinfo.objClientData, inf 8497 ext/tk/tcltklib.c inf->ptr->ip, inf->objc, inf->objv); inf 8505 ext/tk/tcltklib.c inf->ptr->return_value inf 8506 ext/tk/tcltklib.c = (*(inf->cmdinfo.proc))(inf->cmdinfo.clientData, inf->ptr->ip, inf 8521 ext/tk/tcltklib.c inf->ptr->return_value inf 8522 ext/tk/tcltklib.c = (*(inf->cmdinfo.proc))(inf->cmdinfo.clientData, inf->ptr->ip, inf 8523 ext/tk/tcltklib.c inf->argc, inf->argv); inf 8556 ext/tk/tcltklib.c struct invoke_info inf; inf 8655 ext/tk/tcltklib.c inf.ptr = ptr; inf 8656 ext/tk/tcltklib.c inf.cmdinfo = info; inf 8658 ext/tk/tcltklib.c inf.objc = objc; inf 8659 ext/tk/tcltklib.c inf.objv = objv; inf 8661 ext/tk/tcltklib.c inf.argc = argc; inf 8662 ext/tk/tcltklib.c inf.argv = argv; inf 8667 ext/tk/tcltklib.c rb_protect(invoke_tcl_proc, (VALUE)&inf, &status); inf 1235 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1240 ext/tk/tkutil/tkutil.c &cbsubst_info_type, inf); inf 1242 ext/tk/tkutil/tkutil.c inf->full_subst_length = 0; inf 1245 ext/tk/tkutil/tkutil.c inf->keylen[idx] = 0; inf 1246 ext/tk/tkutil/tkutil.c inf->key[idx] = NULL; inf 1247 ext/tk/tkutil/tkutil.c inf->type[idx] = '\0'; inf 1248 ext/tk/tkutil/tkutil.c inf->ivar[idx] = (ID) 0; inf 1252 ext/tk/tkutil/tkutil.c inf->proc = proc; inf 1255 ext/tk/tkutil/tkutil.c inf->aliases = aliases; inf 1257 ext/tk/tkutil/tkutil.c if (inf_ptr != (struct cbsubst_info **)NULL) *inf_ptr = inf; inf 1282 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1285 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(rb_obj_class(self)); inf 1290 ext/tk/tkutil/tkutil.c if (inf->ivar[iv_idx] == (ID)0) continue; inf 1291 ext/tk/tkutil/tkutil.c rb_ivar_set(self, inf->ivar[iv_idx], argv[idx++]); inf 1352 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1358 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1362 ext/tk/tkutil/tkutil.c return rb_funcall(inf->aliases, rb_intern("update"), 1, tbl); inf 1371 ext/tk/tkutil/tkutil.c const long len = inf->keylen[idx]; inf 1383 ext/tk/tkutil/tkutil.c strncpy(ptr, inf->key[idx], len); inf 1403 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1411 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1413 ext/tk/tkutil/tkutil.c if (!NIL_P(ret = rb_hash_aref(inf->aliases, sym))) { inf 1422 ext/tk/tkutil/tkutil.c if (inf->ivar[idx] == id) break; inf 1426 ext/tk/tkutil/tkutil.c return cbsubst_append_inf_key(rb_str_new(0, 0), inf, idx); inf 1435 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1441 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1459 ext/tk/tkutil/tkutil.c if (!NIL_P(ret = rb_hash_aref(inf->aliases, arg_sym))) { inf 1468 ext/tk/tkutil/tkutil.c if (inf->ivar[idx] == id) break; inf 1475 ext/tk/tkutil/tkutil.c result = cbsubst_append_inf_key(result, inf, idx); inf 1486 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1497 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1513 ext/tk/tkutil/tkutil.c if (inf->keylen[idx] != keylen) continue; inf 1514 ext/tk/tkutil/tkutil.c if ((unsigned char)inf->key[idx][0] != (unsigned char)*(key + 1)) continue; inf 1515 ext/tk/tkutil/tkutil.c if (strncmp(inf->key[idx], key + 1, keylen)) continue; inf 1537 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1542 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1549 ext/tk/tkutil/tkutil.c if (inf->ivar[idx] == (ID) 0) continue; inf 1553 ext/tk/tkutil/tkutil.c str = cbsubst_append_inf_key(str, inf, idx); inf 1570 ext/tk/tkutil/tkutil.c VALUE inf, subst, name, type, ivar, proc; inf 1601 ext/tk/tkutil/tkutil.c inf = RARRAY_AREF(key_inf, idx); inf 1602 ext/tk/tkutil/tkutil.c if (!RB_TYPE_P(inf, T_ARRAY)) continue; inf 1603 ext/tk/tkutil/tkutil.c if (RARRAY_LEN(inf) < 3) continue; inf 1604 ext/tk/tkutil/tkutil.c infp = RARRAY_CONST_PTR(inf); inf 1629 ext/tk/tkutil/tkutil.c inf = RARRAY_AREF(longkey_inf, idx); inf 1630 ext/tk/tkutil/tkutil.c if (!RB_TYPE_P(inf, T_ARRAY)) continue; inf 1631 ext/tk/tkutil/tkutil.c if (RARRAY_LEN(inf) < 3) continue; inf 1632 ext/tk/tkutil/tkutil.c infp = RARRAY_CONST_PTR(inf); inf 1659 ext/tk/tkutil/tkutil.c inf = RARRAY_AREF(proc_inf, idx); inf 1660 ext/tk/tkutil/tkutil.c if (!RB_TYPE_P(inf, T_ARRAY)) continue; inf 1661 ext/tk/tkutil/tkutil.c if (RARRAY_LEN(inf) < 2) continue; inf 1662 ext/tk/tkutil/tkutil.c type = rb_ary_entry(inf, 0); inf 1663 ext/tk/tkutil/tkutil.c proc = rb_ary_entry(inf, 1); inf 1688 ext/tk/tkutil/tkutil.c struct cbsubst_info *inf; inf 1704 ext/tk/tkutil/tkutil.c inf = cbsubst_get_ptr(self); inf 1712 ext/tk/tkutil/tkutil.c if ((type_chr = inf->type[*(keyptr + idx)]) != 0) { inf 1713 ext/tk/tkutil/tkutil.c proc = rb_hash_aref(inf->proc, INT2FIX((int)type_chr)); inf 62 missing/isinf.c pinf = inf(); inf 2439 numeric.c int desc, inf; inf 2445 numeric.c inf = 1; inf 2449 numeric.c inf = isinf(f) && (signbit(f) ? desc : !desc); inf 2451 numeric.c else inf = 0; inf 2453 numeric.c if (FIXNUM_P(from) && (inf || FIXNUM_P(to)) && FIXNUM_P(step)) { inf 2457 numeric.c if (inf) { inf 2477 numeric.c if (inf) { inf 7669 process.c VALUE inf = RLIM2NUM(RLIM_INFINITY); inf 7672 process.c VALUE v = RLIM_INFINITY == RLIM_SAVED_MAX ? inf : RLIM2NUM(RLIM_SAVED_MAX); inf 7678 process.c rb_define_const(rb_mProcess, "RLIM_INFINITY", inf); inf 7681 process.c VALUE v = RLIM_INFINITY == RLIM_SAVED_CUR ? inf : RLIM2NUM(RLIM_SAVED_CUR);