/**
 ** This file was automatically generated by the Cyclone scheme compiler
 ** http://justinethier.github.io/cyclone/
 **
 ** (c) 2014-2024 Justin Ethier
 ** Version 0.36.0 
 **
 **/

#define closcall1(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 1, buf ); \
} else { \
   ((clo)->fn)(td, clo, 1, buf); \
;\
}
#define return_closcall1(td, clo,a1) { \
 char top; \
 object buf[1]; buf[0] = a1;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 1); \
     return; \
 } else {\
     closcall1(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc1(td, clo,a1) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[1]; buf[0] = a1;\
     GC(td, clo, buf, 1); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct1(td, _fn,a1) { \
 char top; \
 object buf[1]; buf[0] = a1; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 1); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 1, buf); \
 }}

#define return_direct_with_clo1(td, clo, _fn,a1) { \
 char top; \
 object buf[1]; buf[0] = a1;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 1); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 1, buf); \
 }}

#define closcall2(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 2, buf ); \
} else { \
   ((clo)->fn)(td, clo, 2, buf); \
;\
}
#define return_closcall2(td, clo,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 2); \
     return; \
 } else {\
     closcall2(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc2(td, clo,a1,a2) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[2]; buf[0] = a1;buf[1] = a2;\
     GC(td, clo, buf, 2); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct2(td, _fn,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 2); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 2, buf); \
 }}

#define return_direct_with_clo2(td, clo, _fn,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 2); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 2, buf); \
 }}

#define closcall3(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 3, buf ); \
} else { \
   ((clo)->fn)(td, clo, 3, buf); \
;\
}
#define return_closcall3(td, clo,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 3); \
     return; \
 } else {\
     closcall3(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc3(td, clo,a1,a2,a3) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
     GC(td, clo, buf, 3); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct3(td, _fn,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 3); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 3, buf); \
 }}

#define return_direct_with_clo3(td, clo, _fn,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 3); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 3, buf); \
 }}

#define closcall4(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 4, buf ); \
} else { \
   ((clo)->fn)(td, clo, 4, buf); \
;\
}
#define return_closcall4(td, clo,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 4); \
     return; \
 } else {\
     closcall4(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc4(td, clo,a1,a2,a3,a4) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
     GC(td, clo, buf, 4); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct4(td, _fn,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 4); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 4, buf); \
 }}

#define return_direct_with_clo4(td, clo, _fn,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 4); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 4, buf); \
 }}

#define closcall5(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 5, buf ); \
} else { \
   ((clo)->fn)(td, clo, 5, buf); \
;\
}
#define return_closcall5(td, clo,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 5); \
     return; \
 } else {\
     closcall5(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc5(td, clo,a1,a2,a3,a4,a5) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
     GC(td, clo, buf, 5); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct5(td, _fn,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 5); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 5, buf); \
 }}

#define return_direct_with_clo5(td, clo, _fn,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 5); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 5, buf); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117libssystem_19191calls_libs_system_91calls = NULL;
object __glo_touch_67_libs_system_91calls = NULL;
object __glo_copy_91file_67_libs_system_91calls = NULL;
object __glo_copy_91dir_91to_91dir_67_libs_system_91calls = NULL;
object __glo_copy_91file_91to_91dir_67_libs_system_91calls = NULL;
object __glo_make_91dir_67_libs_system_91calls = NULL;
object __glo_compile_67_libs_system_91calls = NULL;
object __glo_delete_67_libs_system_91calls = NULL;
object __glo_extract_67_libs_system_91calls = NULL;
object __glo_validate_91sha256sum_libs_system_91calls = NULL;
object __glo_download_67_libs_system_91calls = NULL;
object __glo_command_91exists_127_libs_system_91calls = NULL;
object __glo_ok_127_libs_system_91calls = NULL;
object __glo_DEBUG_127_libs_system_91calls = NULL;
object __glo_DEBUG_libs_system_91calls = NULL;
object __glo__85log_91level_85_libs_system_91calls = NULL;
extern object __glo_member_scheme_base;
extern object __glo_assoc_scheme_base;
extern object __glo_cons_91source_scheme_base;
extern object __glo_syntax_91rules_scheme_base;
extern object __glo_letrec_85_scheme_base;
extern object __glo_guard_scheme_base;
extern object __glo_guard_91aux_scheme_base;
extern object __glo_define_91record_91type_scheme_base;
extern object __glo_record_127_scheme_base;
extern object __glo_is_91a_127_scheme_base;
extern object __glo_register_91simple_91type_scheme_base;
extern object __glo_make_91type_91predicate_scheme_base;
extern object __glo_make_91constructor_scheme_base;
extern object __glo_make_91constructor_95args_scheme_base;
extern object __glo_make_91getter_scheme_base;
extern object __glo_make_91setter_scheme_base;
extern object __glo_slot_91ref_scheme_base;
extern object __glo_slot_91set_67_scheme_base;
extern object __glo_type_91slot_91offset_scheme_base;
extern object __glo_make_91record_91marker_scheme_base;
extern object __glo_receive_scheme_base;
extern object __glo_abs_scheme_base;
extern object __glo_max_scheme_base;
extern object __glo_min_scheme_base;
extern object __glo_modulo_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_even_127_scheme_base;
extern object __glo_exact_91integer_127_scheme_base;
extern object __glo_exact_91integer_91sqrt_scheme_base;
extern object __glo_exact_127_scheme_base;
extern object __glo_inexact_127_scheme_base;
extern object __glo_odd_127_scheme_base;
extern object __glo_complex_127_scheme_base;
extern object __glo_rational_127_scheme_base;
extern object __glo_bignum_127_scheme_base;
extern object __glo_gcd_scheme_base;
extern object __glo_lcm_scheme_base;
extern object __glo_quotient_scheme_base;
extern object __glo_remainder_scheme_base;
extern object __glo_truncate_91quotient_scheme_base;
extern object __glo_truncate_91remainder_scheme_base;
extern object __glo_truncate_95_scheme_base;
extern object __glo_floor_91quotient_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_floor_95_scheme_base;
extern object __glo_square_scheme_base;
extern object __glo_expt_scheme_base;
extern object __glo_call_91with_91current_91continuation_scheme_base;
extern object __glo_call_95cc_scheme_base;
extern object __glo_call_91with_91values_scheme_base;
extern object __glo_dynamic_91wind_scheme_base;
extern object __glo_values_scheme_base;
extern object __glo_char_123_127_scheme_base;
extern object __glo_char_121_127_scheme_base;
extern object __glo_char_125_127_scheme_base;
extern object __glo_char_121_123_127_scheme_base;
extern object __glo_char_125_123_127_scheme_base;
extern object __glo_string_123_127_scheme_base;
extern object __glo_string_121_127_scheme_base;
extern object __glo_string_121_123_127_scheme_base;
extern object __glo_string_125_127_scheme_base;
extern object __glo_string_125_123_127_scheme_base;
extern object __glo_fast_91string_123_127_scheme_base;
extern object __glo_fast_91string_121_127_scheme_base;
extern object __glo_fast_91string_121_123_127_scheme_base;
extern object __glo_fast_91string_125_127_scheme_base;
extern object __glo_fast_91string_125_123_127_scheme_base;
extern object __glo_foldl_scheme_base;
extern object __glo_foldr_scheme_base;
extern object __glo_not_scheme_base;
extern object __glo_list_127_scheme_base;
extern object __glo_zero_127_scheme_base;
extern object __glo_positive_127_scheme_base;
extern object __glo_negative_127_scheme_base;
extern object __glo_append_scheme_base;
extern object __glo__list_scheme_base;
extern object __glo_make_91list_scheme_base;
extern object __glo_list_91copy_scheme_base;
extern object __glo_map_scheme_base;
extern object __glo_Cyc_91map_91loop_911_scheme_base;
extern object __glo_Cyc_91map_91loop_912_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_911_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_912_scheme_base;
extern object __glo_for_91each_scheme_base;
extern object __glo_list_91tail_scheme_base;
extern object __glo_list_91ref_scheme_base;
extern object __glo_list_91set_67_scheme_base;
extern object __glo_reverse_scheme_base;
extern object __glo_boolean_123_127_scheme_base;
extern object __glo_symbol_123_127_scheme_base;
extern object __glo_Cyc_91obj_123_127_scheme_base;
extern object __glo_vector_scheme_base;
extern object __glo_vector_91append_scheme_base;
extern object __glo_vector_91copy_scheme_base;
extern object __glo_vector_91copy_67_scheme_base;
extern object __glo_vector_91fill_67_scheme_base;
extern object __glo_vector_91_125list_scheme_base;
extern object __glo_vector_91_125string_scheme_base;
extern object __glo_vector_91map_scheme_base;
extern object __glo_vector_91for_91each_scheme_base;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_95loc_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_write_91string_911_scheme_base;
extern object __glo_write_91string_912_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_char_91ready_127_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91add_91feature_67_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_define_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo__void_scheme_base;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_read_91bytevector_scheme_base;
extern object __glo_read_91bytevector_67_scheme_base;
extern object __glo_write_91bytevector_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_binary_91port_127_scheme_base;
extern object __glo_textual_91port_127_scheme_base;
extern object __glo_rationalize_scheme_base;
extern object __glo_display_scheme_write;
extern object __glo_format_srfi_28;
extern object __glo_path_91dir_libs_file;
extern object __glo_fast_91string_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base;
extern object __glo__75write_91bytevector_191_191inline_191_191_scheme_base;
extern object __glo_not_191_191inline_191_191_scheme_base;
extern object __glo_list_127_191_191inline_191_191_scheme_base;
extern object __glo_zero_127_191_191inline_191_191_scheme_base;
extern object __glo_positive_127_191_191inline_191_191_scheme_base;
extern object __glo_negative_127_191_191inline_191_191_scheme_base;
extern object __glo_floor_191_191inline_191_191_scheme_base;
extern object __glo_ceiling_191_191inline_191_191_scheme_base;
extern object __glo_truncate_191_191inline_191_191_scheme_base;
extern object __glo_round_191_191inline_191_191_scheme_base;
extern object __glo_exact_191_191inline_191_191_scheme_base;
extern object __glo_inexact_191_191inline_191_191_scheme_base;
extern object __glo_sqrt_191_191inline_191_191_scheme_base;
extern object __glo_exact_91integer_127_191_191inline_191_191_scheme_base;
extern object __glo_exact_127_191_191inline_191_191_scheme_base;
extern object __glo_complex_127_191_191inline_191_191_scheme_base;
extern object __glo_fixnum_127_191_191inline_191_191_scheme_base;
extern object __glo_quotient_191_191inline_191_191_scheme_base;
extern object __glo_square_191_191inline_191_191_scheme_base;
extern object __glo_eof_91object_191_191inline_191_191_scheme_base;
extern object __glo_void_191_191inline_191_191_scheme_base;
extern object __glo_make_91record_91marker_191_191inline_191_191_scheme_base;
#include "cyclone/runtime.h"
defsymbol(warning);
defsymbol(cmd);
defsymbol(debug);
defsymbol(quote);
defsymbol(_85log_91level_85);
defsymbol(eq_127);
defsymbol(_if);
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*closure _,object k_73440*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_73627, object r_73442*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*closure _,object k_73427, object file_73174_73222*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_73619, object r_73437*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_73620, object result_73175_73223*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_73621, object r_73429_73498*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_73626, object r_73436_73503*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_73622, object r_73430_73502*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_73623, object k_73431_73499*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_73624, object r_73434_73500*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_73625, object r_73433_73501*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_73414, object file_73161_73219, object to_91file_73162_73220*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_73611, object r_73424*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_73612, object result_73163_73221*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_73613, object r_73416_73492*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_73618, object r_73423_73497*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_73614, object r_73417_73496*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_73615, object k_73418_73493*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_73616, object r_73421_73494*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_73617, object r_73420_73495*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*closure _,object k_73400, object dir_73148_73216, object to_91dir_73149_73217*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_73602, object r_73401*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_73603, object r_73411*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_73604, object result_73150_73218*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_73605, object r_73403_73486*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_73610, object r_73410_73491*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_73606, object r_73404_73490*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_73607, object k_73405_73487*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_73608, object r_73408_73488*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_73609, object r_73407_73489*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*closure _,object k_73386, object file_73135_73213, object to_91dir_73136_73214*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_73593, object r_73387*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_73594, object r_73397*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_73595, object result_73137_73215*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_73596, object r_73389_73480*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_73601, object r_73396_73485*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_73597, object r_73390_73484*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_73598, object k_73391_73481*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_73599, object r_73394_73482*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_73600, object r_73393_73483*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*closure _,object k_73373, object path_73123_73211*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_73585, object r_73383*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_73586, object result_73124_73212*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_73587, object r_73375_73474*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_73592, object r_73382_73479*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_73588, object r_73376_73478*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_73589, object k_73377_73475*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_73590, object r_73380_73476*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_73591, object r_73379_73477*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*closure _,object k_73356, object file_73104_73207, object dir_73105_73208_raw, ...*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_73576, object r_73368*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_73577, object r_73367*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_73578, object result_73111_73210*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_73579, object r_73359_73468*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_73584, object r_73366_73473*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_73580, object r_73360_73472*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_73581, object k_73361_73469*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_73582, object r_73364_73470*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_73583, object r_73363_73471*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*closure _,object k_73343, object file_91or_91dir_7392_73205*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_73568, object r_73353*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_73569, object result_7393_73206*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_73570, object r_73345_73462*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_73575, object r_73352_73467*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_73571, object r_73346_73466*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_73572, object k_73347_73463*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_73573, object r_73350_73464*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_73574, object r_73349_73465*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*closure _,object k_73330, object file_7379_73202, object dir_7380_73203*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_73560, object r_73340*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_73561, object result_7381_73204*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_73562, object r_73332_73456*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_73567, object r_73339_73461*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_73563, object r_73333_73460*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_73564, object k_73334_73457*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_73565, object r_73337_73458*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_73566, object r_73336_73459*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*closure _,object k_73308, object sha256sum_7359_73199, object file_7360_73200*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_73544, object result_7361_73201*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_73545, object r_73310_73450*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_73549, object r_73317_73455*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_73546, object r_73311_73454*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*closure _,object k_73312_73451*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_73547, object r_73315_73452*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_73548, object r_73314_73453*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_73550, object k_73318*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_73551, object r_73319*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_73555, object r_73323*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_73559, object r_73327*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_73556, object r_73324*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_73558, object r_73326*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_73557, object r_73325*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_73552, object r_73320*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_73554, object r_73322*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_73553, object r_73321*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*closure _,object k_73286, object url_7339_73196, object outfile_7340_73197*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_73527, object result_7341_73198*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_73528, object r_73288_73444*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_73533, object r_73295_73449*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_73529, object r_73289_73448*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_73530, object k_73290_73445*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_73531, object r_73293_73446*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_73532, object r_73292_73447*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_73534, object k_73296*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_73535, object r_73297*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_73539, object r_73301*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_73543, object r_73305*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_73540, object r_73302*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_73542, object r_73304*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_73541, object r_73303*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_73536, object r_73298*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_73538, object r_73300*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_73537, object r_73299*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*closure _,object k_73281, object command_7338_73195*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_73525, object r_73283*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_73526, object r_73282*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_73278, object return_91code_7337_73194*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*closure _,object k_73273*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_73524, object r_73274*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_73228, object expr_735_7316_7329_73186, object rename_736_7317_7330_73187, object compare_737_7318_7331_73188*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_73504, object v_931_7313_7323_7333_73190*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_73505, object tmp_7320_7322_7332_73189*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_73506, object r_73229*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_73507, object k_73231*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_73508, object r_73232*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_73509, object k_73234*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_73510, object r_73240*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_73511, object r_73248*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_73512, object r_73265*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_73513, object r_73251*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_73514, object r_73257*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_73515, object r_73260*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_73516, object r_73258*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_73517, object r_73254*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_73518, object r_73252*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_73519, object r_73249*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_73520, object r_73243*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_73521, object r_73244*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_73522, object r_73241*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_73523, object r_73239*/

static void __lambda_139(void *data, object _, int argc, object *args) /* closure _,object k_73440 */
 {
object k_73440 = args[0];
  Cyc_st_add(data, "libs/system-calls.sld:lib-init:libssystem_91calls");

closureN_type c_731386;
object e_731392 [1];
c_731386.hdr.mark = gc_color_red;
 c_731386.hdr.grayed = 0;
c_731386.tag = closureN_tag;
 c_731386.fn = (function_type)__lambda_140;
c_731386.num_args = 1;
c_731386.num_elements = 1;
c_731386.elements = (object *)e_731392;
c_731386.elements[0] = k_73440;

return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_731386, quote_warning);; 
}

static void __lambda_140(void *data, object self_73627, int argc, object *args) /* object self_73627, object r_73442 */
 {
 object r_73442 = args[0];
  
object c_731391 = global_set_cps_id(data,  ((closureN)self_73627)->elements[0],"__glo__85log_91level_85_libs_system_91calls", __glo__85log_91level_85_libs_system_91calls, r_73442);
return_direct_with_clo1(data,  ((closureN)self_73627)->elements[0], (((closure)  ((closureN)self_73627)->elements[0])->fn),  c_731391);; 
}

