Cyc_check_bounds Cyc_check_bvec Cyc_check_cond_var Cyc_check_fixnum Cyc_check_int Cyc_check_mutex Cyc_check_num Cyc_check_num_args Cyc_check_obj Cyc_check_pair Cyc_check_pair_or_null Cyc_check_port Cyc_check_proc Cyc_check_str Cyc_check_sym Cyc_check_type Cyc_check_type2 Cyc_check_vec Cyc_invalid_type_error

Cyc_check_num_args #define Cyc_check_num_args (   data,   fnc_name,   num_args,   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); \ } \ }