Cyclone Scheme
0.28.0
|
◆ Cyc_check_num_args
Value:
{ \
object l = Cyc_length(data, args); \
if (num_args > obj_obj2int(l)) { \
char buf[128]; \
snprintf(buf, 127, "Expected %d arguments to %s but received %ld", \
num_args, fnc_name, obj_obj2int(l)); \
Cyc_rt_raise_msg(data, buf); \
} \
}
|