static void __lambda_130(void *data, object _, int argc, object *args) /* closure _,object k_73427, object file_73174_73222 */
 {
object k_73427 = args[0]; object file_73174_73222 = args[1];
  Cyc_st_add(data, "libs/system-calls.sld:touch!");

closureN_type c_731341;
object e_731382 [2];
c_731341.hdr.mark = gc_color_red;
 c_731341.hdr.grayed = 0;
c_731341.tag = closureN_tag;
 c_731341.fn = (function_type)__lambda_131;
c_731341.num_args = 1;
c_731341.num_elements = 2;
c_731341.elements = (object *)e_731382;
c_731341.elements[0] = file_73174_73222;
c_731341.elements[1] = k_73427;


make_utf8_string_with_len(c_731383, "touch ~a", 8, 8);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731341, &c_731383, file_73174_73222);; 
}

static void __lambda_131(void *data, object self_73619, int argc, object *args) /* object self_73619, object r_73437 */
 {
 object r_73437 = args[0];
  
closureN_type c_731343;
object e_731379 [2];
c_731343.hdr.mark = gc_color_red;
 c_731343.hdr.grayed = 0;
c_731343.tag = closureN_tag;
 c_731343.fn = (function_type)__lambda_132;
c_731343.num_args = 1;
c_731343.num_elements = 2;
c_731343.elements = (object *)e_731379;
c_731343.elements[0] = ((closureN)self_73619)->elements[0];
c_731343.elements[1] = ((closureN)self_73619)->elements[1];



return_direct_with_clo1(data,(closure)&c_731343,__lambda_132,  Cyc_system(r_73437));; 
}

static void __lambda_132(void *data, object self_73620, int argc, object *args) /* object self_73620, object result_73175_73223 */
 {
 object result_73175_73223 = args[0];
  
closureN_type c_731345;
object e_731376 [3];
c_731345.hdr.mark = gc_color_red;
 c_731345.hdr.grayed = 0;
c_731345.tag = closureN_tag;
 c_731345.fn = (function_type)__lambda_133;
c_731345.num_args = 1;
c_731345.num_elements = 3;
c_731345.elements = (object *)e_731376;
c_731345.elements[0] = ((closureN)self_73620)->elements[0];
c_731345.elements[1] = ((closureN)self_73620)->elements[1];
c_731345.elements[2] = result_73175_73223;



return_direct_with_clo1(data,(closure)&c_731345,__lambda_133,  Cyc_eq(obj_int2obj(0), result_73175_73223));; 
}

static void __lambda_133(void *data, object self_73621, int argc, object *args) /* object self_73621, object r_73429_73498 */
 {
 object r_73429_73498 = args[0];
  if( (boolean_f != r_73429_73498) ){ 
  
closureN_type c_731347;
object e_731362 [1];
c_731347.hdr.mark = gc_color_red;
 c_731347.hdr.grayed = 0;
c_731347.tag = closureN_tag;
 c_731347.fn = (function_type)__lambda_134;
c_731347.num_args = 0;
c_731347.num_elements = 1;
c_731347.elements = (object *)e_731362;
c_731347.elements[0] = ((closureN)self_73621)->elements[0];


closureN_type c_731363;
object e_731367 [2];
c_731363.hdr.mark = gc_color_red;
 c_731363.hdr.grayed = 0;
c_731363.tag = closureN_tag;
 c_731363.fn = (function_type)__lambda_137;
c_731363.num_args = 1;
c_731363.num_elements = 2;
c_731363.elements = (object *)e_731367;
c_731363.elements[0] = ((closureN)self_73621)->elements[0];
c_731363.elements[1] = ((closureN)self_73621)->elements[1];

return_direct_with_clo1(data,(closure)&c_731347,__lambda_134,  &c_731363);
} else { 
  
closureN_type c_731369;
object e_731373 [2];
c_731369.hdr.mark = gc_color_red;
 c_731369.hdr.grayed = 0;
c_731369.tag = closureN_tag;
 c_731369.fn = (function_type)__lambda_138;
c_731369.num_args = 1;
c_731369.num_elements = 2;
c_731369.elements = (object *)e_731373;
c_731369.elements[0] = ((closureN)self_73621)->elements[1];
c_731369.elements[1] = ((closureN)self_73621)->elements[2];


make_utf8_string_with_len(c_731374, "Could not touch file ~a. Lack of permissions\? Return code", 57, 57);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731369, &c_731374, ((closureN)self_73621)->elements[0]);}
;; 
}

static void __lambda_138(void *data, object self_73626, int argc, object *args) /* object self_73626, object r_73436_73503 */
 {
 object r_73436_73503 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73626)->elements[0], r_73436_73503, ((closureN)self_73626)->elements[1]);; 
}

static void __lambda_137(void *data, object self_73622, int argc, object *args) /* object self_73622, object r_73430_73502 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73622)->elements[1], (((closure)  ((closureN)self_73622)->elements[1])->fn),  ((closureN)self_73622)->elements[0]);; 
}

static void __lambda_134(void *data, object self_73623, int argc, object *args) /* object self_73623, object k_73431_73499 */
 {
 object k_73431_73499 = args[0];
  
closureN_type c_731349;
object e_731361 [2];
c_731349.hdr.mark = gc_color_red;
 c_731349.hdr.grayed = 0;
c_731349.tag = closureN_tag;
 c_731349.fn = (function_type)__lambda_135;
c_731349.num_args = 1;
c_731349.num_elements = 2;
c_731349.elements = (object *)e_731361;
c_731349.elements[0] = ((closureN)self_73623)->elements[0];
c_731349.elements[1] = k_73431_73499;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731349);; 
}

static void __lambda_135(void *data, object self_73624, int argc, object *args) /* object self_73624, object r_73434_73500 */
 {
 object r_73434_73500 = args[0];
    
if( (boolean_f != Cyc_eq(r_73434_73500, quote_debug)) ){ 
  
closureN_type c_731353;
object e_731356 [1];
c_731353.hdr.mark = gc_color_red;
 c_731353.hdr.grayed = 0;
c_731353.tag = closureN_tag;
 c_731353.fn = (function_type)__lambda_136;
c_731353.num_args = 1;
c_731353.num_elements = 1;
c_731353.elements = (object *)e_731356;
c_731353.elements[0] = ((closureN)self_73624)->elements[1];


make_utf8_string_with_len(c_731357, "[OK] Touched file ~a~%", 22, 22);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731353, &c_731357, ((closureN)self_73624)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73624)->elements[1], (((closure)  ((closureN)self_73624)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_136(void *data, object self_73625, int argc, object *args) /* object self_73625, object r_73433_73501 */
 {
 object r_73433_73501 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73625)->elements[0], r_73433_73501);; 
}

static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_73414, object file_73161_73219, object to_91file_73162_73220 */
 {
object k_73414 = args[0]; object file_73161_73219 = args[1]; object to_91file_73162_73220 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:copy-file!");

closureN_type c_731294;
object e_731337 [3];
c_731294.hdr.mark = gc_color_red;
 c_731294.hdr.grayed = 0;
c_731294.tag = closureN_tag;
 c_731294.fn = (function_type)__lambda_122;
c_731294.num_args = 1;
c_731294.num_elements = 3;
c_731294.elements = (object *)e_731337;
c_731294.elements[0] = file_73161_73219;
c_731294.elements[1] = k_73414;
c_731294.elements[2] = to_91file_73162_73220;


make_utf8_string_with_len(c_731338, "cp ~a ~a", 8, 8);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731294, &c_731338, file_73161_73219, to_91file_73162_73220);; 
}

static void __lambda_122(void *data, object self_73611, int argc, object *args) /* object self_73611, object r_73424 */
 {
 object r_73424 = args[0];
  
closureN_type c_731296;
object e_731334 [3];
c_731296.hdr.mark = gc_color_red;
 c_731296.hdr.grayed = 0;
c_731296.tag = closureN_tag;
 c_731296.fn = (function_type)__lambda_123;
c_731296.num_args = 1;
c_731296.num_elements = 3;
c_731296.elements = (object *)e_731334;
c_731296.elements[0] = ((closureN)self_73611)->elements[0];
c_731296.elements[1] = ((closureN)self_73611)->elements[1];
c_731296.elements[2] = ((closureN)self_73611)->elements[2];



return_direct_with_clo1(data,(closure)&c_731296,__lambda_123,  Cyc_system(r_73424));; 
}

static void __lambda_123(void *data, object self_73612, int argc, object *args) /* object self_73612, object result_73163_73221 */
 {
 object result_73163_73221 = args[0];
  
closureN_type c_731298;
object e_731331 [4];
c_731298.hdr.mark = gc_color_red;
 c_731298.hdr.grayed = 0;
c_731298.tag = closureN_tag;
 c_731298.fn = (function_type)__lambda_124;
c_731298.num_args = 1;
c_731298.num_elements = 4;
c_731298.elements = (object *)e_731331;
c_731298.elements[0] = ((closureN)self_73612)->elements[0];
c_731298.elements[1] = ((closureN)self_73612)->elements[1];
c_731298.elements[2] = result_73163_73221;
c_731298.elements[3] = ((closureN)self_73612)->elements[2];



return_direct_with_clo1(data,(closure)&c_731298,__lambda_124,  Cyc_eq(obj_int2obj(0), result_73163_73221));; 
}

static void __lambda_124(void *data, object self_73613, int argc, object *args) /* object self_73613, object r_73416_73492 */
 {
 object r_73416_73492 = args[0];
  if( (boolean_f != r_73416_73492) ){ 
  
closureN_type c_731300;
object e_731316 [2];
c_731300.hdr.mark = gc_color_red;
 c_731300.hdr.grayed = 0;
c_731300.tag = closureN_tag;
 c_731300.fn = (function_type)__lambda_125;
c_731300.num_args = 0;
c_731300.num_elements = 2;
c_731300.elements = (object *)e_731316;
c_731300.elements[0] = ((closureN)self_73613)->elements[0];
c_731300.elements[1] = ((closureN)self_73613)->elements[3];


closureN_type c_731317;
object e_731321 [2];
c_731317.hdr.mark = gc_color_red;
 c_731317.hdr.grayed = 0;
c_731317.tag = closureN_tag;
 c_731317.fn = (function_type)__lambda_128;
c_731317.num_args = 1;
c_731317.num_elements = 2;
c_731317.elements = (object *)e_731321;
c_731317.elements[0] = ((closureN)self_73613)->elements[0];
c_731317.elements[1] = ((closureN)self_73613)->elements[1];

return_direct_with_clo1(data,(closure)&c_731300,__lambda_125,  &c_731317);
} else { 
  
closureN_type c_731323;
object e_731327 [2];
c_731323.hdr.mark = gc_color_red;
 c_731323.hdr.grayed = 0;
c_731323.tag = closureN_tag;
 c_731323.fn = (function_type)__lambda_129;
c_731323.num_args = 1;
c_731323.num_elements = 2;
c_731323.elements = (object *)e_731327;
c_731323.elements[0] = ((closureN)self_73613)->elements[1];
c_731323.elements[1] = ((closureN)self_73613)->elements[2];


make_utf8_string_with_len(c_731328, "Could not copy file ~a to ~a. Lack of permissions\? Return code", 62, 62);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731323, &c_731328, ((closureN)self_73613)->elements[0], ((closureN)self_73613)->elements[3]);}
;; 
}

static void __lambda_129(void *data, object self_73618, int argc, object *args) /* object self_73618, object r_73423_73497 */
 {
 object r_73423_73497 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73618)->elements[0], r_73423_73497, ((closureN)self_73618)->elements[1]);; 
}

static void __lambda_128(void *data, object self_73614, int argc, object *args) /* object self_73614, object r_73417_73496 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73614)->elements[1], (((closure)  ((closureN)self_73614)->elements[1])->fn),  ((closureN)self_73614)->elements[0]);; 
}

static void __lambda_125(void *data, object self_73615, int argc, object *args) /* object self_73615, object k_73418_73493 */
 {
 object k_73418_73493 = args[0];
  
closureN_type c_731302;
object e_731315 [3];
c_731302.hdr.mark = gc_color_red;
 c_731302.hdr.grayed = 0;
c_731302.tag = closureN_tag;
 c_731302.fn = (function_type)__lambda_126;
c_731302.num_args = 1;
c_731302.num_elements = 3;
c_731302.elements = (object *)e_731315;
c_731302.elements[0] = ((closureN)self_73615)->elements[0];
c_731302.elements[1] = k_73418_73493;
c_731302.elements[2] = ((closureN)self_73615)->elements[1];

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731302);; 
}

static void __lambda_126(void *data, object self_73616, int argc, object *args) /* object self_73616, object r_73421_73494 */
 {
 object r_73421_73494 = args[0];
    
if( (boolean_f != Cyc_eq(r_73421_73494, quote_debug)) ){ 
  
closureN_type c_731306;
object e_731309 [1];
c_731306.hdr.mark = gc_color_red;
 c_731306.hdr.grayed = 0;
c_731306.tag = closureN_tag;
 c_731306.fn = (function_type)__lambda_127;
c_731306.num_args = 1;
c_731306.num_elements = 1;
c_731306.elements = (object *)e_731309;
c_731306.elements[0] = ((closureN)self_73616)->elements[1];


make_utf8_string_with_len(c_731310, "[OK] File ~a copied to ~a~%", 27, 27);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731306, &c_731310, ((closureN)self_73616)->elements[0], ((closureN)self_73616)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73616)->elements[1], (((closure)  ((closureN)self_73616)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_127(void *data, object self_73617, int argc, object *args) /* object self_73617, object r_73420_73495 */
 {
 object r_73420_73495 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73617)->elements[0], r_73420_73495);; 
}

static void __lambda_111(void *data, object _, int argc, object *args) /* closure _,object k_73400, object dir_73148_73216, object to_91dir_73149_73217 */
 {
object k_73400 = args[0]; object dir_73148_73216 = args[1]; object to_91dir_73149_73217 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:copy-dir-to-dir!");

closureN_type c_731242;
object e_731291 [3];
c_731242.hdr.mark = gc_color_red;
 c_731242.hdr.grayed = 0;
c_731242.tag = closureN_tag;
 c_731242.fn = (function_type)__lambda_112;
c_731242.num_args = 1;
c_731242.num_elements = 3;
c_731242.elements = (object *)e_731291;
c_731242.elements[0] = dir_73148_73216;
c_731242.elements[1] = k_73400;
c_731242.elements[2] = to_91dir_73149_73217;

return_direct_with_clo2(data,  __glo_make_91dir_67_libs_system_91calls, (((closure)  __glo_make_91dir_67_libs_system_91calls)->fn),  &c_731242, to_91dir_73149_73217);; 
}

static void __lambda_112(void *data, object self_73602, int argc, object *args) /* object self_73602, object r_73401 */
 {

  
closureN_type c_731244;
object e_731287 [3];
c_731244.hdr.mark = gc_color_red;
 c_731244.hdr.grayed = 0;
c_731244.tag = closureN_tag;
 c_731244.fn = (function_type)__lambda_113;
c_731244.num_args = 1;
c_731244.num_elements = 3;
c_731244.elements = (object *)e_731287;
c_731244.elements[0] = ((closureN)self_73602)->elements[0];
c_731244.elements[1] = ((closureN)self_73602)->elements[1];
c_731244.elements[2] = ((closureN)self_73602)->elements[2];


make_utf8_string_with_len(c_731288, "cp -Rf ~a ~a", 12, 12);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731244, &c_731288, ((closureN)self_73602)->elements[0], ((closureN)self_73602)->elements[2]);; 
}

static void __lambda_113(void *data, object self_73603, int argc, object *args) /* object self_73603, object r_73411 */
 {
 object r_73411 = args[0];
  
closureN_type c_731246;
object e_731284 [3];
c_731246.hdr.mark = gc_color_red;
 c_731246.hdr.grayed = 0;
c_731246.tag = closureN_tag;
 c_731246.fn = (function_type)__lambda_114;
c_731246.num_args = 1;
c_731246.num_elements = 3;
c_731246.elements = (object *)e_731284;
c_731246.elements[0] = ((closureN)self_73603)->elements[0];
c_731246.elements[1] = ((closureN)self_73603)->elements[1];
c_731246.elements[2] = ((closureN)self_73603)->elements[2];



return_direct_with_clo1(data,(closure)&c_731246,__lambda_114,  Cyc_system(r_73411));; 
}

static void __lambda_114(void *data, object self_73604, int argc, object *args) /* object self_73604, object result_73150_73218 */
 {
 object result_73150_73218 = args[0];
  
closureN_type c_731248;
object e_731281 [4];
c_731248.hdr.mark = gc_color_red;
 c_731248.hdr.grayed = 0;
c_731248.tag = closureN_tag;
 c_731248.fn = (function_type)__lambda_115;
c_731248.num_args = 1;
c_731248.num_elements = 4;
c_731248.elements = (object *)e_731281;
c_731248.elements[0] = ((closureN)self_73604)->elements[0];
c_731248.elements[1] = ((closureN)self_73604)->elements[1];
c_731248.elements[2] = result_73150_73218;
c_731248.elements[3] = ((closureN)self_73604)->elements[2];



return_direct_with_clo1(data,(closure)&c_731248,__lambda_115,  Cyc_eq(obj_int2obj(0), result_73150_73218));; 
}

