pike.git/
src/
builtin_functions.c
Branch:
Tag:
Non-build tags
All tags
No tags
2022-07-08
2022-07-08 17:04:43 by Henrik Grubbström (Grubba) <grubba@grubba.org>
e5d780db2f8b71ef584003893694ebab6ae2f8be (
22
lines) (+
11
/-
11
)
[
Show
|
Annotate
]
Branch:
master
Pike: Fixed type for low_check_call().
Also some code clean-up and typo fixes.
3104:
if (!Pike_sp[3-args].u.integer) break; /* FALLTHRU */ default:
-
Pike_error("Bad argument
3
to __low_check_call() expected mapping.\n");
+
Pike_error("Bad argument
4
to __low_check_call() expected mapping.\n");
} } if (args > 4) sval = Pike_sp + 4 - args;
-
+
LOW_INIT_CALL_STATE(cs, 1, state);
-
if (!(
res = low_new_check_call(Pike_sp[-args].u.type,
+
res = low_new_check_call(Pike_sp[-args].u.type,
Pike_sp[1-args].u.type,
-
flags, &cs, sval)
))
{
+
flags, &cs, sval)
;
+
FREE_CALL_STATE(cs
)
;
+
pop_n_elems(args);
-
push_undefined();
-
} else {
-
pop_n_elems(args);
+
push_type_value(res); }
-
FREE_CALL_STATE(cs);
-
}
+
/*! @decl type|zero get_return_type(type fun_type) *!
10551:
OPT_TRY_OPTIMIZE); ADD_EFUN("__low_check_call", f___low_check_call,
-
tFunc(tType(tCallable) tType(tMix) tOr(tInt,tVoid) tOr(tMix,tVoid),
+
tFunc(tType(tCallable) tType(tMix) tOr(tInt,
tVoid)
+
tOr(
tMapping, tVoid) tOr(
tMix,
tVoid),
tOr(tType(tCallable), tZero)), OPT_TRY_OPTIMIZE);