static void __lambda_27(void *data, int argc, object self_7372, object k_7321) { object c_73218 = Cyc_num_fast_eq_op(data,Cyc_length(data, ((closureN)self_7372)->elements[0]), obj_int2obj(1)); if( (boolean_f != c_73218) ){ return_closcall3(data, __glo_load_scheme_load, k_7321, Cyc_car(data, ((closureN)self_7372)->elements[0]), __glo__85icyc_91env_85); } else { return_closcall1(data, k_7321, boolean_f);} ; }
static void __lambda_6(void *data, int argc, object self_7390, object k_7359) { closureN_type c_73119; c_73119.hdr.mark = gc_color_red; c_73119.hdr.grayed = 0; c_73119.tag = closureN_tag; c_73119.fn = (function_type)__lambda_5; c_73119.num_args = 1; c_73119.num_elements = 2; c_73119.elements = (object *)alloca(sizeof(object) * 2); c_73119.elements[0] = k_7359; c_73119.elements[1] = ((closureN)self_7390)->elements[0]; return_closcall1(data,(closure)&c_73119, Cyc_car(data, cell_get(((closureN)self_7390)->elements[0])));; }
static void __lambda_5(void *data, int argc, object self_7391, object r_7365) { if( (boolean_f != Cyc_is_string(r_7365)) ){ closureN_type c_73123; c_73123.hdr.mark = gc_color_red; c_73123.hdr.grayed = 0; c_73123.tag = closureN_tag; c_73123.fn = (function_type)__lambda_4; c_73123.num_args = 1; c_73123.num_elements = 2; c_73123.elements = (object *)alloca(sizeof(object) * 2); c_73123.elements[0] = ((closureN)self_7391)->elements[0]; c_73123.elements[1] = ((closureN)self_7391)->elements[1]; return_closcall1(data,(closure)&c_73123, Cyc_car(data, cell_get(((closureN)self_7391)->elements[1]))); } else { return_closcall1(data, ((closureN)self_7391)->elements[0], boolean_f);} ; }
static void __lambda_14(void *data, int argc, closure _,object k_7348, object exp_7314, object defined_91macros_7313) { Cyc_st_add(data, "scheme/cyclone/macros.sld:macro:macro?"); return_closcall1(data, k_7348, assoc(data, Cyc_car(data, exp_7314), defined_91macros_7313));; }