static void __lambda_115(void *data, object self_73605, int argc, object *args) /* object self_73605, object r_73403_73486 */
 {
 object r_73403_73486 = args[0];
  if( (boolean_f != r_73403_73486) ){ 
  
closureN_type c_731250;
object e_731266 [2];
c_731250.hdr.mark = gc_color_red;
 c_731250.hdr.grayed = 0;
c_731250.tag = closureN_tag;
 c_731250.fn = (function_type)__lambda_116;
c_731250.num_args = 0;
c_731250.num_elements = 2;
c_731250.elements = (object *)e_731266;
c_731250.elements[0] = ((closureN)self_73605)->elements[0];
c_731250.elements[1] = ((closureN)self_73605)->elements[3];


closureN_type c_731267;
object e_731271 [2];
c_731267.hdr.mark = gc_color_red;
 c_731267.hdr.grayed = 0;
c_731267.tag = closureN_tag;
 c_731267.fn = (function_type)__lambda_119;
c_731267.num_args = 1;
c_731267.num_elements = 2;
c_731267.elements = (object *)e_731271;
c_731267.elements[0] = ((closureN)self_73605)->elements[0];
c_731267.elements[1] = ((closureN)self_73605)->elements[1];

return_direct_with_clo1(data,(closure)&c_731250,__lambda_116,  &c_731267);
} else { 
  
closureN_type c_731273;
object e_731277 [2];
c_731273.hdr.mark = gc_color_red;
 c_731273.hdr.grayed = 0;
c_731273.tag = closureN_tag;
 c_731273.fn = (function_type)__lambda_120;
c_731273.num_args = 1;
c_731273.num_elements = 2;
c_731273.elements = (object *)e_731277;
c_731273.elements[0] = ((closureN)self_73605)->elements[1];
c_731273.elements[1] = ((closureN)self_73605)->elements[2];


make_utf8_string_with_len(c_731278, "Could not copy directory ~a into ~a. Lack of permissions\? Return code", 69, 69);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731273, &c_731278, ((closureN)self_73605)->elements[0], ((closureN)self_73605)->elements[3]);}
;; 
}

static void __lambda_120(void *data, object self_73610, int argc, object *args) /* object self_73610, object r_73410_73491 */
 {
 object r_73410_73491 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73610)->elements[0], r_73410_73491, ((closureN)self_73610)->elements[1]);; 
}

static void __lambda_119(void *data, object self_73606, int argc, object *args) /* object self_73606, object r_73404_73490 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73606)->elements[1], (((closure)  ((closureN)self_73606)->elements[1])->fn),  ((closureN)self_73606)->elements[0]);; 
}

static void __lambda_116(void *data, object self_73607, int argc, object *args) /* object self_73607, object k_73405_73487 */
 {
 object k_73405_73487 = args[0];
  
closureN_type c_731252;
object e_731265 [3];
c_731252.hdr.mark = gc_color_red;
 c_731252.hdr.grayed = 0;
c_731252.tag = closureN_tag;
 c_731252.fn = (function_type)__lambda_117;
c_731252.num_args = 1;
c_731252.num_elements = 3;
c_731252.elements = (object *)e_731265;
c_731252.elements[0] = ((closureN)self_73607)->elements[0];
c_731252.elements[1] = k_73405_73487;
c_731252.elements[2] = ((closureN)self_73607)->elements[1];

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731252);; 
}

static void __lambda_117(void *data, object self_73608, int argc, object *args) /* object self_73608, object r_73408_73488 */
 {
 object r_73408_73488 = args[0];
    
if( (boolean_f != Cyc_eq(r_73408_73488, quote_debug)) ){ 
  
closureN_type c_731256;
object e_731259 [1];
c_731256.hdr.mark = gc_color_red;
 c_731256.hdr.grayed = 0;
c_731256.tag = closureN_tag;
 c_731256.fn = (function_type)__lambda_118;
c_731256.num_args = 1;
c_731256.num_elements = 1;
c_731256.elements = (object *)e_731259;
c_731256.elements[0] = ((closureN)self_73608)->elements[1];


make_utf8_string_with_len(c_731260, "[OK] Directory ~a copied into ~a~%", 34, 34);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731256, &c_731260, ((closureN)self_73608)->elements[0], ((closureN)self_73608)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73608)->elements[1], (((closure)  ((closureN)self_73608)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_118(void *data, object self_73609, int argc, object *args) /* object self_73609, object r_73407_73489 */
 {
 object r_73407_73489 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73609)->elements[0], r_73407_73489);; 
}

static void __lambda_101(void *data, object _, int argc, object *args) /* closure _,object k_73386, object file_73135_73213, object to_91dir_73136_73214 */
 {
object k_73386 = args[0]; object file_73135_73213 = args[1]; object to_91dir_73136_73214 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:copy-file-to-dir!");

closureN_type c_731190;
object e_731239 [3];
c_731190.hdr.mark = gc_color_red;
 c_731190.hdr.grayed = 0;
c_731190.tag = closureN_tag;
 c_731190.fn = (function_type)__lambda_102;
c_731190.num_args = 1;
c_731190.num_elements = 3;
c_731190.elements = (object *)e_731239;
c_731190.elements[0] = file_73135_73213;
c_731190.elements[1] = k_73386;
c_731190.elements[2] = to_91dir_73136_73214;

return_direct_with_clo2(data,  __glo_make_91dir_67_libs_system_91calls, (((closure)  __glo_make_91dir_67_libs_system_91calls)->fn),  &c_731190, to_91dir_73136_73214);; 
}

static void __lambda_102(void *data, object self_73593, int argc, object *args) /* object self_73593, object r_73387 */
 {

  
closureN_type c_731192;
object e_731235 [3];
c_731192.hdr.mark = gc_color_red;
 c_731192.hdr.grayed = 0;
c_731192.tag = closureN_tag;
 c_731192.fn = (function_type)__lambda_103;
c_731192.num_args = 1;
c_731192.num_elements = 3;
c_731192.elements = (object *)e_731235;
c_731192.elements[0] = ((closureN)self_73593)->elements[0];
c_731192.elements[1] = ((closureN)self_73593)->elements[1];
c_731192.elements[2] = ((closureN)self_73593)->elements[2];


make_utf8_string_with_len(c_731236, "cp ~a ~a", 8, 8);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731192, &c_731236, ((closureN)self_73593)->elements[0], ((closureN)self_73593)->elements[2]);; 
}

static void __lambda_103(void *data, object self_73594, int argc, object *args) /* object self_73594, object r_73397 */
 {
 object r_73397 = args[0];
  
closureN_type c_731194;
object e_731232 [3];
c_731194.hdr.mark = gc_color_red;
 c_731194.hdr.grayed = 0;
c_731194.tag = closureN_tag;
 c_731194.fn = (function_type)__lambda_104;
c_731194.num_args = 1;
c_731194.num_elements = 3;
c_731194.elements = (object *)e_731232;
c_731194.elements[0] = ((closureN)self_73594)->elements[0];
c_731194.elements[1] = ((closureN)self_73594)->elements[1];
c_731194.elements[2] = ((closureN)self_73594)->elements[2];



return_direct_with_clo1(data,(closure)&c_731194,__lambda_104,  Cyc_system(r_73397));; 
}

static void __lambda_104(void *data, object self_73595, int argc, object *args) /* object self_73595, object result_73137_73215 */
 {
 object result_73137_73215 = args[0];
  
closureN_type c_731196;
object e_731229 [4];
c_731196.hdr.mark = gc_color_red;
 c_731196.hdr.grayed = 0;
c_731196.tag = closureN_tag;
 c_731196.fn = (function_type)__lambda_105;
c_731196.num_args = 1;
c_731196.num_elements = 4;
c_731196.elements = (object *)e_731229;
c_731196.elements[0] = ((closureN)self_73595)->elements[0];
c_731196.elements[1] = ((closureN)self_73595)->elements[1];
c_731196.elements[2] = result_73137_73215;
c_731196.elements[3] = ((closureN)self_73595)->elements[2];



return_direct_with_clo1(data,(closure)&c_731196,__lambda_105,  Cyc_eq(obj_int2obj(0), result_73137_73215));; 
}

static void __lambda_105(void *data, object self_73596, int argc, object *args) /* object self_73596, object r_73389_73480 */
 {
 object r_73389_73480 = args[0];
  if( (boolean_f != r_73389_73480) ){ 
  
closureN_type c_731198;
object e_731214 [2];
c_731198.hdr.mark = gc_color_red;
 c_731198.hdr.grayed = 0;
c_731198.tag = closureN_tag;
 c_731198.fn = (function_type)__lambda_106;
c_731198.num_args = 0;
c_731198.num_elements = 2;
c_731198.elements = (object *)e_731214;
c_731198.elements[0] = ((closureN)self_73596)->elements[0];
c_731198.elements[1] = ((closureN)self_73596)->elements[3];


closureN_type c_731215;
object e_731219 [2];
c_731215.hdr.mark = gc_color_red;
 c_731215.hdr.grayed = 0;
c_731215.tag = closureN_tag;
 c_731215.fn = (function_type)__lambda_109;
c_731215.num_args = 1;
c_731215.num_elements = 2;
c_731215.elements = (object *)e_731219;
c_731215.elements[0] = ((closureN)self_73596)->elements[0];
c_731215.elements[1] = ((closureN)self_73596)->elements[1];

return_direct_with_clo1(data,(closure)&c_731198,__lambda_106,  &c_731215);
} else { 
  
closureN_type c_731221;
object e_731225 [2];
c_731221.hdr.mark = gc_color_red;
 c_731221.hdr.grayed = 0;
c_731221.tag = closureN_tag;
 c_731221.fn = (function_type)__lambda_110;
c_731221.num_args = 1;
c_731221.num_elements = 2;
c_731221.elements = (object *)e_731225;
c_731221.elements[0] = ((closureN)self_73596)->elements[1];
c_731221.elements[1] = ((closureN)self_73596)->elements[2];


make_utf8_string_with_len(c_731226, "Could not copy file ~a into ~a. Lack of permissions\? Return code", 64, 64);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731221, &c_731226, ((closureN)self_73596)->elements[0], ((closureN)self_73596)->elements[3]);}
;; 
}

static void __lambda_110(void *data, object self_73601, int argc, object *args) /* object self_73601, object r_73396_73485 */
 {
 object r_73396_73485 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73601)->elements[0], r_73396_73485, ((closureN)self_73601)->elements[1]);; 
}

static void __lambda_109(void *data, object self_73597, int argc, object *args) /* object self_73597, object r_73390_73484 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73597)->elements[1], (((closure)  ((closureN)self_73597)->elements[1])->fn),  ((closureN)self_73597)->elements[0]);; 
}

static void __lambda_106(void *data, object self_73598, int argc, object *args) /* object self_73598, object k_73391_73481 */
 {
 object k_73391_73481 = args[0];
  
closureN_type c_731200;
object e_731213 [3];
c_731200.hdr.mark = gc_color_red;
 c_731200.hdr.grayed = 0;
c_731200.tag = closureN_tag;
 c_731200.fn = (function_type)__lambda_107;
c_731200.num_args = 1;
c_731200.num_elements = 3;
c_731200.elements = (object *)e_731213;
c_731200.elements[0] = ((closureN)self_73598)->elements[0];
c_731200.elements[1] = k_73391_73481;
c_731200.elements[2] = ((closureN)self_73598)->elements[1];

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731200);; 
}

static void __lambda_107(void *data, object self_73599, int argc, object *args) /* object self_73599, object r_73394_73482 */
 {
 object r_73394_73482 = args[0];
    
if( (boolean_f != Cyc_eq(r_73394_73482, quote_debug)) ){ 
  
closureN_type c_731204;
object e_731207 [1];
c_731204.hdr.mark = gc_color_red;
 c_731204.hdr.grayed = 0;
c_731204.tag = closureN_tag;
 c_731204.fn = (function_type)__lambda_108;
c_731204.num_args = 1;
c_731204.num_elements = 1;
c_731204.elements = (object *)e_731207;
c_731204.elements[0] = ((closureN)self_73599)->elements[1];


make_utf8_string_with_len(c_731208, "[OK] File ~a copied into ~a~%", 29, 29);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731204, &c_731208, ((closureN)self_73599)->elements[0], ((closureN)self_73599)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73599)->elements[1], (((closure)  ((closureN)self_73599)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_108(void *data, object self_73600, int argc, object *args) /* object self_73600, object r_73393_73483 */
 {
 object r_73393_73483 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73600)->elements[0], r_73393_73483);; 
}

static void __lambda_92(void *data, object _, int argc, object *args) /* closure _,object k_73373, object path_73123_73211 */
 {
object k_73373 = args[0]; object path_73123_73211 = args[1];
  Cyc_st_add(data, "libs/system-calls.sld:make-dir!");

closureN_type c_731145;
object e_731186 [2];
c_731145.hdr.mark = gc_color_red;
 c_731145.hdr.grayed = 0;
c_731145.tag = closureN_tag;
 c_731145.fn = (function_type)__lambda_93;
c_731145.num_args = 1;
c_731145.num_elements = 2;
c_731145.elements = (object *)e_731186;
c_731145.elements[0] = k_73373;
c_731145.elements[1] = path_73123_73211;


make_utf8_string_with_len(c_731187, "mkdir -p ~a", 11, 11);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731145, &c_731187, path_73123_73211);; 
}

static void __lambda_93(void *data, object self_73585, int argc, object *args) /* object self_73585, object r_73383 */
 {
 object r_73383 = args[0];
  
closureN_type c_731147;
object e_731183 [2];
c_731147.hdr.mark = gc_color_red;
 c_731147.hdr.grayed = 0;
c_731147.tag = closureN_tag;
 c_731147.fn = (function_type)__lambda_94;
c_731147.num_args = 1;
c_731147.num_elements = 2;
c_731147.elements = (object *)e_731183;
c_731147.elements[0] = ((closureN)self_73585)->elements[0];
c_731147.elements[1] = ((closureN)self_73585)->elements[1];



return_direct_with_clo1(data,(closure)&c_731147,__lambda_94,  Cyc_system(r_73383));; 
}

static void __lambda_94(void *data, object self_73586, int argc, object *args) /* object self_73586, object result_73124_73212 */
 {
 object result_73124_73212 = args[0];
  
closureN_type c_731149;
object e_731180 [3];
c_731149.hdr.mark = gc_color_red;
 c_731149.hdr.grayed = 0;
c_731149.tag = closureN_tag;
 c_731149.fn = (function_type)__lambda_95;
c_731149.num_args = 1;
c_731149.num_elements = 3;
c_731149.elements = (object *)e_731180;
c_731149.elements[0] = ((closureN)self_73586)->elements[0];
c_731149.elements[1] = ((closureN)self_73586)->elements[1];
c_731149.elements[2] = result_73124_73212;



return_direct_with_clo1(data,(closure)&c_731149,__lambda_95,  Cyc_eq(obj_int2obj(0), result_73124_73212));; 
}

static void __lambda_95(void *data, object self_73587, int argc, object *args) /* object self_73587, object r_73375_73474 */
 {
 object r_73375_73474 = args[0];
  if( (boolean_f != r_73375_73474) ){ 
  
closureN_type c_731151;
object e_731166 [1];
c_731151.hdr.mark = gc_color_red;
 c_731151.hdr.grayed = 0;
c_731151.tag = closureN_tag;
 c_731151.fn = (function_type)__lambda_96;
c_731151.num_args = 0;
c_731151.num_elements = 1;
c_731151.elements = (object *)e_731166;
c_731151.elements[0] = ((closureN)self_73587)->elements[1];


closureN_type c_731167;
object e_731171 [2];
c_731167.hdr.mark = gc_color_red;
 c_731167.hdr.grayed = 0;
c_731167.tag = closureN_tag;
 c_731167.fn = (function_type)__lambda_99;
c_731167.num_args = 1;
c_731167.num_elements = 2;
c_731167.elements = (object *)e_731171;
c_731167.elements[0] = ((closureN)self_73587)->elements[0];
c_731167.elements[1] = ((closureN)self_73587)->elements[1];

return_direct_with_clo1(data,(closure)&c_731151,__lambda_96,  &c_731167);
} else { 
  
closureN_type c_731173;
object e_731177 [2];
c_731173.hdr.mark = gc_color_red;
 c_731173.hdr.grayed = 0;
c_731173.tag = closureN_tag;
 c_731173.fn = (function_type)__lambda_100;
c_731173.num_args = 1;
c_731173.num_elements = 2;
c_731173.elements = (object *)e_731177;
c_731173.elements[0] = ((closureN)self_73587)->elements[0];
c_731173.elements[1] = ((closureN)self_73587)->elements[2];


make_utf8_string_with_len(c_731178, "Could not create path ~a. Lack of permissions\? Return code", 58, 58);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731173, &c_731178, ((closureN)self_73587)->elements[1]);}
;; 
}

static void __lambda_100(void *data, object self_73592, int argc, object *args) /* object self_73592, object r_73382_73479 */
 {
 object r_73382_73479 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73592)->elements[0], r_73382_73479, ((closureN)self_73592)->elements[1]);; 
}

static void __lambda_99(void *data, object self_73588, int argc, object *args) /* object self_73588, object r_73376_73478 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73588)->elements[0], (((closure)  ((closureN)self_73588)->elements[0])->fn),  ((closureN)self_73588)->elements[1]);; 
}

static void __lambda_96(void *data, object self_73589, int argc, object *args) /* object self_73589, object k_73377_73475 */
 {
 object k_73377_73475 = args[0];
  
closureN_type c_731153;
object e_731165 [2];
c_731153.hdr.mark = gc_color_red;
 c_731153.hdr.grayed = 0;
c_731153.tag = closureN_tag;
 c_731153.fn = (function_type)__lambda_97;
c_731153.num_args = 1;
c_731153.num_elements = 2;
c_731153.elements = (object *)e_731165;
c_731153.elements[0] = k_73377_73475;
c_731153.elements[1] = ((closureN)self_73589)->elements[0];

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731153);; 
}

