static void __lambda_15(void *data, int argc, object self_7359, object old_734, object new_733) { 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_11; c_73123.num_args = 0; c_73123.num_elements = 1; c_73123.elements = (object *)alloca(sizeof(object) * 1); c_73123.elements[0] = new_733; closureN_type c_73127; c_73127.hdr.mark = gc_color_red; c_73127.hdr.grayed = 0; c_73127.tag = closureN_tag; c_73127.fn = (function_type)__lambda_14; c_73127.num_args = 0; c_73127.num_elements = 1; c_73127.elements = (object *)alloca(sizeof(object) * 1); c_73127.elements[0] = old_734; return_closcall4(data, __glo_dynamic_91wind_scheme_base, ((closureN)self_7359)->elements[0], &c_73123, ((closureN)self_7359)->elements[1], &c_73127);; }
static void __lambda_4(void *data, int argc, object self_7396, object 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_3; c_73123.num_args = 1; c_73123.num_elements = 1; c_73123.elements = (object *)alloca(sizeof(object) * 1); c_73123.elements[0] = ((closureN)self_7396)->elements[1]; return_closcall4(data, __glo_env_117extend_91environment_scheme_cyclone_util, &c_73123, ((closureN)self_7396)->elements[2], r_7365, ((closureN)self_7396)->elements[0]);; }
static void __lambda_11(void *data, int argc, object self_7387, object r_7331) { closureN_type c_73147; c_73147.hdr.mark = gc_color_red; c_73147.hdr.grayed = 0; c_73147.tag = closureN_tag; c_73147.fn = (function_type)__lambda_10; c_73147.num_args = 1; c_73147.num_elements = 1; c_73147.elements = (object *)alloca(sizeof(object) * 1); c_73147.elements[0] = ((closureN)self_7387)->elements[0]; make_string(c_73179, "ast:set-lambda-body!"); return_closcall4(data, __glo_make_91setter_scheme_base, &c_73147, &c_73179, __glo__121lambda_91ast_125_scheme_cyclone_ast, r_7331);; }
static void __lambda_17(void *data, int argc, object self_7381, object r_7337) { closureN_type c_73135; c_73135.hdr.mark = gc_color_red; c_73135.hdr.grayed = 0; c_73135.tag = closureN_tag; c_73135.fn = (function_type)__lambda_16; c_73135.num_args = 1; c_73135.num_elements = 1; c_73135.elements = (object *)alloca(sizeof(object) * 1); c_73135.elements[0] = ((closureN)self_7381)->elements[0]; make_string(c_73185, "ast:lambda-body"); return_closcall4(data, __glo_make_91getter_scheme_base, &c_73135, &c_73185, __glo__121lambda_91ast_125_scheme_cyclone_ast, r_7337);; }
static void __lambda_20(void *data, int argc, object self_7378, object r_7340) { closureN_type c_73129; c_73129.hdr.mark = gc_color_red; c_73129.hdr.grayed = 0; c_73129.tag = closureN_tag; c_73129.fn = (function_type)__lambda_19; c_73129.num_args = 1; c_73129.num_elements = 1; c_73129.elements = (object *)alloca(sizeof(object) * 1); c_73129.elements[0] = ((closureN)self_7378)->elements[0]; make_string(c_73188, "ast:lambda-args"); return_closcall4(data, __glo_make_91getter_scheme_base, &c_73129, &c_73188, __glo__121lambda_91ast_125_scheme_cyclone_ast, r_7340);; }
static void __lambda_28(void *data, int argc, closure _,object k_7311) { Cyc_st_add(data, "scheme/cyclone/ast.sld:lib-init:schemecycloneast"); closureN_type c_73113; c_73113.hdr.mark = gc_color_red; c_73113.hdr.grayed = 0; c_73113.tag = closureN_tag; c_73113.fn = (function_type)__lambda_27; c_73113.num_args = 1; c_73113.num_elements = 1; c_73113.elements = (object *)alloca(sizeof(object) * 1); c_73113.elements[0] = k_7311; make_pair(c_73198,quote_body,NULL); make_pair(c_73197,quote_args,&c_73198); make_pair(c_73196,quote_id,&c_73197); return_closcall4(data, __glo_register_91simple_91type_scheme_base, &c_73113, __glo__121lambda_91ast_125_scheme_cyclone_ast, boolean_f, &c_73196);; }
static void __lambda_16(void *data, int argc, object self_7389, object r_7333) { return_closcall4(data, Cyc_get_cvar(Cyc_cadr(data, ((closureN)self_7389)->elements[2])), ((closureN)self_7389)->elements[1], ((closureN)self_7389)->elements[0], r_7333, __glo_Cyc_91er_91compare_127_scheme_cyclone_util);; }
static void __lambda_31(void *data, int argc, closure _,object r_7317) { mclosure0(c_73212, (function_type)__lambda_30);c_73212.num_args = 1; return_closcall4(data, __glo_env_117define_91variable_67_scheme_cyclone_util, &c_73212, quote_load, __glo_load2, __glo__85icyc_91env_85);; }
static void __lambda_0(void *data, int argc, object self_7397, object r_7351) { return_closcall4(data, __glo_ast_117_75make_91lambda_scheme_cyclone_ast, ((closureN)self_7397)->elements[2], __glo__85lambda_91id_85_scheme_cyclone_ast, ((closureN)self_7397)->elements[0], ((closureN)self_7397)->elements[1]);; }