static void __lambda_97(void *data, object self_73590, int argc, object *args) /* object self_73590, object r_73380_73476 */
 {
 object r_73380_73476 = args[0];
    
if( (boolean_f != Cyc_eq(r_73380_73476, quote_debug)) ){ 
  
closureN_type c_731157;
object e_731160 [1];
c_731157.hdr.mark = gc_color_red;
 c_731157.hdr.grayed = 0;
c_731157.tag = closureN_tag;
 c_731157.fn = (function_type)__lambda_98;
c_731157.num_args = 1;
c_731157.num_elements = 1;
c_731157.elements = (object *)e_731160;
c_731157.elements[0] = ((closureN)self_73590)->elements[0];


make_utf8_string_with_len(c_731161, "[OK] Created dir ~a~%", 21, 21);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731157, &c_731161, ((closureN)self_73590)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73590)->elements[0], (((closure)  ((closureN)self_73590)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_98(void *data, object self_73591, int argc, object *args) /* object self_73591, object r_73379_73477 */
 {
 object r_73379_73477 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73591)->elements[0], r_73379_73477);; 
}

static void __lambda_82(void *data, object _, int argc, object *args) /* closure _,object k_73356, object file_73104_73207, object dir_73105_73208_raw, ... */
 {
object k_73356 = args[0]; object file_73104_73207 = args[1];
load_varargs(dir_73105_73208, args, 2, argc - 2);
  object dir_73108_73209;
  Cyc_st_add(data, "libs/system-calls.sld:compile!");
  
if( (boolean_f != Cyc_is_null(dir_73105_73208)) ){ 
  object c_731089;
 alloc_string(data,c_731089, 1, 1);
char tmp_731090[] = ".";
memcpy(((string_type *)c_731089)->str, tmp_731090,1);
((string_type *)c_731089)->str[1] = '\0';
  dir_73108_73209 = c_731089;
} else { 
  
  dir_73108_73209 = Cyc_car(data, dir_73105_73208);}
;
closureN_type c_731095;
object e_731142 [3];
c_731095.hdr.mark = gc_color_red;
 c_731095.hdr.grayed = 0;
c_731095.tag = closureN_tag;
 c_731095.fn = (function_type)__lambda_83;
c_731095.num_args = 1;
c_731095.num_elements = 3;
c_731095.elements = (object *)e_731142;
c_731095.elements[0] = dir_73108_73209;
c_731095.elements[1] = file_73104_73207;
c_731095.elements[2] = k_73356;

return_direct_with_clo2(data,  __glo_path_91dir_libs_file, (((closure)  __glo_path_91dir_libs_file)->fn),  &c_731095, file_73104_73207);; 
}

static void __lambda_83(void *data, object self_73576, int argc, object *args) /* object self_73576, object r_73368 */
 {
 object r_73368 = args[0];
  
closureN_type c_731097;
object e_731138 [2];
c_731097.hdr.mark = gc_color_red;
 c_731097.hdr.grayed = 0;
c_731097.tag = closureN_tag;
 c_731097.fn = (function_type)__lambda_84;
c_731097.num_args = 1;
c_731097.num_elements = 2;
c_731097.elements = (object *)e_731138;
c_731097.elements[0] = ((closureN)self_73576)->elements[1];
c_731097.elements[1] = ((closureN)self_73576)->elements[2];


make_utf8_string_with_len(c_731139, "cyclone -A ~a -A ~a ~a", 22, 22);
return_direct_with_clo5(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731097, &c_731139, ((closureN)self_73576)->elements[0], r_73368, ((closureN)self_73576)->elements[1]);; 
}

static void __lambda_84(void *data, object self_73577, int argc, object *args) /* object self_73577, object r_73367 */
 {
 object r_73367 = args[0];
  
closureN_type c_731099;
object e_731135 [2];
c_731099.hdr.mark = gc_color_red;
 c_731099.hdr.grayed = 0;
c_731099.tag = closureN_tag;
 c_731099.fn = (function_type)__lambda_85;
c_731099.num_args = 1;
c_731099.num_elements = 2;
c_731099.elements = (object *)e_731135;
c_731099.elements[0] = ((closureN)self_73577)->elements[0];
c_731099.elements[1] = ((closureN)self_73577)->elements[1];



return_direct_with_clo1(data,(closure)&c_731099,__lambda_85,  Cyc_system(r_73367));; 
}

static void __lambda_85(void *data, object self_73578, int argc, object *args) /* object self_73578, object result_73111_73210 */
 {
 object result_73111_73210 = args[0];
  
closureN_type c_731101;
object e_731132 [3];
c_731101.hdr.mark = gc_color_red;
 c_731101.hdr.grayed = 0;
c_731101.tag = closureN_tag;
 c_731101.fn = (function_type)__lambda_86;
c_731101.num_args = 1;
c_731101.num_elements = 3;
c_731101.elements = (object *)e_731132;
c_731101.elements[0] = ((closureN)self_73578)->elements[0];
c_731101.elements[1] = ((closureN)self_73578)->elements[1];
c_731101.elements[2] = result_73111_73210;



return_direct_with_clo1(data,(closure)&c_731101,__lambda_86,  Cyc_eq(obj_int2obj(0), result_73111_73210));; 
}

static void __lambda_86(void *data, object self_73579, int argc, object *args) /* object self_73579, object r_73359_73468 */
 {
 object r_73359_73468 = args[0];
  if( (boolean_f != r_73359_73468) ){ 
  
closureN_type c_731103;
object e_731118 [1];
c_731103.hdr.mark = gc_color_red;
 c_731103.hdr.grayed = 0;
c_731103.tag = closureN_tag;
 c_731103.fn = (function_type)__lambda_87;
c_731103.num_args = 0;
c_731103.num_elements = 1;
c_731103.elements = (object *)e_731118;
c_731103.elements[0] = ((closureN)self_73579)->elements[0];


closureN_type c_731119;
object e_731123 [2];
c_731119.hdr.mark = gc_color_red;
 c_731119.hdr.grayed = 0;
c_731119.tag = closureN_tag;
 c_731119.fn = (function_type)__lambda_90;
c_731119.num_args = 1;
c_731119.num_elements = 2;
c_731119.elements = (object *)e_731123;
c_731119.elements[0] = ((closureN)self_73579)->elements[0];
c_731119.elements[1] = ((closureN)self_73579)->elements[1];

return_direct_with_clo1(data,(closure)&c_731103,__lambda_87,  &c_731119);
} else { 
  
closureN_type c_731125;
object e_731129 [2];
c_731125.hdr.mark = gc_color_red;
 c_731125.hdr.grayed = 0;
c_731125.tag = closureN_tag;
 c_731125.fn = (function_type)__lambda_91;
c_731125.num_args = 1;
c_731125.num_elements = 2;
c_731125.elements = (object *)e_731129;
c_731125.elements[0] = ((closureN)self_73579)->elements[1];
c_731125.elements[1] = ((closureN)self_73579)->elements[2];


make_utf8_string_with_len(c_731130, "Could not compile file ~a. Return code", 38, 38);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731125, &c_731130, ((closureN)self_73579)->elements[0]);}
;; 
}

static void __lambda_91(void *data, object self_73584, int argc, object *args) /* object self_73584, object r_73366_73473 */
 {
 object r_73366_73473 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73584)->elements[0], r_73366_73473, ((closureN)self_73584)->elements[1]);; 
}

static void __lambda_90(void *data, object self_73580, int argc, object *args) /* object self_73580, object r_73360_73472 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73580)->elements[1], (((closure)  ((closureN)self_73580)->elements[1])->fn),  ((closureN)self_73580)->elements[0]);; 
}

static void __lambda_87(void *data, object self_73581, int argc, object *args) /* object self_73581, object k_73361_73469 */
 {
 object k_73361_73469 = args[0];
  
closureN_type c_731105;
object e_731117 [2];
c_731105.hdr.mark = gc_color_red;
 c_731105.hdr.grayed = 0;
c_731105.tag = closureN_tag;
 c_731105.fn = (function_type)__lambda_88;
c_731105.num_args = 1;
c_731105.num_elements = 2;
c_731105.elements = (object *)e_731117;
c_731105.elements[0] = ((closureN)self_73581)->elements[0];
c_731105.elements[1] = k_73361_73469;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731105);; 
}

static void __lambda_88(void *data, object self_73582, int argc, object *args) /* object self_73582, object r_73364_73470 */
 {
 object r_73364_73470 = args[0];
    
if( (boolean_f != Cyc_eq(r_73364_73470, quote_debug)) ){ 
  
closureN_type c_731109;
object e_731112 [1];
c_731109.hdr.mark = gc_color_red;
 c_731109.hdr.grayed = 0;
c_731109.tag = closureN_tag;
 c_731109.fn = (function_type)__lambda_89;
c_731109.num_args = 1;
c_731109.num_elements = 1;
c_731109.elements = (object *)e_731112;
c_731109.elements[0] = ((closureN)self_73582)->elements[1];


make_utf8_string_with_len(c_731113, "[OK] File ~a compiled~%", 23, 23);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731109, &c_731113, ((closureN)self_73582)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73582)->elements[1], (((closure)  ((closureN)self_73582)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_89(void *data, object self_73583, int argc, object *args) /* object self_73583, object r_73363_73471 */
 {
 object r_73363_73471 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73583)->elements[0], r_73363_73471);; 
}

static void __lambda_73(void *data, object _, int argc, object *args) /* closure _,object k_73343, object file_91or_91dir_7392_73205 */
 {
object k_73343 = args[0]; object file_91or_91dir_7392_73205 = args[1];
  Cyc_st_add(data, "libs/system-calls.sld:delete!");

closureN_type c_731041;
object e_731082 [2];
c_731041.hdr.mark = gc_color_red;
 c_731041.hdr.grayed = 0;
c_731041.tag = closureN_tag;
 c_731041.fn = (function_type)__lambda_74;
c_731041.num_args = 1;
c_731041.num_elements = 2;
c_731041.elements = (object *)e_731082;
c_731041.elements[0] = file_91or_91dir_7392_73205;
c_731041.elements[1] = k_73343;


make_utf8_string_with_len(c_731083, "rm -Rf ~a", 9, 9);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731041, &c_731083, file_91or_91dir_7392_73205);; 
}

static void __lambda_74(void *data, object self_73568, int argc, object *args) /* object self_73568, object r_73353 */
 {
 object r_73353 = args[0];
  
closureN_type c_731043;
object e_731079 [2];
c_731043.hdr.mark = gc_color_red;
 c_731043.hdr.grayed = 0;
c_731043.tag = closureN_tag;
 c_731043.fn = (function_type)__lambda_75;
c_731043.num_args = 1;
c_731043.num_elements = 2;
c_731043.elements = (object *)e_731079;
c_731043.elements[0] = ((closureN)self_73568)->elements[0];
c_731043.elements[1] = ((closureN)self_73568)->elements[1];



return_direct_with_clo1(data,(closure)&c_731043,__lambda_75,  Cyc_system(r_73353));; 
}

static void __lambda_75(void *data, object self_73569, int argc, object *args) /* object self_73569, object result_7393_73206 */
 {
 object result_7393_73206 = args[0];
  
closureN_type c_731045;
object e_731076 [3];
c_731045.hdr.mark = gc_color_red;
 c_731045.hdr.grayed = 0;
c_731045.tag = closureN_tag;
 c_731045.fn = (function_type)__lambda_76;
c_731045.num_args = 1;
c_731045.num_elements = 3;
c_731045.elements = (object *)e_731076;
c_731045.elements[0] = ((closureN)self_73569)->elements[0];
c_731045.elements[1] = ((closureN)self_73569)->elements[1];
c_731045.elements[2] = result_7393_73206;



return_direct_with_clo1(data,(closure)&c_731045,__lambda_76,  Cyc_eq(obj_int2obj(0), result_7393_73206));; 
}

static void __lambda_76(void *data, object self_73570, int argc, object *args) /* object self_73570, object r_73345_73462 */
 {
 object r_73345_73462 = args[0];
  if( (boolean_f != r_73345_73462) ){ 
  
closureN_type c_731047;
object e_731062 [1];
c_731047.hdr.mark = gc_color_red;
 c_731047.hdr.grayed = 0;
c_731047.tag = closureN_tag;
 c_731047.fn = (function_type)__lambda_77;
c_731047.num_args = 0;
c_731047.num_elements = 1;
c_731047.elements = (object *)e_731062;
c_731047.elements[0] = ((closureN)self_73570)->elements[0];


closureN_type c_731063;
object e_731067 [2];
c_731063.hdr.mark = gc_color_red;
 c_731063.hdr.grayed = 0;
c_731063.tag = closureN_tag;
 c_731063.fn = (function_type)__lambda_80;
c_731063.num_args = 1;
c_731063.num_elements = 2;
c_731063.elements = (object *)e_731067;
c_731063.elements[0] = ((closureN)self_73570)->elements[0];
c_731063.elements[1] = ((closureN)self_73570)->elements[1];

return_direct_with_clo1(data,(closure)&c_731047,__lambda_77,  &c_731063);
} else { 
  
closureN_type c_731069;
object e_731073 [2];
c_731069.hdr.mark = gc_color_red;
 c_731069.hdr.grayed = 0;
c_731069.tag = closureN_tag;
 c_731069.fn = (function_type)__lambda_81;
c_731069.num_args = 1;
c_731069.num_elements = 2;
c_731069.elements = (object *)e_731073;
c_731069.elements[0] = ((closureN)self_73570)->elements[1];
c_731069.elements[1] = ((closureN)self_73570)->elements[2];


make_utf8_string_with_len(c_731074, "Could not delete ~a. Lack of permissions\? Return code", 53, 53);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731069, &c_731074, ((closureN)self_73570)->elements[0]);}
;; 
}

static void __lambda_81(void *data, object self_73575, int argc, object *args) /* object self_73575, object r_73352_73467 */
 {
 object r_73352_73467 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73575)->elements[0], r_73352_73467, ((closureN)self_73575)->elements[1]);; 
}

static void __lambda_80(void *data, object self_73571, int argc, object *args) /* object self_73571, object r_73346_73466 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73571)->elements[1], (((closure)  ((closureN)self_73571)->elements[1])->fn),  ((closureN)self_73571)->elements[0]);; 
}

static void __lambda_77(void *data, object self_73572, int argc, object *args) /* object self_73572, object k_73347_73463 */
 {
 object k_73347_73463 = args[0];
  
closureN_type c_731049;
object e_731061 [2];
c_731049.hdr.mark = gc_color_red;
 c_731049.hdr.grayed = 0;
c_731049.tag = closureN_tag;
 c_731049.fn = (function_type)__lambda_78;
c_731049.num_args = 1;
c_731049.num_elements = 2;
c_731049.elements = (object *)e_731061;
c_731049.elements[0] = ((closureN)self_73572)->elements[0];
c_731049.elements[1] = k_73347_73463;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731049);; 
}

static void __lambda_78(void *data, object self_73573, int argc, object *args) /* object self_73573, object r_73350_73464 */
 {
 object r_73350_73464 = args[0];
    
if( (boolean_f != Cyc_eq(r_73350_73464, quote_debug)) ){ 
  
closureN_type c_731053;
object e_731056 [1];
c_731053.hdr.mark = gc_color_red;
 c_731053.hdr.grayed = 0;
c_731053.tag = closureN_tag;
 c_731053.fn = (function_type)__lambda_79;
c_731053.num_args = 1;
c_731053.num_elements = 1;
c_731053.elements = (object *)e_731056;
c_731053.elements[0] = ((closureN)self_73573)->elements[1];


make_utf8_string_with_len(c_731057, "[OK] Deleted ~a~%", 17, 17);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731053, &c_731057, ((closureN)self_73573)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73573)->elements[1], (((closure)  ((closureN)self_73573)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_79(void *data, object self_73574, int argc, object *args) /* object self_73574, object r_73349_73465 */
 {
 object r_73349_73465 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73574)->elements[0], r_73349_73465);; 
}

static void __lambda_64(void *data, object _, int argc, object *args) /* closure _,object k_73330, object file_7379_73202, object dir_7380_73203 */
 {
object k_73330 = args[0]; object file_7379_73202 = args[1]; object dir_7380_73203 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:extract!");

closureN_type c_73994;
object e_731037 [3];
c_73994.hdr.mark = gc_color_red;
 c_73994.hdr.grayed = 0;
c_73994.tag = closureN_tag;
 c_73994.fn = (function_type)__lambda_65;
c_73994.num_args = 1;
c_73994.num_elements = 3;
c_73994.elements = (object *)e_731037;
c_73994.elements[0] = dir_7380_73203;
c_73994.elements[1] = file_7379_73202;
c_73994.elements[2] = k_73330;


make_utf8_string_with_len(c_731038, "tar zxf ~a --strip=1 -C ~a", 26, 26);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73994, &c_731038, file_7379_73202, dir_7380_73203);; 
}

static void __lambda_65(void *data, object self_73560, int argc, object *args) /* object self_73560, object r_73340 */
 {
 object r_73340 = args[0];
  
closureN_type c_73996;
object e_731034 [3];
c_73996.hdr.mark = gc_color_red;
 c_73996.hdr.grayed = 0;
c_73996.tag = closureN_tag;
 c_73996.fn = (function_type)__lambda_66;
c_73996.num_args = 1;
c_73996.num_elements = 3;
c_73996.elements = (object *)e_731034;
c_73996.elements[0] = ((closureN)self_73560)->elements[0];
c_73996.elements[1] = ((closureN)self_73560)->elements[1];
c_73996.elements[2] = ((closureN)self_73560)->elements[2];



return_direct_with_clo1(data,(closure)&c_73996,__lambda_66,  Cyc_system(r_73340));; 
}

static void __lambda_66(void *data, object self_73561, int argc, object *args) /* object self_73561, object result_7381_73204 */
 {
 object result_7381_73204 = args[0];
  
closureN_type c_73998;
object e_731031 [4];
c_73998.hdr.mark = gc_color_red;
 c_73998.hdr.grayed = 0;
c_73998.tag = closureN_tag;
 c_73998.fn = (function_type)__lambda_67;
c_73998.num_args = 1;
c_73998.num_elements = 4;
c_73998.elements = (object *)e_731031;
c_73998.elements[0] = ((closureN)self_73561)->elements[0];
c_73998.elements[1] = ((closureN)self_73561)->elements[1];
c_73998.elements[2] = ((closureN)self_73561)->elements[2];
c_73998.elements[3] = result_7381_73204;



return_direct_with_clo1(data,(closure)&c_73998,__lambda_67,  Cyc_eq(obj_int2obj(0), result_7381_73204));; 
}

static void __lambda_67(void *data, object self_73562, int argc, object *args) /* object self_73562, object r_73332_73456 */
 {
 object r_73332_73456 = args[0];
  if( (boolean_f != r_73332_73456) ){ 
  
closureN_type c_731000;
object e_731016 [2];
c_731000.hdr.mark = gc_color_red;
 c_731000.hdr.grayed = 0;
c_731000.tag = closureN_tag;
 c_731000.fn = (function_type)__lambda_68;
c_731000.num_args = 0;
c_731000.num_elements = 2;
c_731000.elements = (object *)e_731016;
c_731000.elements[0] = ((closureN)self_73562)->elements[0];
c_731000.elements[1] = ((closureN)self_73562)->elements[1];


closureN_type c_731017;
object e_731021 [2];
c_731017.hdr.mark = gc_color_red;
 c_731017.hdr.grayed = 0;
c_731017.tag = closureN_tag;
 c_731017.fn = (function_type)__lambda_71;
c_731017.num_args = 1;
c_731017.num_elements = 2;
c_731017.elements = (object *)e_731021;
c_731017.elements[0] = ((closureN)self_73562)->elements[0];
c_731017.elements[1] = ((closureN)self_73562)->elements[2];

return_direct_with_clo1(data,(closure)&c_731000,__lambda_68,  &c_731017);
} else { 
  
closureN_type c_731023;
object e_731027 [2];
c_731023.hdr.mark = gc_color_red;
 c_731023.hdr.grayed = 0;
c_731023.tag = closureN_tag;
 c_731023.fn = (function_type)__lambda_72;
c_731023.num_args = 1;
c_731023.num_elements = 2;
c_731023.elements = (object *)e_731027;
c_731023.elements[0] = ((closureN)self_73562)->elements[2];
c_731023.elements[1] = ((closureN)self_73562)->elements[3];


make_utf8_string_with_len(c_731028, "Could not extract ~a into ~a. Lack of permissions\? Return code", 62, 62);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731023, &c_731028, ((closureN)self_73562)->elements[1], ((closureN)self_73562)->elements[0]);}
;; 
}

static void __lambda_72(void *data, object self_73567, int argc, object *args) /* object self_73567, object r_73339_73461 */
 {
 object r_73339_73461 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73567)->elements[0], r_73339_73461, ((closureN)self_73567)->elements[1]);; 
}

static void __lambda_71(void *data, object self_73563, int argc, object *args) /* object self_73563, object r_73333_73460 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73563)->elements[1], (((closure)  ((closureN)self_73563)->elements[1])->fn),  ((closureN)self_73563)->elements[0]);; 
}

static void __lambda_68(void *data, object self_73564, int argc, object *args) /* object self_73564, object k_73334_73457 */
 {
 object k_73334_73457 = args[0];
  
closureN_type c_731002;
object e_731015 [3];
c_731002.hdr.mark = gc_color_red;
 c_731002.hdr.grayed = 0;
c_731002.tag = closureN_tag;
 c_731002.fn = (function_type)__lambda_69;
c_731002.num_args = 1;
c_731002.num_elements = 3;
c_731002.elements = (object *)e_731015;
c_731002.elements[0] = ((closureN)self_73564)->elements[0];
c_731002.elements[1] = ((closureN)self_73564)->elements[1];
c_731002.elements[2] = k_73334_73457;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_731002);; 
}

static void __lambda_69(void *data, object self_73565, int argc, object *args) /* object self_73565, object r_73337_73458 */
 {
 object r_73337_73458 = args[0];
    
if( (boolean_f != Cyc_eq(r_73337_73458, quote_debug)) ){ 
  
closureN_type c_731006;
object e_731009 [1];
c_731006.hdr.mark = gc_color_red;
 c_731006.hdr.grayed = 0;
c_731006.tag = closureN_tag;
 c_731006.fn = (function_type)__lambda_70;
c_731006.num_args = 1;
c_731006.num_elements = 1;
c_731006.elements = (object *)e_731009;
c_731006.elements[0] = ((closureN)self_73565)->elements[2];


make_utf8_string_with_len(c_731010, "[OK] Extracted ~a into ~a~%", 27, 27);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_731006, &c_731010, ((closureN)self_73565)->elements[1], ((closureN)self_73565)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73565)->elements[2], (((closure)  ((closureN)self_73565)->elements[2])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_70(void *data, object self_73566, int argc, object *args) /* object self_73566, object r_73336_73459 */
 {
 object r_73336_73459 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73566)->elements[0], r_73336_73459);; 
}

static void __lambda_46(void *data, object _, int argc, object *args) /* closure _,object k_73308, object sha256sum_7359_73199, object file_7360_73200 */
 {
object k_73308 = args[0]; object sha256sum_7359_73199 = args[1]; object file_7360_73200 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:validate-sha256sum");

closureN_type c_73896;
object e_73957 [2];
c_73896.hdr.mark = gc_color_red;
 c_73896.hdr.grayed = 0;
c_73896.tag = closureN_tag;
 c_73896.fn = (function_type)__lambda_47;
c_73896.num_args = 0;
c_73896.num_elements = 2;
c_73896.elements = (object *)e_73957;
c_73896.elements[0] = file_7360_73200;
c_73896.elements[1] = sha256sum_7359_73199;


closureN_type c_73958;
object e_73991 [2];
c_73958.hdr.mark = gc_color_red;
 c_73958.hdr.grayed = 0;
c_73958.tag = closureN_tag;
 c_73958.fn = (function_type)__lambda_57;
c_73958.num_args = 1;
c_73958.num_elements = 2;
c_73958.elements = (object *)e_73991;
c_73958.elements[0] = file_7360_73200;
c_73958.elements[1] = k_73308;

return_direct_with_clo1(data,(closure)&c_73896,__lambda_47,  &c_73958);; 
}

static void __lambda_57(void *data, object self_73544, int argc, object *args) /* object self_73544, object result_7361_73201 */
 {
 object result_7361_73201 = args[0];
  
closureN_type c_73960;
object e_73988 [3];
c_73960.hdr.mark = gc_color_red;
 c_73960.hdr.grayed = 0;
c_73960.tag = closureN_tag;
 c_73960.fn = (function_type)__lambda_58;
c_73960.num_args = 1;
c_73960.num_elements = 3;
c_73960.elements = (object *)e_73988;
c_73960.elements[0] = ((closureN)self_73544)->elements[0];
c_73960.elements[1] = ((closureN)self_73544)->elements[1];
c_73960.elements[2] = result_7361_73201;



return_direct_with_clo1(data,(closure)&c_73960,__lambda_58,  Cyc_eq(obj_int2obj(0), result_7361_73201));; 
}

static void __lambda_58(void *data, object self_73545, int argc, object *args) /* object self_73545, object r_73310_73450 */
 {
 object r_73310_73450 = args[0];
  if( (boolean_f != r_73310_73450) ){ 
  closureN_type c_73975;
object e_73979 [2];
c_73975.hdr.mark = gc_color_red;
 c_73975.hdr.grayed = 0;
c_73975.tag = closureN_tag;
 c_73975.fn = (function_type)__lambda_62;
c_73975.num_args = 1;
c_73975.num_elements = 2;
c_73975.elements = (object *)e_73979;
c_73975.elements[0] = ((closureN)self_73545)->elements[0];
c_73975.elements[1] = ((closureN)self_73545)->elements[1];

return_direct1(data,__lambda_59,&c_73975);
} else { 
  
closureN_type c_73981;
object e_73985 [2];
c_73981.hdr.mark = gc_color_red;
 c_73981.hdr.grayed = 0;
c_73981.tag = closureN_tag;
 c_73981.fn = (function_type)__lambda_63;
c_73981.num_args = 1;
c_73981.num_elements = 2;
c_73981.elements = (object *)e_73985;
c_73981.elements[0] = ((closureN)self_73545)->elements[1];
c_73981.elements[1] = ((closureN)self_73545)->elements[2];


make_utf8_string_with_len(c_73986, "Incorrect sha256sum for file ~a. Return code~%", 46, 46);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73981, &c_73986, ((closureN)self_73545)->elements[0]);}
;; 
}

static void __lambda_63(void *data, object self_73549, int argc, object *args) /* object self_73549, object r_73317_73455 */
 {
 object r_73317_73455 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73549)->elements[0], r_73317_73455, ((closureN)self_73549)->elements[1]);; 
}

static void __lambda_62(void *data, object self_73546, int argc, object *args) /* object self_73546, object r_73311_73454 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73546)->elements[1], (((closure)  ((closureN)self_73546)->elements[1])->fn),  ((closureN)self_73546)->elements[0]);; 
}

static void __lambda_59(void *data, object _, int argc, object *args) /* closure _,object k_73312_73451 */
 {
object k_73312_73451 = args[0];
  Cyc_st_add(data, "libs/system-calls.sld:validate-sha256sum");

closureN_type c_73963;
object e_73974 [1];
c_73963.hdr.mark = gc_color_red;
 c_73963.hdr.grayed = 0;
c_73963.tag = closureN_tag;
 c_73963.fn = (function_type)__lambda_60;
c_73963.num_args = 1;
c_73963.num_elements = 1;
c_73963.elements = (object *)e_73974;
c_73963.elements[0] = k_73312_73451;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_73963);; 
}

static void __lambda_60(void *data, object self_73547, int argc, object *args) /* object self_73547, object r_73315_73452 */
 {
 object r_73315_73452 = args[0];
    
if( (boolean_f != Cyc_eq(r_73315_73452, quote_debug)) ){ 
  
closureN_type c_73967;
object e_73970 [1];
c_73967.hdr.mark = gc_color_red;
 c_73967.hdr.grayed = 0;
c_73967.tag = closureN_tag;
 c_73967.fn = (function_type)__lambda_61;
c_73967.num_args = 1;
c_73967.num_elements = 1;
c_73967.elements = (object *)e_73970;
c_73967.elements[0] = ((closureN)self_73547)->elements[0];


make_utf8_string_with_len(c_73971, "[OK] Passed sha256sum verification~%", 36, 36);
return_direct_with_clo2(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73967, &c_73971);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73547)->elements[0], (((closure)  ((closureN)self_73547)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_61(void *data, object self_73548, int argc, object *args) /* object self_73548, object r_73314_73453 */
 {
 object r_73314_73453 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73548)->elements[0], r_73314_73453);; 
}

static void __lambda_47(void *data, object self_73550, int argc, object *args) /* object self_73550, object k_73318 */
 {
 object k_73318 = args[0];
  
closureN_type c_73898;
object e_73955 [3];
c_73898.hdr.mark = gc_color_red;
 c_73898.hdr.grayed = 0;
c_73898.tag = closureN_tag;
 c_73898.fn = (function_type)__lambda_48;
c_73898.num_args = 1;
c_73898.num_elements = 3;
c_73898.elements = (object *)e_73955;
c_73898.elements[0] = ((closureN)self_73550)->elements[0];
c_73898.elements[1] = k_73318;
c_73898.elements[2] = ((closureN)self_73550)->elements[1];


make_utf8_string_with_len(c_73956, "sha256sum", 9, 9);
return_direct_with_clo2(data,  __glo_command_91exists_127_libs_system_91calls, (((closure)  __glo_command_91exists_127_libs_system_91calls)->fn),  &c_73898, &c_73956);; 
}

static void __lambda_48(void *data, object self_73551, int argc, object *args) /* object self_73551, object r_73319 */
 {
 object r_73319 = args[0];
  if( (boolean_f != r_73319) ){ 
  
closureN_type c_73900;
object e_73921 [3];
c_73900.hdr.mark = gc_color_red;
 c_73900.hdr.grayed = 0;
c_73900.tag = closureN_tag;
 c_73900.fn = (function_type)__lambda_49;
c_73900.num_args = 1;
c_73900.num_elements = 3;
c_73900.elements = (object *)e_73921;
c_73900.elements[0] = ((closureN)self_73551)->elements[0];
c_73900.elements[1] = ((closureN)self_73551)->elements[1];
c_73900.elements[2] = ((closureN)self_73551)->elements[2];

return_direct_with_clo1(data,  __glo_DEBUG_127_libs_system_91calls, (((closure)  __glo_DEBUG_127_libs_system_91calls)->fn),  &c_73900);
} else { 
  
closureN_type c_73923;
object e_73953 [3];
c_73923.hdr.mark = gc_color_red;
 c_73923.hdr.grayed = 0;
c_73923.tag = closureN_tag;
 c_73923.fn = (function_type)__lambda_52;
c_73923.num_args = 1;
c_73923.num_elements = 3;
c_73923.elements = (object *)e_73953;
c_73923.elements[0] = ((closureN)self_73551)->elements[0];
c_73923.elements[1] = ((closureN)self_73551)->elements[1];
c_73923.elements[2] = ((closureN)self_73551)->elements[2];


make_utf8_string_with_len(c_73954, "sha256", 6, 6);
return_direct_with_clo2(data,  __glo_command_91exists_127_libs_system_91calls, (((closure)  __glo_command_91exists_127_libs_system_91calls)->fn),  &c_73923, &c_73954);}
;; 
}

static void __lambda_52(void *data, object self_73555, int argc, object *args) /* object self_73555, object r_73323 */
 {
 object r_73323 = args[0];
  if( (boolean_f != r_73323) ){ 
  
closureN_type c_73925;
object e_73946 [3];
c_73925.hdr.mark = gc_color_red;
 c_73925.hdr.grayed = 0;
c_73925.tag = closureN_tag;
 c_73925.fn = (function_type)__lambda_53;
c_73925.num_args = 1;
c_73925.num_elements = 3;
c_73925.elements = (object *)e_73946;
c_73925.elements[0] = ((closureN)self_73555)->elements[0];
c_73925.elements[1] = ((closureN)self_73555)->elements[1];
c_73925.elements[2] = ((closureN)self_73555)->elements[2];

return_direct_with_clo1(data,  __glo_DEBUG_127_libs_system_91calls, (((closure)  __glo_DEBUG_127_libs_system_91calls)->fn),  &c_73925);
} else { 
  
closureN_type c_73948;
object e_73951 [1];
c_73948.hdr.mark = gc_color_red;
 c_73948.hdr.grayed = 0;
c_73948.tag = closureN_tag;
 c_73948.fn = (function_type)__lambda_56;
c_73948.num_args = 1;
c_73948.num_elements = 1;
c_73948.elements = (object *)e_73951;
c_73948.elements[0] = ((closureN)self_73555)->elements[1];


make_utf8_string_with_len(c_73952, "Could not find sha256/sha256sum. Please install one of those programs to continue~%", 83, 83);
return_direct_with_clo2(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73948, &c_73952);}
;; 
}

static void __lambda_56(void *data, object self_73559, int argc, object *args) /* object self_73559, object r_73327 */
 {
 object r_73327 = args[0];
  return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73559)->elements[0], r_73327);; 
}

static void __lambda_53(void *data, object self_73556, int argc, object *args) /* object self_73556, object r_73324 */
 {
 object r_73324 = args[0];
  if( (boolean_f != r_73324) ){ 
  
closureN_type c_73927;
object e_73932 [1];
c_73927.hdr.mark = gc_color_red;
 c_73927.hdr.grayed = 0;
c_73927.tag = closureN_tag;
 c_73927.fn = (function_type)__lambda_54;
c_73927.num_args = 1;
c_73927.num_elements = 1;
c_73927.elements = (object *)e_73932;
c_73927.elements[0] = ((closureN)self_73556)->elements[1];


make_utf8_string_with_len(c_73933, "sha256 -c ~a ~a", 15, 15);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73927, &c_73933, ((closureN)self_73556)->elements[2], ((closureN)self_73556)->elements[0]);
} else { 
  
closureN_type c_73937;
object e_73942 [1];
c_73937.hdr.mark = gc_color_red;
 c_73937.hdr.grayed = 0;
c_73937.tag = closureN_tag;
 c_73937.fn = (function_type)__lambda_55;
c_73937.num_args = 1;
c_73937.num_elements = 1;
c_73937.elements = (object *)e_73942;
c_73937.elements[0] = ((closureN)self_73556)->elements[1];


make_utf8_string_with_len(c_73943, "sha256 -c ~a ~a > /dev/null", 27, 27);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73937, &c_73943, ((closureN)self_73556)->elements[2], ((closureN)self_73556)->elements[0]);}
;; 
}

static void __lambda_55(void *data, object self_73558, int argc, object *args) /* object self_73558, object r_73326 */
 {
 object r_73326 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73558)->elements[0], (((closure)  ((closureN)self_73558)->elements[0])->fn),  Cyc_system(r_73326));; 
}

static void __lambda_54(void *data, object self_73557, int argc, object *args) /* object self_73557, object r_73325 */
 {
 object r_73325 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73557)->elements[0], (((closure)  ((closureN)self_73557)->elements[0])->fn),  Cyc_system(r_73325));; 
}

static void __lambda_49(void *data, object self_73552, int argc, object *args) /* object self_73552, object r_73320 */
 {
 object r_73320 = args[0];
  if( (boolean_f != r_73320) ){ 
  
closureN_type c_73902;
object e_73907 [1];
c_73902.hdr.mark = gc_color_red;
 c_73902.hdr.grayed = 0;
c_73902.tag = closureN_tag;
 c_73902.fn = (function_type)__lambda_50;
c_73902.num_args = 1;
c_73902.num_elements = 1;
c_73902.elements = (object *)e_73907;
c_73902.elements[0] = ((closureN)self_73552)->elements[1];


make_utf8_string_with_len(c_73908, "echo ~a ~a | sha256sum --status --check -", 41, 41);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73902, &c_73908, ((closureN)self_73552)->elements[2], ((closureN)self_73552)->elements[0]);
} else { 
  
closureN_type c_73912;
object e_73917 [1];
c_73912.hdr.mark = gc_color_red;
 c_73912.hdr.grayed = 0;
c_73912.tag = closureN_tag;
 c_73912.fn = (function_type)__lambda_51;
c_73912.num_args = 1;
c_73912.num_elements = 1;
c_73912.elements = (object *)e_73917;
c_73912.elements[0] = ((closureN)self_73552)->elements[1];


make_utf8_string_with_len(c_73918, "echo ~a ~a | sha256sum --status --check - > /dev/null", 53, 53);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73912, &c_73918, ((closureN)self_73552)->elements[2], ((closureN)self_73552)->elements[0]);}
;; 
}

static void __lambda_51(void *data, object self_73554, int argc, object *args) /* object self_73554, object r_73322 */
 {
 object r_73322 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73554)->elements[0], (((closure)  ((closureN)self_73554)->elements[0])->fn),  Cyc_system(r_73322));; 
}

static void __lambda_50(void *data, object self_73553, int argc, object *args) /* object self_73553, object r_73321 */
 {
 object r_73321 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73553)->elements[0], (((closure)  ((closureN)self_73553)->elements[0])->fn),  Cyc_system(r_73321));; 
}

static void __lambda_28(void *data, object _, int argc, object *args) /* closure _,object k_73286, object url_7339_73196, object outfile_7340_73197 */
 {
object k_73286 = args[0]; object url_7339_73196 = args[1]; object outfile_7340_73197 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:download!");

closureN_type c_73795;
object e_73856 [2];
c_73795.hdr.mark = gc_color_red;
 c_73795.hdr.grayed = 0;
c_73795.tag = closureN_tag;
 c_73795.fn = (function_type)__lambda_29;
c_73795.num_args = 0;
c_73795.num_elements = 2;
c_73795.elements = (object *)e_73856;
c_73795.elements[0] = outfile_7340_73197;
c_73795.elements[1] = url_7339_73196;


closureN_type c_73857;
object e_73893 [2];
c_73857.hdr.mark = gc_color_red;
 c_73857.hdr.grayed = 0;
c_73857.tag = closureN_tag;
 c_73857.fn = (function_type)__lambda_39;
c_73857.num_args = 1;
c_73857.num_elements = 2;
c_73857.elements = (object *)e_73893;
c_73857.elements[0] = k_73286;
c_73857.elements[1] = outfile_7340_73197;

return_direct_with_clo1(data,(closure)&c_73795,__lambda_29,  &c_73857);; 
}

static void __lambda_39(void *data, object self_73527, int argc, object *args) /* object self_73527, object result_7341_73198 */
 {
 object result_7341_73198 = args[0];
  
closureN_type c_73859;
object e_73890 [3];
c_73859.hdr.mark = gc_color_red;
 c_73859.hdr.grayed = 0;
c_73859.tag = closureN_tag;
 c_73859.fn = (function_type)__lambda_40;
c_73859.num_args = 1;
c_73859.num_elements = 3;
c_73859.elements = (object *)e_73890;
c_73859.elements[0] = ((closureN)self_73527)->elements[0];
c_73859.elements[1] = ((closureN)self_73527)->elements[1];
c_73859.elements[2] = result_7341_73198;



return_direct_with_clo1(data,(closure)&c_73859,__lambda_40,  Cyc_eq(obj_int2obj(0), result_7341_73198));; 
}

static void __lambda_40(void *data, object self_73528, int argc, object *args) /* object self_73528, object r_73288_73444 */
 {
 object r_73288_73444 = args[0];
  if( (boolean_f != r_73288_73444) ){ 
  
closureN_type c_73861;
object e_73876 [1];
c_73861.hdr.mark = gc_color_red;
 c_73861.hdr.grayed = 0;
c_73861.tag = closureN_tag;
 c_73861.fn = (function_type)__lambda_41;
c_73861.num_args = 0;
c_73861.num_elements = 1;
c_73861.elements = (object *)e_73876;
c_73861.elements[0] = ((closureN)self_73528)->elements[1];


closureN_type c_73877;
object e_73881 [2];
c_73877.hdr.mark = gc_color_red;
 c_73877.hdr.grayed = 0;
c_73877.tag = closureN_tag;
 c_73877.fn = (function_type)__lambda_44;
c_73877.num_args = 1;
c_73877.num_elements = 2;
c_73877.elements = (object *)e_73881;
c_73877.elements[0] = ((closureN)self_73528)->elements[0];
c_73877.elements[1] = ((closureN)self_73528)->elements[1];

return_direct_with_clo1(data,(closure)&c_73861,__lambda_41,  &c_73877);
} else { 
  
closureN_type c_73883;
object e_73887 [2];
c_73883.hdr.mark = gc_color_red;
 c_73883.hdr.grayed = 0;
c_73883.tag = closureN_tag;
 c_73883.fn = (function_type)__lambda_45;
c_73883.num_args = 1;
c_73883.num_elements = 2;
c_73883.elements = (object *)e_73887;
c_73883.elements[0] = ((closureN)self_73528)->elements[0];
c_73883.elements[1] = ((closureN)self_73528)->elements[2];


make_utf8_string_with_len(c_73888, "Could not download ~a. Lack of permissions\? Return code", 55, 55);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73883, &c_73888, ((closureN)self_73528)->elements[1]);}
;; 
}

static void __lambda_45(void *data, object self_73533, int argc, object *args) /* object self_73533, object r_73295_73449 */
 {
 object r_73295_73449 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73533)->elements[0], r_73295_73449, ((closureN)self_73533)->elements[1]);; 
}

static void __lambda_44(void *data, object self_73529, int argc, object *args) /* object self_73529, object r_73289_73448 */
 {

  return_direct_with_clo1(data,  ((closureN)self_73529)->elements[0], (((closure)  ((closureN)self_73529)->elements[0])->fn),  ((closureN)self_73529)->elements[1]);; 
}

static void __lambda_41(void *data, object self_73530, int argc, object *args) /* object self_73530, object k_73290_73445 */
 {
 object k_73290_73445 = args[0];
  
closureN_type c_73863;
object e_73875 [2];
c_73863.hdr.mark = gc_color_red;
 c_73863.hdr.grayed = 0;
c_73863.tag = closureN_tag;
 c_73863.fn = (function_type)__lambda_42;
c_73863.num_args = 1;
c_73863.num_elements = 2;
c_73863.elements = (object *)e_73875;
c_73863.elements[0] = k_73290_73445;
c_73863.elements[1] = ((closureN)self_73530)->elements[0];

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_73863);; 
}

static void __lambda_42(void *data, object self_73531, int argc, object *args) /* object self_73531, object r_73293_73446 */
 {
 object r_73293_73446 = args[0];
    
if( (boolean_f != Cyc_eq(r_73293_73446, quote_debug)) ){ 
  
closureN_type c_73867;
object e_73870 [1];
c_73867.hdr.mark = gc_color_red;
 c_73867.hdr.grayed = 0;
c_73867.tag = closureN_tag;
 c_73867.fn = (function_type)__lambda_43;
c_73867.num_args = 1;
c_73867.num_elements = 1;
c_73867.elements = (object *)e_73870;
c_73867.elements[0] = ((closureN)self_73531)->elements[0];


make_utf8_string_with_len(c_73871, "[OK] Downloaded ~a~%", 20, 20);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73867, &c_73871, ((closureN)self_73531)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73531)->elements[0], (((closure)  ((closureN)self_73531)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_43(void *data, object self_73532, int argc, object *args) /* object self_73532, object r_73292_73447 */
 {
 object r_73292_73447 = args[0];
  return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  ((closureN)self_73532)->elements[0], r_73292_73447);; 
}

static void __lambda_29(void *data, object self_73534, int argc, object *args) /* object self_73534, object k_73296 */
 {
 object k_73296 = args[0];
  
closureN_type c_73797;
object e_73854 [3];
c_73797.hdr.mark = gc_color_red;
 c_73797.hdr.grayed = 0;
c_73797.tag = closureN_tag;
 c_73797.fn = (function_type)__lambda_30;
c_73797.num_args = 1;
c_73797.num_elements = 3;
c_73797.elements = (object *)e_73854;
c_73797.elements[0] = k_73296;
c_73797.elements[1] = ((closureN)self_73534)->elements[0];
c_73797.elements[2] = ((closureN)self_73534)->elements[1];


make_utf8_string_with_len(c_73855, "wget", 4, 4);
return_direct_with_clo2(data,  __glo_command_91exists_127_libs_system_91calls, (((closure)  __glo_command_91exists_127_libs_system_91calls)->fn),  &c_73797, &c_73855);; 
}

static void __lambda_30(void *data, object self_73535, int argc, object *args) /* object self_73535, object r_73297 */
 {
 object r_73297 = args[0];
  if( (boolean_f != r_73297) ){ 
  
closureN_type c_73799;
object e_73820 [3];
c_73799.hdr.mark = gc_color_red;
 c_73799.hdr.grayed = 0;
c_73799.tag = closureN_tag;
 c_73799.fn = (function_type)__lambda_31;
c_73799.num_args = 1;
c_73799.num_elements = 3;
c_73799.elements = (object *)e_73820;
c_73799.elements[0] = ((closureN)self_73535)->elements[0];
c_73799.elements[1] = ((closureN)self_73535)->elements[1];
c_73799.elements[2] = ((closureN)self_73535)->elements[2];

return_direct_with_clo1(data,  __glo_DEBUG_127_libs_system_91calls, (((closure)  __glo_DEBUG_127_libs_system_91calls)->fn),  &c_73799);
} else { 
  
closureN_type c_73822;
object e_73852 [3];
c_73822.hdr.mark = gc_color_red;
 c_73822.hdr.grayed = 0;
c_73822.tag = closureN_tag;
 c_73822.fn = (function_type)__lambda_34;
c_73822.num_args = 1;
c_73822.num_elements = 3;
c_73822.elements = (object *)e_73852;
c_73822.elements[0] = ((closureN)self_73535)->elements[0];
c_73822.elements[1] = ((closureN)self_73535)->elements[1];
c_73822.elements[2] = ((closureN)self_73535)->elements[2];


make_utf8_string_with_len(c_73853, "curl", 4, 4);
return_direct_with_clo2(data,  __glo_command_91exists_127_libs_system_91calls, (((closure)  __glo_command_91exists_127_libs_system_91calls)->fn),  &c_73822, &c_73853);}
;; 
}

static void __lambda_34(void *data, object self_73539, int argc, object *args) /* object self_73539, object r_73301 */
 {
 object r_73301 = args[0];
  if( (boolean_f != r_73301) ){ 
  
closureN_type c_73824;
object e_73845 [3];
c_73824.hdr.mark = gc_color_red;
 c_73824.hdr.grayed = 0;
c_73824.tag = closureN_tag;
 c_73824.fn = (function_type)__lambda_35;
c_73824.num_args = 1;
c_73824.num_elements = 3;
c_73824.elements = (object *)e_73845;
c_73824.elements[0] = ((closureN)self_73539)->elements[0];
c_73824.elements[1] = ((closureN)self_73539)->elements[1];
c_73824.elements[2] = ((closureN)self_73539)->elements[2];

return_direct_with_clo1(data,  __glo_DEBUG_127_libs_system_91calls, (((closure)  __glo_DEBUG_127_libs_system_91calls)->fn),  &c_73824);
} else { 
  
closureN_type c_73847;
object e_73850 [1];
c_73847.hdr.mark = gc_color_red;
 c_73847.hdr.grayed = 0;
c_73847.tag = closureN_tag;
 c_73847.fn = (function_type)__lambda_38;
c_73847.num_args = 1;
c_73847.num_elements = 1;
c_73847.elements = (object *)e_73850;
c_73847.elements[0] = ((closureN)self_73539)->elements[0];


make_utf8_string_with_len(c_73851, "Could not find curl/wget. Please install one of those programs to continue~%", 76, 76);
return_direct_with_clo2(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73847, &c_73851);}
;; 
}

static void __lambda_38(void *data, object self_73543, int argc, object *args) /* object self_73543, object r_73305 */
 {
 object r_73305 = args[0];
  return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73543)->elements[0], r_73305);; 
}

static void __lambda_35(void *data, object self_73540, int argc, object *args) /* object self_73540, object r_73302 */
 {
 object r_73302 = args[0];
  if( (boolean_f != r_73302) ){ 
  
closureN_type c_73826;
object e_73831 [1];
c_73826.hdr.mark = gc_color_red;
 c_73826.hdr.grayed = 0;
c_73826.tag = closureN_tag;
 c_73826.fn = (function_type)__lambda_36;
c_73826.num_args = 1;
c_73826.num_elements = 1;
c_73826.elements = (object *)e_73831;
c_73826.elements[0] = ((closureN)self_73540)->elements[0];


make_utf8_string_with_len(c_73832, "curl -L ~a --output ~a", 22, 22);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73826, &c_73832, ((closureN)self_73540)->elements[2], ((closureN)self_73540)->elements[1]);
} else { 
  
closureN_type c_73836;
object e_73841 [1];
c_73836.hdr.mark = gc_color_red;
 c_73836.hdr.grayed = 0;
c_73836.tag = closureN_tag;
 c_73836.fn = (function_type)__lambda_37;
c_73836.num_args = 1;
c_73836.num_elements = 1;
c_73836.elements = (object *)e_73841;
c_73836.elements[0] = ((closureN)self_73540)->elements[0];


make_utf8_string_with_len(c_73842, "curl -s -L ~a --output ~a", 25, 25);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73836, &c_73842, ((closureN)self_73540)->elements[2], ((closureN)self_73540)->elements[1]);}
;; 
}

static void __lambda_37(void *data, object self_73542, int argc, object *args) /* object self_73542, object r_73304 */
 {
 object r_73304 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73542)->elements[0], (((closure)  ((closureN)self_73542)->elements[0])->fn),  Cyc_system(r_73304));; 
}

static void __lambda_36(void *data, object self_73541, int argc, object *args) /* object self_73541, object r_73303 */
 {
 object r_73303 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73541)->elements[0], (((closure)  ((closureN)self_73541)->elements[0])->fn),  Cyc_system(r_73303));; 
}

static void __lambda_31(void *data, object self_73536, int argc, object *args) /* object self_73536, object r_73298 */
 {
 object r_73298 = args[0];
  if( (boolean_f != r_73298) ){ 
  
closureN_type c_73801;
object e_73806 [1];
c_73801.hdr.mark = gc_color_red;
 c_73801.hdr.grayed = 0;
c_73801.tag = closureN_tag;
 c_73801.fn = (function_type)__lambda_32;
c_73801.num_args = 1;
c_73801.num_elements = 1;
c_73801.elements = (object *)e_73806;
c_73801.elements[0] = ((closureN)self_73536)->elements[0];


make_utf8_string_with_len(c_73807, "wget --progress=bar:force:noscroll -O ~a ~a", 43, 43);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73801, &c_73807, ((closureN)self_73536)->elements[1], ((closureN)self_73536)->elements[2]);
} else { 
  
closureN_type c_73811;
object e_73816 [1];
c_73811.hdr.mark = gc_color_red;
 c_73811.hdr.grayed = 0;
c_73811.tag = closureN_tag;
 c_73811.fn = (function_type)__lambda_33;
c_73811.num_args = 1;
c_73811.num_elements = 1;
c_73811.elements = (object *)e_73816;
c_73811.elements[0] = ((closureN)self_73536)->elements[0];


make_utf8_string_with_len(c_73817, "wget --quiet -O ~a ~a > /dev/null", 33, 33);
return_direct_with_clo4(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73811, &c_73817, ((closureN)self_73536)->elements[1], ((closureN)self_73536)->elements[2]);}
;; 
}

static void __lambda_33(void *data, object self_73538, int argc, object *args) /* object self_73538, object r_73300 */
 {
 object r_73300 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73538)->elements[0], (((closure)  ((closureN)self_73538)->elements[0])->fn),  Cyc_system(r_73300));; 
}

static void __lambda_32(void *data, object self_73537, int argc, object *args) /* object self_73537, object r_73299 */
 {
 object r_73299 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73537)->elements[0], (((closure)  ((closureN)self_73537)->elements[0])->fn),  Cyc_system(r_73299));; 
}

static void __lambda_25(void *data, object _, int argc, object *args) /* closure _,object k_73281, object command_7338_73195 */
 {
object k_73281 = args[0]; object command_7338_73195 = args[1];
  Cyc_st_add(data, "libs/system-calls.sld:command-exists?");

closureN_type c_73781;
object e_73791 [1];
c_73781.hdr.mark = gc_color_red;
 c_73781.hdr.grayed = 0;
c_73781.tag = closureN_tag;
 c_73781.fn = (function_type)__lambda_26;
c_73781.num_args = 1;
c_73781.num_elements = 1;
c_73781.elements = (object *)e_73791;
c_73781.elements[0] = k_73281;


make_utf8_string_with_len(c_73792, "command -v ~a > /dev/null", 25, 25);
return_direct_with_clo3(data,  __glo_format_srfi_28, (((closure)  __glo_format_srfi_28)->fn),  &c_73781, &c_73792, command_7338_73195);; 
}

static void __lambda_26(void *data, object self_73525, int argc, object *args) /* object self_73525, object r_73283 */
 {
 object r_73283 = args[0];
  
closureN_type c_73783;
object e_73788 [1];
c_73783.hdr.mark = gc_color_red;
 c_73783.hdr.grayed = 0;
c_73783.tag = closureN_tag;
 c_73783.fn = (function_type)__lambda_27;
c_73783.num_args = 1;
c_73783.num_elements = 1;
c_73783.elements = (object *)e_73788;
c_73783.elements[0] = ((closureN)self_73525)->elements[0];



return_direct_with_clo1(data,(closure)&c_73783,__lambda_27,  Cyc_system(r_73283));; 
}

static void __lambda_27(void *data, object self_73526, int argc, object *args) /* object self_73526, object r_73282 */
 {
 object r_73282 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73526)->elements[0], (((closure)  ((closureN)self_73526)->elements[0])->fn),  Cyc_eq(obj_int2obj(0), r_73282));; 
}

static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_73278, object return_91code_7337_73194 */
 {
object k_73278 = args[0]; object return_91code_7337_73194 = args[1];
  Cyc_st_add(data, "libs/system-calls.sld:ok?");


return_direct_with_clo1(data,  k_73278, (((closure)  k_73278)->fn),  Cyc_eq(obj_int2obj(0), return_91code_7337_73194));; 
}

static void __lambda_22(void *data, object _, int argc, object *args) /* closure _,object k_73273 */
 {
object k_73273 = args[0];
  Cyc_st_add(data, "libs/system-calls.sld:DEBUG?");

closureN_type c_73769;
object e_73774 [1];
c_73769.hdr.mark = gc_color_red;
 c_73769.hdr.grayed = 0;
c_73769.tag = closureN_tag;
 c_73769.fn = (function_type)__lambda_23;
c_73769.num_args = 1;
c_73769.num_elements = 1;
c_73769.elements = (object *)e_73774;
c_73769.elements[0] = k_73273;

return_direct_with_clo1(data,  __glo__85log_91level_85_libs_system_91calls, (((closure)  __glo__85log_91level_85_libs_system_91calls)->fn),  &c_73769);; 
}

static void __lambda_23(void *data, object self_73524, int argc, object *args) /* object self_73524, object r_73274 */
 {
 object r_73274 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73524)->elements[0], (((closure)  ((closureN)self_73524)->elements[0])->fn),  Cyc_eq(r_73274, quote_debug));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_73228, object expr_735_7316_7329_73186, object rename_736_7317_7330_73187, object compare_737_7318_7331_73188 */
 {
object k_73228 = args[0]; object expr_735_7316_7329_73186 = args[1]; object rename_736_7317_7330_73187 = args[2];
  Cyc_st_add(data, "libs/system-calls.sld:DEBUG");

closureN_type c_73630;
object e_73764 [3];
c_73630.hdr.mark = gc_color_red;
 c_73630.hdr.grayed = 0;
c_73630.tag = closureN_tag;
 c_73630.fn = (function_type)__lambda_2;
c_73630.num_args = 1;
c_73630.num_elements = 3;
c_73630.elements = (object *)e_73764;
c_73630.elements[0] = expr_735_7316_7329_73186;
c_73630.elements[1] = k_73228;
c_73630.elements[2] = rename_736_7317_7330_73187;



return_direct_with_clo1(data,(closure)&c_73630,__lambda_2,  Cyc_cdr(data, expr_735_7316_7329_73186));; 
}

static void __lambda_2(void *data, object self_73504, int argc, object *args) /* object self_73504, object v_931_7313_7323_7333_73190 */
 {
 object v_931_7313_7323_7333_73190 = args[0];
  
closureN_type c_73632;
object e_73739 [2];
c_73632.hdr.mark = gc_color_red;
 c_73632.hdr.grayed = 0;
c_73632.tag = closureN_tag;
 c_73632.fn = (function_type)__lambda_3;
c_73632.num_args = 0;
c_73632.num_elements = 2;
c_73632.elements = (object *)e_73739;
c_73632.elements[0] = ((closureN)self_73504)->elements[2];
c_73632.elements[1] = v_931_7313_7323_7333_73190;


closureN_type c_73740;
object e_73763 [2];
c_73740.hdr.mark = gc_color_red;
 c_73740.hdr.grayed = 0;
c_73740.tag = closureN_tag;
 c_73740.fn = (function_type)__lambda_18;
c_73740.num_args = 1;
c_73740.num_elements = 2;
c_73740.elements = (object *)e_73763;
c_73740.elements[0] = ((closureN)self_73504)->elements[0];
c_73740.elements[1] = ((closureN)self_73504)->elements[1];

return_direct_with_clo1(data,(closure)&c_73632,__lambda_3,  &c_73740);; 
}

static void __lambda_18(void *data, object self_73505, int argc, object *args) /* object self_73505, object tmp_7320_7322_7332_73189 */
 {
 object tmp_7320_7322_7332_73189 = args[0];
  
closureN_type c_73742;
object e_73756 [2];
c_73742.hdr.mark = gc_color_red;
 c_73742.hdr.grayed = 0;
c_73742.tag = closureN_tag;
 c_73742.fn = (function_type)__lambda_19;
c_73742.num_args = 0;
c_73742.num_elements = 2;
c_73742.elements = (object *)e_73756;
c_73742.elements[0] = ((closureN)self_73505)->elements[0];
c_73742.elements[1] = tmp_7320_7322_7332_73189;


closureN_type c_73757;
object e_73762 [1];
c_73757.hdr.mark = gc_color_red;
 c_73757.hdr.grayed = 0;
c_73757.tag = closureN_tag;
 c_73757.fn = (function_type)__lambda_21;
c_73757.num_args = 1;
c_73757.num_elements = 1;
c_73757.elements = (object *)e_73762;
c_73757.elements[0] = ((closureN)self_73505)->elements[1];

return_direct_with_clo1(data,(closure)&c_73742,__lambda_19,  &c_73757);; 
}

static void __lambda_21(void *data, object self_73506, int argc, object *args) /* object self_73506, object r_73229 */
 {
 object r_73229 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73506)->elements[0], (((closure)  ((closureN)self_73506)->elements[0])->fn),  Cyc_car(data, r_73229));; 
}

static void __lambda_19(void *data, object self_73507, int argc, object *args) /* object self_73507, object k_73231 */
 {
 object k_73231 = args[0];
  if( (boolean_f != ((closureN)self_73507)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_73231, (((closure)  k_73231)->fn),  ((closureN)self_73507)->elements[1]);
} else { 
  
closureN_type c_73747;
object e_73753 [1];
c_73747.hdr.mark = gc_color_red;
 c_73747.hdr.grayed = 0;
c_73747.tag = closureN_tag;
 c_73747.fn = (function_type)__lambda_20;
c_73747.num_args = 1;
c_73747.num_elements = 1;
c_73747.elements = (object *)e_73753;
c_73747.elements[0] = k_73231;


make_utf8_string_with_len(c_73754, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_73747, &c_73754, ((closureN)self_73507)->elements[0]);}
;; 
}

static void __lambda_20(void *data, object self_73508, int argc, object *args) /* object self_73508, object r_73232 */
 {
 object r_73232 = args[0];
  
pair_type local_73752; 
return_direct_with_clo1(data,  ((closureN)self_73508)->elements[0], (((closure)  ((closureN)self_73508)->elements[0])->fn),  set_pair_as_expr(&local_73752, r_73232, boolean_f));; 
}

static void __lambda_3(void *data, object self_73509, int argc, object *args) /* object self_73509, object k_73234 */
 {
 object k_73234 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_73509)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_73509)->elements[1]))) ){ 
  
closureN_type c_73643;
object e_73736 [3];
c_73643.hdr.mark = gc_color_red;
 c_73643.hdr.grayed = 0;
c_73643.tag = closureN_tag;
 c_73643.fn = (function_type)__lambda_4;
c_73643.num_args = 1;
c_73643.num_elements = 3;
c_73643.elements = (object *)e_73736;
c_73643.elements[0] = k_73234;
c_73643.elements[1] = ((closureN)self_73509)->elements[0];
c_73643.elements[2] = ((closureN)self_73509)->elements[1];

return_closcall2(data,  ((closureN)self_73509)->elements[0],  &c_73643, quote__if);
} else { 
  return_direct_with_clo1(data,  k_73234, (((closure)  k_73234)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_73234, (((closure)  k_73234)->fn),  boolean_f);}
;; 
}

static void __lambda_4(void *data, object self_73510, int argc, object *args) /* object self_73510, object r_73240 */
 {
 object r_73240 = args[0];
  
closureN_type c_73646;
object e_73735 [4];
c_73646.hdr.mark = gc_color_red;
 c_73646.hdr.grayed = 0;
c_73646.tag = closureN_tag;
 c_73646.fn = (function_type)__lambda_5;
c_73646.num_args = 1;
c_73646.num_elements = 4;
c_73646.elements = (object *)e_73735;
c_73646.elements[0] = ((closureN)self_73510)->elements[0];
c_73646.elements[1] = r_73240;
c_73646.elements[2] = ((closureN)self_73510)->elements[1];
c_73646.elements[3] = ((closureN)self_73510)->elements[2];

return_closcall2(data,  ((closureN)self_73510)->elements[1],  &c_73646, quote_eq_127);; 
}

static void __lambda_5(void *data, object self_73511, int argc, object *args) /* object self_73511, object r_73248 */
 {
 object r_73248 = args[0];
  
closureN_type c_73649;
object e_73734 [5];
c_73649.hdr.mark = gc_color_red;
 c_73649.hdr.grayed = 0;
c_73649.tag = closureN_tag;
 c_73649.fn = (function_type)__lambda_6;
c_73649.num_args = 1;
c_73649.num_elements = 5;
c_73649.elements = (object *)e_73734;
c_73649.elements[0] = ((closureN)self_73511)->elements[0];
c_73649.elements[1] = ((closureN)self_73511)->elements[1];
c_73649.elements[2] = r_73248;
c_73649.elements[3] = ((closureN)self_73511)->elements[2];
c_73649.elements[4] = ((closureN)self_73511)->elements[3];

return_closcall2(data,  ((closureN)self_73511)->elements[2],  &c_73649, quote__85log_91level_85);; 
}

static void __lambda_6(void *data, object self_73512, int argc, object *args) /* object self_73512, object r_73265 */
 {
 object r_73265 = args[0];
  
closureN_type c_73651;
object e_73732 [5];
c_73651.hdr.mark = gc_color_red;
 c_73651.hdr.grayed = 0;
c_73651.tag = closureN_tag;
 c_73651.fn = (function_type)__lambda_7;
c_73651.num_args = 1;
c_73651.num_elements = 5;
c_73651.elements = (object *)e_73732;
c_73651.elements[0] = ((closureN)self_73512)->elements[0];
c_73651.elements[1] = ((closureN)self_73512)->elements[1];
c_73651.elements[2] = ((closureN)self_73512)->elements[2];
c_73651.elements[3] = ((closureN)self_73512)->elements[3];
c_73651.elements[4] = ((closureN)self_73512)->elements[4];


make_pair(c_73733,quote__85log_91level_85,NULL);c_73733.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73651, r_73265, NULL, &c_73733);; 
}

static void __lambda_7(void *data, object self_73513, int argc, object *args) /* object self_73513, object r_73251 */
 {
 object r_73251 = args[0];
  
closureN_type c_73654;
object e_73731 [6];
c_73654.hdr.mark = gc_color_red;
 c_73654.hdr.grayed = 0;
c_73654.tag = closureN_tag;
 c_73654.fn = (function_type)__lambda_8;
c_73654.num_args = 1;
c_73654.num_elements = 6;
c_73654.elements = (object *)e_73731;
c_73654.elements[0] = ((closureN)self_73513)->elements[0];
c_73654.elements[1] = ((closureN)self_73513)->elements[1];
c_73654.elements[2] = ((closureN)self_73513)->elements[2];
c_73654.elements[3] = r_73251;
c_73654.elements[4] = ((closureN)self_73513)->elements[3];
c_73654.elements[5] = ((closureN)self_73513)->elements[4];

return_closcall2(data,  ((closureN)self_73513)->elements[3],  &c_73654, quote_quote);; 
}

static void __lambda_8(void *data, object self_73514, int argc, object *args) /* object self_73514, object r_73257 */
 {
 object r_73257 = args[0];
  
closureN_type c_73657;
object e_73730 [6];
c_73657.hdr.mark = gc_color_red;
 c_73657.hdr.grayed = 0;
c_73657.tag = closureN_tag;
 c_73657.fn = (function_type)__lambda_9;
c_73657.num_args = 1;
c_73657.num_elements = 6;
c_73657.elements = (object *)e_73730;
c_73657.elements[0] = ((closureN)self_73514)->elements[0];
c_73657.elements[1] = ((closureN)self_73514)->elements[1];
c_73657.elements[2] = ((closureN)self_73514)->elements[2];
c_73657.elements[3] = ((closureN)self_73514)->elements[3];
c_73657.elements[4] = r_73257;
c_73657.elements[5] = ((closureN)self_73514)->elements[5];

return_closcall2(data,  ((closureN)self_73514)->elements[4],  &c_73657, quote_debug);; 
}

static void __lambda_9(void *data, object self_73515, int argc, object *args) /* object self_73515, object r_73260 */
 {
 object r_73260 = args[0];
  
closureN_type c_73659;
object e_73728 [6];
c_73659.hdr.mark = gc_color_red;
 c_73659.hdr.grayed = 0;
c_73659.tag = closureN_tag;
 c_73659.fn = (function_type)__lambda_10;
c_73659.num_args = 1;
c_73659.num_elements = 6;
c_73659.elements = (object *)e_73728;
c_73659.elements[0] = ((closureN)self_73515)->elements[0];
c_73659.elements[1] = ((closureN)self_73515)->elements[1];
c_73659.elements[2] = ((closureN)self_73515)->elements[2];
c_73659.elements[3] = ((closureN)self_73515)->elements[3];
c_73659.elements[4] = ((closureN)self_73515)->elements[4];
c_73659.elements[5] = ((closureN)self_73515)->elements[5];


make_pair(c_73729,quote_debug,NULL);c_73729.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73659, r_73260, NULL, &c_73729);; 
}

static void __lambda_10(void *data, object self_73516, int argc, object *args) /* object self_73516, object r_73258 */
 {
 object r_73258 = args[0];
  
closureN_type c_73661;
object e_73724 [5];
c_73661.hdr.mark = gc_color_red;
 c_73661.hdr.grayed = 0;
c_73661.tag = closureN_tag;
 c_73661.fn = (function_type)__lambda_11;
c_73661.num_args = 1;
c_73661.num_elements = 5;
c_73661.elements = (object *)e_73724;
c_73661.elements[0] = ((closureN)self_73516)->elements[0];
c_73661.elements[1] = ((closureN)self_73516)->elements[1];
c_73661.elements[2] = ((closureN)self_73516)->elements[2];
c_73661.elements[3] = ((closureN)self_73516)->elements[3];
c_73661.elements[4] = ((closureN)self_73516)->elements[5];


make_pair(c_73727,quote_debug,NULL);c_73727.hdr.immutable = 1;

make_pair(c_73726,quote_quote,&c_73727);c_73726.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73661, ((closureN)self_73516)->elements[4], r_73258, &c_73726);; 
}

static void __lambda_11(void *data, object self_73517, int argc, object *args) /* object self_73517, object r_73254 */
 {
 object r_73254 = args[0];
  
closureN_type c_73663;
object e_73720 [5];
c_73663.hdr.mark = gc_color_red;
 c_73663.hdr.grayed = 0;
c_73663.tag = closureN_tag;
 c_73663.fn = (function_type)__lambda_12;
c_73663.num_args = 1;
c_73663.num_elements = 5;
c_73663.elements = (object *)e_73720;
c_73663.elements[0] = ((closureN)self_73517)->elements[0];
c_73663.elements[1] = ((closureN)self_73517)->elements[1];
c_73663.elements[2] = ((closureN)self_73517)->elements[2];
c_73663.elements[3] = ((closureN)self_73517)->elements[3];
c_73663.elements[4] = ((closureN)self_73517)->elements[4];


make_pair(c_73723,quote_debug,NULL);c_73723.hdr.immutable = 1;

make_pair(c_73722,quote_quote,&c_73723);c_73722.hdr.immutable = 1;

make_pair(c_73721,&c_73722,NULL);c_73721.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73663, r_73254, NULL, &c_73721);; 
}

static void __lambda_12(void *data, object self_73518, int argc, object *args) /* object self_73518, object r_73252 */
 {
 object r_73252 = args[0];
  
closureN_type c_73665;
object e_73713 [4];
c_73665.hdr.mark = gc_color_red;
 c_73665.hdr.grayed = 0;
c_73665.tag = closureN_tag;
 c_73665.fn = (function_type)__lambda_13;
c_73665.num_args = 1;
c_73665.num_elements = 4;
c_73665.elements = (object *)e_73713;
c_73665.elements[0] = ((closureN)self_73518)->elements[0];
c_73665.elements[1] = ((closureN)self_73518)->elements[1];
c_73665.elements[2] = ((closureN)self_73518)->elements[2];
c_73665.elements[3] = ((closureN)self_73518)->elements[4];


make_pair(c_73716,quote__85log_91level_85,NULL);c_73716.hdr.immutable = 1;

make_pair(c_73719,quote_debug,NULL);c_73719.hdr.immutable = 1;

make_pair(c_73718,quote_quote,&c_73719);c_73718.hdr.immutable = 1;

make_pair(c_73717,&c_73718,NULL);c_73717.hdr.immutable = 1;

make_pair(c_73715,&c_73716,&c_73717);c_73715.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73665, ((closureN)self_73518)->elements[3], r_73252, &c_73715);; 
}

static void __lambda_13(void *data, object self_73519, int argc, object *args) /* object self_73519, object r_73249 */
 {
 object r_73249 = args[0];
  
closureN_type c_73667;
object e_73705 [3];
c_73667.hdr.mark = gc_color_red;
 c_73667.hdr.grayed = 0;
c_73667.tag = closureN_tag;
 c_73667.fn = (function_type)__lambda_14;
c_73667.num_args = 1;
c_73667.num_elements = 3;
c_73667.elements = (object *)e_73705;
c_73667.elements[0] = ((closureN)self_73519)->elements[0];
c_73667.elements[1] = ((closureN)self_73519)->elements[1];
c_73667.elements[2] = ((closureN)self_73519)->elements[3];


make_pair(c_73709,quote__85log_91level_85,NULL);c_73709.hdr.immutable = 1;

make_pair(c_73712,quote_debug,NULL);c_73712.hdr.immutable = 1;

make_pair(c_73711,quote_quote,&c_73712);c_73711.hdr.immutable = 1;

make_pair(c_73710,&c_73711,NULL);c_73710.hdr.immutable = 1;

make_pair(c_73708,&c_73709,&c_73710);c_73708.hdr.immutable = 1;

make_pair(c_73707,quote_eq_127,&c_73708);c_73707.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73667, ((closureN)self_73519)->elements[2], r_73249, &c_73707);; 
}

static void __lambda_14(void *data, object self_73520, int argc, object *args) /* object self_73520, object r_73243 */
 {
 object r_73243 = args[0];
  
closureN_type c_73669;
object e_73700 [3];
c_73669.hdr.mark = gc_color_red;
 c_73669.hdr.grayed = 0;
c_73669.tag = closureN_tag;
 c_73669.fn = (function_type)__lambda_15;
c_73669.num_args = 1;
c_73669.num_elements = 3;
c_73669.elements = (object *)e_73700;
c_73669.elements[0] = ((closureN)self_73520)->elements[0];
c_73669.elements[1] = ((closureN)self_73520)->elements[1];
c_73669.elements[2] = r_73243;




make_pair(c_73704,quote_cmd,NULL);c_73704.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73669, Cyc_car(data, ((closureN)self_73520)->elements[2]), NULL, &c_73704);; 
}

static void __lambda_15(void *data, object self_73521, int argc, object *args) /* object self_73521, object r_73244 */
 {
 object r_73244 = args[0];
  
closureN_type c_73671;
object e_73690 [2];
c_73671.hdr.mark = gc_color_red;
 c_73671.hdr.grayed = 0;
c_73671.tag = closureN_tag;
 c_73671.fn = (function_type)__lambda_16;
c_73671.num_args = 1;
c_73671.num_elements = 2;
c_73671.elements = (object *)e_73690;
c_73671.elements[0] = ((closureN)self_73521)->elements[0];
c_73671.elements[1] = ((closureN)self_73521)->elements[1];


make_pair(c_73695,quote__85log_91level_85,NULL);c_73695.hdr.immutable = 1;

make_pair(c_73698,quote_debug,NULL);c_73698.hdr.immutable = 1;

make_pair(c_73697,quote_quote,&c_73698);c_73697.hdr.immutable = 1;

make_pair(c_73696,&c_73697,NULL);c_73696.hdr.immutable = 1;

make_pair(c_73694,&c_73695,&c_73696);c_73694.hdr.immutable = 1;

make_pair(c_73693,quote_eq_127,&c_73694);c_73693.hdr.immutable = 1;

make_pair(c_73699,quote_cmd,NULL);c_73699.hdr.immutable = 1;

make_pair(c_73692,&c_73693,&c_73699);c_73692.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73671, ((closureN)self_73521)->elements[2], r_73244, &c_73692);; 
}

static void __lambda_16(void *data, object self_73522, int argc, object *args) /* object self_73522, object r_73241 */
 {
 object r_73241 = args[0];
  
closureN_type c_73673;
object e_73679 [1];
c_73673.hdr.mark = gc_color_red;
 c_73673.hdr.grayed = 0;
c_73673.tag = closureN_tag;
 c_73673.fn = (function_type)__lambda_17;
c_73673.num_args = 1;
c_73673.num_elements = 1;
c_73673.elements = (object *)e_73679;
c_73673.elements[0] = ((closureN)self_73522)->elements[0];


make_pair(c_73685,quote__85log_91level_85,NULL);c_73685.hdr.immutable = 1;

make_pair(c_73688,quote_debug,NULL);c_73688.hdr.immutable = 1;

make_pair(c_73687,quote_quote,&c_73688);c_73687.hdr.immutable = 1;

make_pair(c_73686,&c_73687,NULL);c_73686.hdr.immutable = 1;

make_pair(c_73684,&c_73685,&c_73686);c_73684.hdr.immutable = 1;

make_pair(c_73683,quote_eq_127,&c_73684);c_73683.hdr.immutable = 1;

make_pair(c_73689,quote_cmd,NULL);c_73689.hdr.immutable = 1;

make_pair(c_73682,&c_73683,&c_73689);c_73682.hdr.immutable = 1;

make_pair(c_73681,quote__if,&c_73682);c_73681.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_73673, ((closureN)self_73522)->elements[1], r_73241, &c_73681);; 
}

static void __lambda_17(void *data, object self_73523, int argc, object *args) /* object self_73523, object r_73239 */
 {
 object r_73239 = args[0];
  
pair_type local_73678; 
return_direct_with_clo1(data,  ((closureN)self_73523)->elements[0], (((closure)  ((closureN)self_73523)->elements[0])->fn),  set_pair_as_expr(&local_73678, r_73239, boolean_f));; 
}

void c_libssystem_91calls_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
object buf[1]; object cont = args[0];
buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_libssystem_91calls_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_warning = find_or_add_symbol("warning");
  quote_cmd = find_or_add_symbol("cmd");
  quote_debug = find_or_add_symbol("debug");
  quote_quote = find_or_add_symbol("quote");
  quote__85log_91level_85 = find_or_add_symbol("*log-level*");
  quote_eq_127 = find_or_add_symbol("eq?");
  quote__if = find_or_add_symbol("if");

  add_global("__glo_lib_91init_117libssystem_19191calls_libs_system_91calls", (object *) &__glo_lib_91init_117libssystem_19191calls_libs_system_91calls);
  add_global("__glo_touch_67_libs_system_91calls", (object *) &__glo_touch_67_libs_system_91calls);
  add_global("__glo_copy_91file_67_libs_system_91calls", (object *) &__glo_copy_91file_67_libs_system_91calls);
  add_global("__glo_copy_91dir_91to_91dir_67_libs_system_91calls", (object *) &__glo_copy_91dir_91to_91dir_67_libs_system_91calls);
  add_global("__glo_copy_91file_91to_91dir_67_libs_system_91calls", (object *) &__glo_copy_91file_91to_91dir_67_libs_system_91calls);
  add_global("__glo_make_91dir_67_libs_system_91calls", (object *) &__glo_make_91dir_67_libs_system_91calls);
  add_global("__glo_compile_67_libs_system_91calls", (object *) &__glo_compile_67_libs_system_91calls);
  add_global("__glo_delete_67_libs_system_91calls", (object *) &__glo_delete_67_libs_system_91calls);
  add_global("__glo_extract_67_libs_system_91calls", (object *) &__glo_extract_67_libs_system_91calls);
  add_global("__glo_validate_91sha256sum_libs_system_91calls", (object *) &__glo_validate_91sha256sum_libs_system_91calls);
  add_global("__glo_download_67_libs_system_91calls", (object *) &__glo_download_67_libs_system_91calls);
  add_global("__glo_command_91exists_127_libs_system_91calls", (object *) &__glo_command_91exists_127_libs_system_91calls);
  add_global("__glo_ok_127_libs_system_91calls", (object *) &__glo_ok_127_libs_system_91calls);
  add_global("__glo_DEBUG_127_libs_system_91calls", (object *) &__glo_DEBUG_127_libs_system_91calls);
  add_global("__glo_DEBUG_libs_system_91calls", (object *) &__glo_DEBUG_libs_system_91calls);
  add_global("__glo__85log_91level_85_libs_system_91calls", (object *) &__glo__85log_91level_85_libs_system_91calls);
  mclosure0(c_731384, (function_type)__lambda_139);c_731384.num_args = 0; 
  __glo_lib_91init_117libssystem_19191calls_libs_system_91calls = &c_731384; 
  mclosure0(c_731339, (function_type)__lambda_130);c_731339.num_args = 1; 
  __glo_touch_67_libs_system_91calls = &c_731339; 
  mclosure0(c_731292, (function_type)__lambda_121);c_731292.num_args = 2; 
  __glo_copy_91file_67_libs_system_91calls = &c_731292; 
  mclosure0(c_731240, (function_type)__lambda_111);c_731240.num_args = 2; 
  __glo_copy_91dir_91to_91dir_67_libs_system_91calls = &c_731240; 
  mclosure0(c_731188, (function_type)__lambda_101);c_731188.num_args = 2; 
  __glo_copy_91file_91to_91dir_67_libs_system_91calls = &c_731188; 
  mclosure0(c_731143, (function_type)__lambda_92);c_731143.num_args = 1; 
  __glo_make_91dir_67_libs_system_91calls = &c_731143; 
  mclosure0(c_731084, (function_type)__lambda_82);c_731084.num_args = 1; 
  __glo_compile_67_libs_system_91calls = &c_731084; 
  mclosure0(c_731039, (function_type)__lambda_73);c_731039.num_args = 1; 
  __glo_delete_67_libs_system_91calls = &c_731039; 
  mclosure0(c_73992, (function_type)__lambda_64);c_73992.num_args = 2; 
  __glo_extract_67_libs_system_91calls = &c_73992; 
  mclosure0(c_73894, (function_type)__lambda_46);c_73894.num_args = 2; 
  __glo_validate_91sha256sum_libs_system_91calls = &c_73894; 
  mclosure0(c_73793, (function_type)__lambda_28);c_73793.num_args = 2; 
  __glo_download_67_libs_system_91calls = &c_73793; 
  mclosure0(c_73779, (function_type)__lambda_25);c_73779.num_args = 1; 
  __glo_command_91exists_127_libs_system_91calls = &c_73779; 
  mclosure0(c_73775, (function_type)__lambda_24);c_73775.num_args = 1; 
  __glo_ok_127_libs_system_91calls = &c_73775; 
  mclosure0(c_73767, (function_type)__lambda_22);c_73767.num_args = 0; 
  __glo_DEBUG_127_libs_system_91calls = &c_73767; 
  mmacro(c_73628, (function_type)__lambda_1);c_73628.num_args = 3; 
  __glo_DEBUG_libs_system_91calls = &c_73628; 
  __glo__85log_91level_85_libs_system_91calls = boolean_f; 

  mclosure0(clo_731394, c_libssystem_91calls_inlinable_lambdas); make_pair(pair_731393, find_or_add_symbol("c_libssystem_91calls_inlinable_lambdas"), &clo_731394);
  make_cvar(cvar_731395, (object *)&__glo_lib_91init_117libssystem_19191calls_libs_system_91calls);make_pair(pair_731396, find_or_add_symbol("lib-init:libssystem_91calls"), &cvar_731395);
  make_cvar(cvar_731397, (object *)&__glo_touch_67_libs_system_91calls);make_pair(pair_731398, find_or_add_symbol("touch!"), &cvar_731397);
  make_cvar(cvar_731399, (object *)&__glo_copy_91file_67_libs_system_91calls);make_pair(pair_731400, find_or_add_symbol("copy-file!"), &cvar_731399);
  make_cvar(cvar_731401, (object *)&__glo_copy_91dir_91to_91dir_67_libs_system_91calls);make_pair(pair_731402, find_or_add_symbol("copy-dir-to-dir!"), &cvar_731401);
  make_cvar(cvar_731403, (object *)&__glo_copy_91file_91to_91dir_67_libs_system_91calls);make_pair(pair_731404, find_or_add_symbol("copy-file-to-dir!"), &cvar_731403);
  make_cvar(cvar_731405, (object *)&__glo_make_91dir_67_libs_system_91calls);make_pair(pair_731406, find_or_add_symbol("make-dir!"), &cvar_731405);
  make_cvar(cvar_731407, (object *)&__glo_compile_67_libs_system_91calls);make_pair(pair_731408, find_or_add_symbol("compile!"), &cvar_731407);
  make_cvar(cvar_731409, (object *)&__glo_delete_67_libs_system_91calls);make_pair(pair_731410, find_or_add_symbol("delete!"), &cvar_731409);
  make_cvar(cvar_731411, (object *)&__glo_extract_67_libs_system_91calls);make_pair(pair_731412, find_or_add_symbol("extract!"), &cvar_731411);
  make_cvar(cvar_731413, (object *)&__glo_validate_91sha256sum_libs_system_91calls);make_pair(pair_731414, find_or_add_symbol("validate-sha256sum"), &cvar_731413);
  make_cvar(cvar_731415, (object *)&__glo_download_67_libs_system_91calls);make_pair(pair_731416, find_or_add_symbol("download!"), &cvar_731415);
  make_cvar(cvar_731417, (object *)&__glo_command_91exists_127_libs_system_91calls);make_pair(pair_731418, find_or_add_symbol("command-exists?"), &cvar_731417);
  make_cvar(cvar_731419, (object *)&__glo_ok_127_libs_system_91calls);make_pair(pair_731420, find_or_add_symbol("ok?"), &cvar_731419);
  make_cvar(cvar_731421, (object *)&__glo_DEBUG_127_libs_system_91calls);make_pair(pair_731422, find_or_add_symbol("DEBUG?"), &cvar_731421);
  make_cvar(cvar_731423, (object *)&__glo_DEBUG_libs_system_91calls);make_pair(pair_731424, find_or_add_symbol("DEBUG"), &cvar_731423);
  make_cvar(cvar_731425, (object *)&__glo__85log_91level_85_libs_system_91calls);make_pair(pair_731426, find_or_add_symbol("*log-level*"), &cvar_731425);
make_pair(c_731443, &pair_731393,Cyc_global_variables);
make_pair(c_731442, &pair_731396, &c_731443);
make_pair(c_731441, &pair_731398, &c_731442);
make_pair(c_731440, &pair_731400, &c_731441);
make_pair(c_731439, &pair_731402, &c_731440);
make_pair(c_731438, &pair_731404, &c_731439);
make_pair(c_731437, &pair_731406, &c_731438);
make_pair(c_731436, &pair_731408, &c_731437);
make_pair(c_731435, &pair_731410, &c_731436);
make_pair(c_731434, &pair_731412, &c_731435);
make_pair(c_731433, &pair_731414, &c_731434);
make_pair(c_731432, &pair_731416, &c_731433);
make_pair(c_731431, &pair_731418, &c_731432);
make_pair(c_731430, &pair_731420, &c_731431);
make_pair(c_731429, &pair_731422, &c_731430);
make_pair(c_731428, &pair_731424, &c_731429);
make_pair(c_731427, &pair_731426, &c_731428);
Cyc_global_variables = &c_731427;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117libssystem_19191calls_libs_system_91calls)->fn)(data, buf[0], 1, buf);
}
void c_libssystem_91calls_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("libs_system_91calls");
  c_libssystem_91calls_entry_pt_first_lambda(data, cont, argc, value);
}
