/* ** ** The C code is generated by ATS/Anairiats ** The compilation time is: 2011-9-10: 22h:12m ** */ /* include some .h files */ #ifndef _ATS_HEADER_NONE #include "ats_config.h" #include "ats_basics.h" #include "ats_types.h" #include "ats_exception.h" #include "ats_memory.h" #endif /* _ATS_HEADER_NONE */ /* include some .cats files */ #ifndef _ATS_PRELUDE_NONE #include "prelude/CATS/basics.cats" #include "prelude/CATS/bool.cats" #include "prelude/CATS/byte.cats" #include "prelude/CATS/char.cats" #include "prelude/CATS/float.cats" #include "prelude/CATS/integer.cats" #include "prelude/CATS/integer_fixed.cats" #include "prelude/CATS/integer_ptr.cats" #include "prelude/CATS/lazy.cats" #include "prelude/CATS/lazy_vt.cats" #include "prelude/CATS/pointer.cats" #include "prelude/CATS/printf.cats" #include "prelude/CATS/reference.cats" #include "prelude/CATS/sizetype.cats" #include "prelude/CATS/string.cats" #include "prelude/CATS/array.cats" #include "prelude/CATS/list.cats" #include "prelude/CATS/matrix.cats" #include "prelude/CATS/option.cats" #endif /* _ATS_PRELUDE_NONE */ /* prologues from statically loaded files */ /* external codes at top */ /* type definitions */ typedef struct { int tag ; ats_ptr_type atslab_0 ; } anairiats_sum_0 ; typedef struct { int tag ; ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_sum_1 ; typedef struct { int tag ; ats_clo_ref_type atslab_0 ; } anairiats_sum_2 ; typedef struct { int tag ; ats_int64_type atslab_0 ; } anairiats_sum_3 ; typedef struct { int tag ; ats_int_type atslab_0 ; } anairiats_sum_4 ; typedef struct { ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_sum_5 ; typedef struct { int tag ; ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; ats_ptr_type atslab_3 ; ats_ptr_type atslab_4 ; } anairiats_sum_6 ; typedef struct { int tag ; ats_int64_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; } anairiats_sum_7 ; typedef struct { ats_int_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; ats_ptr_type atslab_3 ; ats_ptr_type atslab_4 ; } anairiats_sum_8 ; typedef struct { ats_ptr_type atslab_0 ; } anairiats_sum_9 ; typedef struct { ats_ptr_type atslab_v1ar_loc ; ats_ptr_type atslab_v1ar_node ; ats_ptr_type atslab_v1ar_ty ; } anairiats_rec_10 ; typedef struct { int tag ; ats_int64_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_sum_11 ; typedef struct { ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; } anairiats_sum_12 ; typedef struct { int tag ; ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; } anairiats_sum_13 ; typedef struct { ats_ptr_type atslab_exp_loc ; ats_ptr_type atslab_exp_node ; ats_ptr_type atslab_exp_ty ; } anairiats_rec_14 ; typedef struct { ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_rec_15 ; typedef struct { ats_ptr_type atslab_fieldexp_loc ; ats_ptr_type atslab_fieldexp_lab ; ats_ptr_type atslab_fieldexp_exp ; } anairiats_rec_16 ; typedef struct { ats_int64_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_sum_17 ; typedef struct { ats_ptr_type atslab_fundec_loc ; ats_ptr_type atslab_fundec_name ; ats_ptr_type atslab_fundec_arglst ; ats_ptr_type atslab_fundec_result ; ats_ptr_type atslab_fundec_body ; } anairiats_rec_18 ; typedef struct { ats_ptr_type atslab_fieldtyp_loc ; ats_ptr_type atslab_fieldtyp_lab ; ats_ptr_type atslab_fieldtyp_escape ; ats_ptr_type atslab_fieldtyp_typ ; } anairiats_rec_19 ; typedef struct { ats_bool_type atslab_0 ; ats_ptr_type atslab_1 ; } anairiats_sum_20 ; typedef struct { ats_ptr_type atslab_dec_loc ; ats_ptr_type atslab_dec_node ; } anairiats_rec_21 ; typedef struct { int tag ; ats_ptr_type atslab_0 ; ats_ptr_type atslab_1 ; ats_ptr_type atslab_2 ; ats_ptr_type atslab_3 ; } anairiats_sum_22 ; /* external typedefs */ /* external dynamic constructor declarations */ ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__list_cons) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__list_nil) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__None) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__Some) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__list_vt_cons) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__list_vt_nil) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__None_vt) ; ATSextern_val(ats_sum_type, ATS_2d0_2e2_2e6_2prelude_2basics_sta_2esats__Some_vt) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EQ) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__NEQ) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__GT) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__GE) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LT) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LE) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MINUS) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MUL) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__DIV) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMmove) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMexp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMjump) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMcjump) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMseq) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMlabel) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__STMusedef) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPconst) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPname) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPtemp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPbinop) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPmem) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPcall) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EXPeseq) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__LABTYLSTcons) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__LABTYLSTnil) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__TYbase) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__TYrec) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__PlusOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__MinusOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__TimesOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__DivideOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__EqOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__NeqOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__GtOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__GeOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__LtOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__LeOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__AndOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__OrOp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__FunctionDec) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__VarDec) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__TypeDec) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__VarExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__NilExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__IntExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__StringExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__CallExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__OpExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__RecordExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__SeqExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__AssignExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__IfExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__WhileExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__ForExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__BreakExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__ContinueExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__LetExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__ArrayExp) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__SimpleVar) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__FieldVar) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__SubscriptVar) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__Ex) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__Nx) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__Cx) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__FRAGproc) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__FRAGstring) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELtop) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELsub) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2LIB_2funmap_avltree_2edats__B) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2LIB_2funmap_avltree_2edats__E) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTfun) ; ATSextern_val(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTvar) ; /* external dynamic constant declarations */ ATSextern_fun(ats_void_type, atspre_prerr_newline) () ; ATSextern_fun(ats_int_type, atspre_add_int_int) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_int_type, atspre_sub_int_int) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_lte_int_int) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_eq_int_int) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_int_type, atspre_isucc) (ats_int_type) ; ATSextern_fun(ats_int_type, atspre_iadd) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_int_type, atspre_isub) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_ilt) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_ilte) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_igt) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_bool_type, atspre_igte) (ats_int_type, ats_int_type) ; ATSextern_fun(ats_int_type, atspre_imax) (ats_int_type, ats_int_type) ; ATSextern_val(ats_ptr_type, atspre_null_ptr) ; ATSextern_fun(ats_bool_type, atspre_pneq) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_ptr_type, atspre_ref_make_elt_tsz) (ats_ref_type, ats_size_type) ; ATSextern_fun(ats_void_type, atspre_prerr_string) (ats_ptr_type) ; ATSextern_fun(ats_void_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__prerr_symbol) (ats_ptr_type) ; ATSextern_fun(ats_bool_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_int_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__compare_symbol_symbol) (ats_ptr_type, ats_ptr_type) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_INT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_STRING) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_CHR) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_CONCAT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_EXIT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_FLUSH) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_GETCHAR) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_NOT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_ORD) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_PRINT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_PRINT_INT) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_SIZE) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_SUBSTRING) ; ATSextern_fun(ats_int64_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new) () ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new) () ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_str_new) () ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_fun_new) (ats_ptr_type) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_chr) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_flush) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_getchar) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_ord) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_print) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_print_int) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_size) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_substring) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_concat) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_not) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_exit) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_array_alloc) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_array_make_elt) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_eq_string_string) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_neq_string_string) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_0) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_1) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__stm_nop) ; ATSextern_fun(ats_void_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__fprint_exp) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_int64_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__stamp_make) () ; ATSextern_fun(ats_bool_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__eq_stamp_stamp) (ats_int64_type, ats_int64_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx) (ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx) (ats_ptr_type) ; ATSextern_fun(ats_clo_ref_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx) (ats_ptr_type) ; ATSextern_fun(ats_void_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_bool_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__access_is_inreg) (ats_ptr_type) ; ATSextern_val(ats_int64_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__FP) ; ATSextern_val(ats_int_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theTopFrame) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_make_new) (ats_ptr_type, ats_int_type, ats_ptr_type) ; ATSextern_fun(ats_int_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_argofs_get) (ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_arglst_get) (ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_alloc_local) (ats_ptr_type, ats_bool_type) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_FP) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_RV) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_make_access) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_void_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_theFraglst_add) (ats_ptr_type) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theFunargReglst) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCallersavedReglst) ; ATSextern_val(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCalleesavedReglst) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get) (ats_ptr_type) ; ATSextern_fun(ats_bool_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__eq_level_level) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_empty) () ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert) (ats_ptr_type, ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search) (ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1) (ats_ptr_type, ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_ptr_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1) (ats_ptr_type, ats_ptr_type, ats_ptr_type) ; ATSextern_fun(ats_void_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transDec1) (ats_ptr_type, ats_ref_type, ats_ptr_type, ats_ref_type) ; /* external dynamic terminating constant declarations */ #ifdef _ATS_PROOFCHECK extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2SATS_2list_2esats__list_length_is_nonnegative_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; #endif /* _ATS_PROOFCHECK */ /* sum constructor declarations */ ATSglobal(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELtop) ; ATSglobal(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELsub) ; ATSglobal(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTfun) ; ATSglobal(ats_sum_type, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTvar) ; /* exn constructor declarations */ /* global dynamic (non-functional) constant declarations */ /* internal function declarations */ static ats_ptr_type __ats_fun_3 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_3_closure_make () ; static ats_ptr_type __ats_fun_3_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_4 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_4_closure_make () ; static ats_ptr_type __ats_fun_4_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_5 (ats_ptr_type env0, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_5_closure_make (ats_ptr_type env0) ; static ats_ptr_type __ats_fun_5_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_int_type __ats_fun_11 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_11_closure_make () ; static ats_int_type __ats_fun_11_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type funmap_empty_01910_ () ; static ats_int_type compare_key_key_01909_ats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_clo_ref_type arg2) ; static ats_int_type avltree_height_01359_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0) ; static ats_ptr_type avltree_rrotate_01378_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) ; static ats_ptr_type avltree_lrotate_01362_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) ; static ats_ptr_type insert_17 (ats_ptr_type env0, ats_ptr_type env1, ats_clo_ref_type env2, ats_ptr_type arg0, ats_ref_type arg1) ; static ats_clo_ptr_type insert_17_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_clo_ref_type env2) ; static ats_ptr_type insert_17_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ref_type arg1) ; static ats_ptr_type funmap_insert_status_01916_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_clo_ref_type arg3, ats_ref_type arg4) ; static ats_ptr_type funmap_insert_01915_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_clo_ref_type arg3) ; static ats_ptr_type search_24 (ats_ptr_type env0, ats_clo_ref_type env1, ats_ptr_type arg0) ; static ats_clo_ptr_type search_24_closure_make (ats_ptr_type env0, ats_clo_ref_type env1) ; static ats_ptr_type search_24_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) ; static ats_ptr_type funmap_search_01914_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_clo_ref_type arg2) ; static ats_ptr_type loop_27 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type list_last_01475_ats_ptr_type (ats_ptr_type arg0) ; static ats_ptr_type frame_stalnk_get_25 (ats_ptr_type arg0) ; static ats_ptr_type loop_29 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_ptr_type frame_baseptr_compute_28 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type exp_make_level_access_30 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_int_type loop_32 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2) ; static ats_ptr_type seq0_34 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0) ; static ats_clo_ptr_type seq0_34_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type seq0_34_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) ; static ats_ptr_type seq1_35 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type seq1_35_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type seq1_35_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type seq2_36 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_clo_ptr_type seq2_36_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type seq2_36_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_ptr_type transExp1_SeqExp_33 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_ptr_type seq_stm_stmlst_rev_37 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type eseq_stmlst_rev_exp_38 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type ref_01023_ats_ptr_type (ats_ptr_type arg0) ; static ats_ptr_type ref_make_elt_01024_ats_ptr_type (ats_ptr_type arg0) ; static ats_void_type theBreaklabLst_push_41 (ats_ptr_type arg0) ; static ats_void_type theBreaklabLst_pop_42 () ; static ats_ptr_type loop_breaklab_get_43 () ; static ats_void_type theContinuelabLst_push_44 (ats_ptr_type arg0) ; static ats_void_type theContinuelabLst_pop_45 () ; static ats_ptr_type loop_continuelab_get_46 () ; static ats_ptr_type expbinop_plus_make_47 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type expbinop_minus_make_48 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type loop_50 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2, ats_ptr_type arg0) ; static ats_clo_ptr_type loop_50_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) ; static ats_ptr_type loop_50_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) ; static ats_ptr_type __ats_fun_51 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_51_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_51_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_52 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_52_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_52_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_53 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_53_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_53_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_54 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_54_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_54_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_55 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_55_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_55_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_56 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_56_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_56_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_57 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_57_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_57_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_58 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_58_closure_make (ats_ptr_type env0, ats_ptr_type env1) ; static ats_ptr_type __ats_fun_58_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_59 (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_59_closure_make (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) ; static ats_ptr_type __ats_fun_59_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type __ats_fun_60 (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_clo_ptr_type __ats_fun_60_closure_make (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) ; static ats_ptr_type __ats_fun_60_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_int_type loop_62 (ats_ptr_type arg0, ats_int_type arg1) ; static ats_int_type list_length_01478_ats_ptr_type (ats_ptr_type arg0) ; static ats_ptr_type aux_63 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2, ats_ptr_type arg0, ats_int_type arg1, ats_ptr_type arg2) ; static ats_clo_ptr_type aux_63_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) ; static ats_ptr_type aux_63_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_int_type arg1, ats_ptr_type arg2) ; static ats_void_type loop_64 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2, ats_ref_type arg3) ; static ats_void_type loop1_66 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2, ats_ref_type arg3) ; static ats_void_type loop2_67 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2, ats_ref_type arg3) ; static ats_ptr_type loop_68 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type funarglst_move_65 (ats_ptr_type arg0, ats_int_type arg1) ; static anairiats_rec_15 aux_70 (ats_ptr_type arg0) ; static anairiats_rec_15 calleesaved_save_69 () ; static ats_ptr_type aux_72 (ats_ptr_type arg0, ats_ptr_type arg1) ; static ats_ptr_type calleesaved_restore_71 (ats_ptr_type arg0) ; static ats_ptr_type aux_74 (ats_ptr_type arg0) ; static ats_void_type loop_76 (ats_ptr_type arg0, ats_bool_type arg1, ats_ref_type arg2) ; static ats_ptr_type list_extend_01405_ats_bool_type (ats_ptr_type arg0, ats_bool_type arg1) ; static ats_ptr_type transFundec1_fst_73 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2) ; static ats_ptr_type loop_78 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) ; static ats_void_type transFundec1_snd_77 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; static ats_ptr_type aux1_80 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2) ; static ats_void_type aux2_81 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) ; /* partial value template declarations */ /* static temporary variable declarations */ ATSstatic (ats_ptr_type, statmp56) ; ATSstatic (ats_ptr_type, statmp241) ; ATSstatic (ats_ptr_type, statmp245) ; ATSstatic (ats_ptr_type, statmp246) ; ATSstatic (ats_ptr_type, statmp247) ; /* external value variable declarations */ /* function implementations */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 496(line=33, offs=16) -- 1143(line=50, offs=8) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp0) ; ATSlocal (ats_ptr_type, tmp1) ; ATSlocal (ats_ptr_type, tmp2) ; ATSlocal (ats_clo_ref_type, tmp3) ; ATSlocal (ats_int64_type, tmp4) ; ATSlocal (ats_ptr_type, tmp5) ; ATSlocal (ats_ptr_type, tmp6) ; ATSlocal (ats_ptr_type, tmp7) ; ATSlocal (ats_ptr_type, tmp8) ; ATSlocal (ats_ptr_type, tmp9) ; ATSlocal (ats_ptr_type, tmp10) ; ATSlocal (ats_ptr_type, tmp11) ; ATSlocal (ats_ptr_type, tmp12) ; ATSlocal (ats_ptr_type, tmp13) ; ATSlocal (ats_ptr_type, tmp14) ; ATSlocal (ats_ptr_type, tmp15) ; ATSlocal (ats_ptr_type, tmp16) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx: #line 33 "translate.dats" do { /* branch: __ats_lab_0 */ #line 34 "translate.dats" __ats_lab_0_0: #line 34 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_1_0 ; } #line 34 "translate.dats" __ats_lab_0_1: #line 34 "translate.dats" tmp1 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 34 "translate.dats" tmp0 = tmp1 ; break ; /* branch: __ats_lab_1 */ #line 35 "translate.dats" __ats_lab_1_0: #line 35 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 1) { goto __ats_lab_2_0 ; } #line 35 "translate.dats" __ats_lab_1_1: #line 35 "translate.dats" tmp2 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 35 "translate.dats" tmp0 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp0)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp0, atslab_0, tmp2) ; ats_selptrset_mac(anairiats_sum_1, tmp0, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_0) ; break ; /* branch: __ats_lab_2 */ #line 36 "translate.dats" __ats_lab_2_0: #line 36 "translate.dats" // if (((ats_sum_ptr_type)arg0)->tag != 2) { ats_deadcode_failure_handle () ; } #line 36 "translate.dats" __ats_lab_2_1: #line 36 "translate.dats" tmp3 = ats_caselptr_mac(anairiats_sum_2, arg0, atslab_0) ; #line 37 "translate.dats" tmp4 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new () ; #line 38 "translate.dats" tmp5 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp5)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp5, atslab_0, tmp4) ; #line 39 "translate.dats" tmp6 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 40 "translate.dats" tmp7 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 41 "translate.dats" tmp8 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp8)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp8, atslab_0, tmp5) ; ats_selptrset_mac(anairiats_sum_1, tmp8, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_1) ; #line 42 "translate.dats" tmp9 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(tmp3))) (tmp3, tmp6, tmp7) ; #line 43 "translate.dats" tmp10 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp10)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp10, atslab_0, tmp7) ; #line 44 "translate.dats" tmp11 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp11)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp11, atslab_0, tmp5) ; ats_selptrset_mac(anairiats_sum_1, tmp11, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_0) ; #line 45 "translate.dats" tmp12 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp12)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp12, atslab_0, tmp6) ; #line 47 "translate.dats" tmp16 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp16)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp16, atslab_0, tmp11) ; ats_selptrset_mac(anairiats_sum_1, tmp16, atslab_1, tmp12) ; #line 47 "translate.dats" tmp15 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp15)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp15, atslab_0, tmp10) ; ats_selptrset_mac(anairiats_sum_1, tmp15, atslab_1, tmp16) ; #line 47 "translate.dats" tmp14 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp14)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp14, atslab_0, tmp9) ; ats_selptrset_mac(anairiats_sum_1, tmp14, atslab_1, tmp15) ; #line 47 "translate.dats" tmp13 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp13)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp13, atslab_0, tmp8) ; ats_selptrset_mac(anairiats_sum_1, tmp13, atslab_1, tmp14) ; #line 49 "translate.dats" tmp0 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp0)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp0, atslab_0, tmp13) ; ats_selptrset_mac(anairiats_sum_1, tmp0, atslab_1, tmp5) ; break ; } while (0) ; return (tmp0) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 1213(line=55, offs=16) -- 1403(line=61, offs=8) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp17) ; ATSlocal (ats_ptr_type, tmp18) ; ATSlocal (ats_ptr_type, tmp19) ; ATSlocal (ats_clo_ref_type, tmp20) ; ATSlocal (ats_ptr_type, tmp21) ; ATSlocal (ats_ptr_type, tmp22) ; ATSlocal (ats_ptr_type, tmp23) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx: #line 55 "translate.dats" do { /* branch: __ats_lab_3 */ #line 56 "translate.dats" __ats_lab_3_0: #line 56 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 1) { goto __ats_lab_4_0 ; } #line 56 "translate.dats" __ats_lab_3_1: #line 56 "translate.dats" tmp18 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 56 "translate.dats" tmp17 = tmp18 ; break ; /* branch: __ats_lab_4 */ #line 57 "translate.dats" __ats_lab_4_0: #line 57 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_5_0 ; } #line 57 "translate.dats" __ats_lab_4_1: #line 57 "translate.dats" tmp19 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 57 "translate.dats" tmp17 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp17)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp17, atslab_0, tmp19) ; break ; /* branch: __ats_lab_5 */ #line 58 "translate.dats" __ats_lab_5_0: #line 58 "translate.dats" // if (((ats_sum_ptr_type)arg0)->tag != 2) { ats_deadcode_failure_handle () ; } #line 58 "translate.dats" __ats_lab_5_1: #line 58 "translate.dats" tmp20 = ats_caselptr_mac(anairiats_sum_2, arg0, atslab_0) ; #line 59 "translate.dats" tmp21 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 60 "translate.dats" tmp22 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(tmp20))) (tmp20, tmp21, tmp21) ; #line 60 "translate.dats" tmp23 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp23)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp23, atslab_0, tmp21) ; #line 60 "translate.dats" tmp17 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp17)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp17, atslab_0, tmp22) ; ats_selptrset_mac(anairiats_sum_1, tmp17, atslab_1, tmp23) ; break ; } while (0) ; return (tmp17) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 1592(line=70, offs=9) -- 1651(line=70, offs=68) */ ATSstaticdec() ats_ptr_type __ats_fun_3 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp29) ; ATSlocal (ats_ptr_type, tmp30) ; ATSlocal (ats_ptr_type, tmp31) ; ATSlocal (ats_ptr_type, tmp32) ; ATSlocal (ats_ptr_type, tmp33) ; __ats_lab___ats_fun_3: #line 70 "translate.dats" tmp30 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp30)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp30, atslab_0, arg1) ; #line 70 "translate.dats" tmp31 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp31, atslab_0, arg1) ; #line 70 "translate.dats" tmp32 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp31), atslab_1) ; #line 70 "translate.dats" tmp33 = (ats_sum_ptr_type)0 ; #line 70 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp32) = tmp33 ; #line 70 "translate.dats" tmp29 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp29)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp29, atslab_0, tmp30) ; ats_selptrset_mac(anairiats_sum_1, tmp29, atslab_1, tmp31) ; return (tmp29) ; } /* end of [__ats_fun_3] */ typedef struct { ats_fun_ptr_type closure_fun ; } __ats_fun_3_closure_type ; ats_ptr_type __ats_fun_3_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_3 (arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_3_closure_init (__ats_fun_3_closure_type *p_clo) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_3_clofun ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_3_closure_make () { __ats_fun_3_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_3_closure_type)) ; __ats_fun_3_closure_init (p_clo) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 1726(line=73, offs=9) -- 1785(line=73, offs=68) */ ATSstaticdec() ats_ptr_type __ats_fun_4 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp34) ; ATSlocal (ats_ptr_type, tmp35) ; ATSlocal (ats_ptr_type, tmp36) ; ATSlocal (ats_ptr_type, tmp37) ; ATSlocal (ats_ptr_type, tmp38) ; __ats_lab___ats_fun_4: #line 73 "translate.dats" tmp35 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp35)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp35, atslab_0, arg0) ; #line 73 "translate.dats" tmp36 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp36, atslab_0, arg0) ; #line 73 "translate.dats" tmp37 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp36), atslab_1) ; #line 73 "translate.dats" tmp38 = (ats_sum_ptr_type)0 ; #line 73 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp37) = tmp38 ; #line 73 "translate.dats" tmp34 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp34)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp34, atslab_0, tmp35) ; ats_selptrset_mac(anairiats_sum_1, tmp34, atslab_1, tmp36) ; return (tmp34) ; } /* end of [__ats_fun_4] */ typedef struct { ats_fun_ptr_type closure_fun ; } __ats_fun_4_closure_type ; ats_ptr_type __ats_fun_4_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_4 (arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_4_closure_init (__ats_fun_4_closure_type *p_clo) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_4_clofun ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_4_closure_make () { __ats_fun_4_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_4_closure_type)) ; __ats_fun_4_closure_init (p_clo) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 1826(line=75, offs=12) -- 1911(line=76, offs=65) */ ATSstaticdec() ats_ptr_type __ats_fun_5 (ats_ptr_type env0, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp39) ; ATSlocal (ats_ptr_type, tmp40) ; __ats_lab___ats_fun_5: #line 76 "translate.dats" tmp40 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__NEQ) ; #line 76 "translate.dats" tmp39 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp39)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp39, atslab_0, tmp40) ; ats_selptrset_mac(anairiats_sum_6, tmp39, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp39, atslab_2, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_0) ; ats_selptrset_mac(anairiats_sum_6, tmp39, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp39, atslab_4, arg1) ; return (tmp39) ; } /* end of [__ats_fun_5] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; } __ats_fun_5_closure_type ; ats_ptr_type __ats_fun_5_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_5 (((__ats_fun_5_closure_type*)cloptr)->closure_env_0, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_5_closure_init (__ats_fun_5_closure_type *p_clo, ats_ptr_type env0) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_5_clofun ; p_clo->closure_env_0 = env0 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_5_closure_make (ats_ptr_type env0) { __ats_fun_5_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_5_closure_type)) ; __ats_fun_5_closure_init (p_clo, env0) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 1473(line=66, offs=16) -- 2077(line=83, offs=8) */ ATSglobaldec() ats_clo_ref_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_clo_ref_type, tmp24) ; ATSlocal (ats_clo_ref_type, tmp25) ; ATSlocal (ats_ptr_type, tmp26) ; ATSlocal (ats_int_type, tmp27) ; ATSlocal (ats_bool_type, tmp28) ; // ATSlocal_void (tmp41) ; // ATSlocal_void (tmp42) ; // ATSlocal_void (tmp43) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx: #line 66 "translate.dats" do { /* branch: __ats_lab_6 */ #line 67 "translate.dats" __ats_lab_6_0: #line 67 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 2) { goto __ats_lab_7_0 ; } #line 67 "translate.dats" __ats_lab_6_1: #line 67 "translate.dats" tmp25 = ats_caselptr_mac(anairiats_sum_2, arg0, atslab_0) ; #line 67 "translate.dats" tmp24 = tmp25 ; break ; /* branch: __ats_lab_7 */ #line 68 "translate.dats" __ats_lab_7_0: #line 68 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_11_0 ; } #line 68 "translate.dats" __ats_lab_7_1: #line 68 "translate.dats" tmp26 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 68 "translate.dats" do { /* branch: __ats_lab_8 */ #line 69 "translate.dats" __ats_lab_8_0: #line 69 "translate.dats" if (((ats_sum_ptr_type)tmp26)->tag != 0) { goto __ats_lab_9_0 ; } #line 69 "translate.dats" __ats_lab_8_1: #line 69 "translate.dats" tmp27 = ats_caselptr_mac(anairiats_sum_4, tmp26, atslab_0) ; #line 69 "translate.dats" tmp28 = atspre_eq_int_int (tmp27, 0) ; #line 69 "translate.dats" if (!tmp28) { goto __ats_lab_9_1 ; } #line 70 "translate.dats" tmp24 = __ats_fun_3_closure_make () ; break ; /* branch: __ats_lab_9 */ #line 72 "translate.dats" __ats_lab_9_0: #line 72 "translate.dats" if (((ats_sum_ptr_type)tmp26)->tag != 0) { goto __ats_lab_10_0 ; } #line 72 "translate.dats" __ats_lab_9_1: #line 73 "translate.dats" tmp24 = __ats_fun_4_closure_make () ; break ; /* branch: __ats_lab_10 */ #line 75 "translate.dats" __ats_lab_10_0: #line 75 "translate.dats" __ats_lab_10_1: #line 75 "translate.dats" tmp24 = __ats_fun_5_closure_make (tmp26) ; break ; } while (0) ; break ; /* branch: __ats_lab_11 */ #line 79 "translate.dats" __ats_lab_11_0: #line 79 "translate.dats" // if (((ats_sum_ptr_type)arg0)->tag != 1) { ats_deadcode_failure_handle () ; } #line 79 "translate.dats" __ats_lab_11_1: #line 80 "translate.dats" /* tmp41 = */ atspre_prerr_string (ATSstrcst("exit(TIGER)")) ; #line 81 "translate.dats" /* tmp42 = */ atspre_prerr_string (ATSstrcst(": INTERAL ERROR: unCx")) ; #line 81 "translate.dats" /* tmp43 = */ atspre_prerr_newline () ; #line 82 "translate.dats" /* tmp24 = */ ats_exit (1) ; break ; } while (0) ; return (tmp24) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 2154(line=88, offs=23) -- 2199(line=88, offs=68) */ ATSglobaldec() ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ // ATSlocal_void (tmp44) ; ATSlocal (ats_ptr_type, tmp45) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp: #line 88 "translate.dats" tmp45 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (arg1) ; #line 88 "translate.dats" /* tmp44 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__fprint_exp (arg0, tmp45) ; return /* (tmp44) */ ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 2221(line=89, offs=22) -- 2260(line=89, offs=61) */ ATSglobaldec() ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__print_e1xp (ats_ptr_type arg0) { /* local vardec */ // ATSlocal_void (tmp46) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__print_e1xp: #line 89 "translate.dats" /* tmp46 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp (stdout, arg0) ; return /* (tmp46) */ ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__print_e1xp] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 2282(line=90, offs=22) -- 2321(line=90, offs=61) */ ATSglobaldec() ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__prerr_e1xp (ats_ptr_type arg0) { /* local vardec */ // ATSlocal_void (tmp47) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__prerr_e1xp: #line 90 "translate.dats" /* tmp47 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__fprint_e1xp (stderr, arg0) ; return /* (tmp47) */ ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__prerr_e1xp] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 2639(line=107, offs=27) -- 2732(line=108, offs=73) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp48) ; ATSlocal (ats_ptr_type, tmp49) ; ATSlocal (ats_ptr_type, tmp50) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get: #line 107 "translate.dats" do { /* branch: __ats_lab_12 */ #line 108 "translate.dats" __ats_lab_12_0: #line 108 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_13_0 ; } #line 108 "translate.dats" __ats_lab_12_1: #line 108 "translate.dats" tmp49 = ats_caselptr_mac(anairiats_sum_0, arg0, atslab_0) ; #line 108 "translate.dats" tmp48 = tmp49 ; break ; /* branch: __ats_lab_13 */ #line 108 "translate.dats" __ats_lab_13_0: #line 108 "translate.dats" // if (((ats_sum_ptr_type)arg0)->tag != 1) { ats_deadcode_failure_handle () ; } #line 108 "translate.dats" __ats_lab_13_1: #line 108 "translate.dats" tmp50 = ats_caselptr_mac(anairiats_sum_7, arg0, atslab_1) ; #line 108 "translate.dats" tmp48 = tmp50 ; break ; } while (0) ; return (tmp48) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 2874(line=114, offs=26) -- 3121(line=119, offs=20) */ ATSglobaldec() ats_bool_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__eq_level_level (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_bool_type, tmp51) ; ATSlocal (ats_int64_type, tmp52) ; ATSlocal (ats_int64_type, tmp53) ; ATSlocal (ats_bool_type, tmp54) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__eq_level_level: #line 114 "translate.dats" do { /* branch: __ats_lab_14 */ #line 115 "translate.dats" __ats_lab_14_0: #line 115 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_15_0 ; } #line 115 "translate.dats" __ats_lab_14_1: #line 115 "translate.dats" if (((ats_sum_ptr_type)arg1)->tag != 0) { goto __ats_lab_16_1 ; } #line 115 "translate.dats" __ats_lab_14_2: #line 115 "translate.dats" tmp51 = ats_true_bool ; break ; /* branch: __ats_lab_15 */ #line 116 "translate.dats" __ats_lab_15_0: #line 116 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 1) { goto __ats_lab_16_0 ; } #line 116 "translate.dats" __ats_lab_15_1: #line 116 "translate.dats" if (((ats_sum_ptr_type)arg1)->tag != 1) { goto __ats_lab_16_1 ; } #line 116 "translate.dats" __ats_lab_15_2: #line 116 "translate.dats" tmp52 = ats_caselptr_mac(anairiats_sum_7, arg0, atslab_0) ; #line 116 "translate.dats" tmp53 = ats_caselptr_mac(anairiats_sum_7, arg1, atslab_0) ; #line 117 "translate.dats" tmp54 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__eq_stamp_stamp (tmp52, tmp53) ; #line 117 "translate.dats" if (tmp54) { #line 117 "translate.dats" tmp51 = ats_true_bool ; } else { #line 117 "translate.dats" tmp51 = ats_false_bool ; } /* end of [if] */ break ; /* branch: __ats_lab_16 */ #line 119 "translate.dats" __ats_lab_16_0: #line 119 "translate.dats" __ats_lab_16_1: #line 119 "translate.dats" __ats_lab_16_2: #line 119 "translate.dats" tmp51 = ats_false_bool ; break ; } while (0) ; return (tmp51) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__eq_level_level] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 3300(line=133, offs=12) -- 3375(line=134, offs=48) */ ATSstaticdec() ats_int_type __ats_fun_11 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_int_type, tmp55) ; __ats_lab___ats_fun_11: #line 134 "translate.dats" tmp55 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__compare_symbol_symbol (arg0, arg1) ; return (tmp55) ; } /* end of [__ats_fun_11] */ typedef struct { ats_fun_ptr_type closure_fun ; } __ats_fun_11_closure_type ; ats_int_type __ats_fun_11_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_11 (arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_11_closure_init (__ats_fun_11_closure_type *p_clo) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_11_clofun ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_11_closure_make () { __ats_fun_11_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_11_closure_type)) ; __ats_fun_11_closure_init (p_clo) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 2673(line=105, offs=26) -- 2682(line=105, offs=35) */ ATSstaticdec() ats_ptr_type funmap_empty_01910_ () { /* local vardec */ ATSlocal (ats_ptr_type, tmp58) ; __ats_lab_funmap_empty_01910_: #line 105 "funmap_avltree.dats" tmp58 = (ats_sum_ptr_type)0 ; return (tmp58) ; } /* end of [funmap_empty_01910_] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 3586(line=146, offs=21) -- 3611(line=146, offs=46) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_empty () { /* local vardec */ ATSlocal (ats_ptr_type, tmp57) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_empty: #line 146 "translate.dats" tmp57 = funmap_empty_01910_ () ; return (tmp57) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_empty] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 554(line=29, offs=32) -- 582(line=29, offs=60) */ ATSstaticdec() ats_int_type compare_key_key_01909_ats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_clo_ref_type arg2) { /* local vardec */ ATSlocal (ats_int_type, tmp70) ; __ats_lab_compare_key_key_01909_ats_ptr_type: #line 29 "funmap_avltree.dats" tmp70 = ((ats_int_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(arg2))) (arg2, arg0, arg1) ; return (tmp70) ; } /* end of [compare_key_key_01909_ats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 3842(line=149, offs=3) -- 3939(line=151, offs=4) */ ATSstaticdec() ats_int_type avltree_height_01359_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_int_type, tmp74) ; ATSlocal (ats_int_type, tmp75) ; __ats_lab_avltree_height_01359_ats_ptr_type_2cats_ptr_type: #line 150 "funmap_avltree.dats" do { /* branch: __ats_lab_18 */ #line 150 "funmap_avltree.dats" __ats_lab_18_0: #line 150 "funmap_avltree.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_19_0 ; } #line 150 "funmap_avltree.dats" __ats_lab_18_1: #line 150 "funmap_avltree.dats" tmp75 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_0) ; #line 150 "funmap_avltree.dats" tmp74 = tmp75 ; break ; /* branch: __ats_lab_19 */ #line 150 "funmap_avltree.dats" __ats_lab_19_0: #line 150 "funmap_avltree.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 150 "funmap_avltree.dats" __ats_lab_19_1: #line 150 "funmap_avltree.dats" tmp74 = 0 ; break ; } while (0) ; return (tmp74) ; } /* end of [avltree_height_01359_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 4781(line=176, offs=60) -- 5337(line=191, offs=4) */ ATSstaticdec() ats_ptr_type avltree_rrotate_01378_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) { /* local vardec */ ATSlocal (ats_ptr_type, tmp81) ; ATSlocal (ats_int_type, tmp82) ; ATSlocal (ats_ptr_type, tmp83) ; ATSlocal (ats_ptr_type, tmp84) ; ATSlocal (ats_ptr_type, tmp85) ; ATSlocal (ats_ptr_type, tmp86) ; ATSlocal (ats_int_type, tmp87) ; ATSlocal (ats_int_type, tmp88) ; ATSlocal (ats_bool_type, tmp89) ; ATSlocal (ats_int_type, tmp90) ; ATSlocal (ats_ptr_type, tmp91) ; ATSlocal (ats_int_type, tmp92) ; ATSlocal (ats_ptr_type, tmp93) ; ATSlocal (ats_ptr_type, tmp94) ; ATSlocal (ats_ptr_type, tmp95) ; ATSlocal (ats_ptr_type, tmp96) ; ATSlocal (ats_ptr_type, tmp97) ; ATSlocal (ats_ptr_type, tmp98) ; __ats_lab_avltree_rrotate_01378_ats_ptr_type_2cats_ptr_type: #line 181 "funmap_avltree.dats" // if (arg2 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 181 "funmap_avltree.dats" tmp82 = ats_caselptr_mac(anairiats_sum_8, arg2, atslab_0) ; #line 181 "funmap_avltree.dats" tmp83 = ats_caselptr_mac(anairiats_sum_8, arg2, atslab_1) ; #line 181 "funmap_avltree.dats" tmp84 = ats_caselptr_mac(anairiats_sum_8, arg2, atslab_2) ; #line 181 "funmap_avltree.dats" tmp85 = ats_caselptr_mac(anairiats_sum_8, arg2, atslab_3) ; #line 181 "funmap_avltree.dats" tmp86 = ats_caselptr_mac(anairiats_sum_8, arg2, atslab_4) ; #line 182 "funmap_avltree.dats" tmp87 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp85) ; #line 182 "funmap_avltree.dats" tmp88 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp86) ; #line 184 "funmap_avltree.dats" tmp89 = atspre_igte (tmp87, tmp88) ; #line 184 "funmap_avltree.dats" if (tmp89) { #line 185 "funmap_avltree.dats" tmp90 = atspre_iadd (tmp88, 2) ; #line 185 "funmap_avltree.dats" tmp92 = atspre_iadd (tmp88, 1) ; #line 185 "funmap_avltree.dats" tmp91 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp91, atslab_0, tmp92) ; ats_selptrset_mac(anairiats_sum_8, tmp91, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_8, tmp91, atslab_2, arg1) ; ats_selptrset_mac(anairiats_sum_8, tmp91, atslab_3, tmp86) ; ats_selptrset_mac(anairiats_sum_8, tmp91, atslab_4, arg3) ; #line 185 "funmap_avltree.dats" tmp81 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_0, tmp90) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_1, tmp83) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_2, tmp84) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_3, tmp85) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_4, tmp91) ; } else { #line 187 "funmap_avltree.dats" // if (tmp86 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 187 "funmap_avltree.dats" tmp93 = ats_caselptr_mac(anairiats_sum_8, tmp86, atslab_1) ; #line 187 "funmap_avltree.dats" tmp94 = ats_caselptr_mac(anairiats_sum_8, tmp86, atslab_2) ; #line 187 "funmap_avltree.dats" tmp95 = ats_caselptr_mac(anairiats_sum_8, tmp86, atslab_3) ; #line 187 "funmap_avltree.dats" tmp96 = ats_caselptr_mac(anairiats_sum_8, tmp86, atslab_4) ; #line 189 "funmap_avltree.dats" tmp97 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp97, atslab_0, tmp88) ; ats_selptrset_mac(anairiats_sum_8, tmp97, atslab_1, tmp83) ; ats_selptrset_mac(anairiats_sum_8, tmp97, atslab_2, tmp84) ; ats_selptrset_mac(anairiats_sum_8, tmp97, atslab_3, tmp85) ; ats_selptrset_mac(anairiats_sum_8, tmp97, atslab_4, tmp95) ; #line 189 "funmap_avltree.dats" tmp98 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp98, atslab_0, tmp88) ; ats_selptrset_mac(anairiats_sum_8, tmp98, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_8, tmp98, atslab_2, arg1) ; ats_selptrset_mac(anairiats_sum_8, tmp98, atslab_3, tmp96) ; ats_selptrset_mac(anairiats_sum_8, tmp98, atslab_4, arg3) ; #line 189 "funmap_avltree.dats" tmp81 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_0, tmp82) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_1, tmp93) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_2, tmp94) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_3, tmp97) ; ats_selptrset_mac(anairiats_sum_8, tmp81, atslab_4, tmp98) ; } /* end of [if] */ return (tmp81) ; } /* end of [avltree_rrotate_01378_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 4081(line=156, offs=60) -- 4637(line=171, offs=4) */ ATSstaticdec() ats_ptr_type avltree_lrotate_01362_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) { /* local vardec */ ATSlocal (ats_ptr_type, tmp107) ; ATSlocal (ats_int_type, tmp108) ; ATSlocal (ats_ptr_type, tmp109) ; ATSlocal (ats_ptr_type, tmp110) ; ATSlocal (ats_ptr_type, tmp111) ; ATSlocal (ats_ptr_type, tmp112) ; ATSlocal (ats_int_type, tmp113) ; ATSlocal (ats_int_type, tmp114) ; ATSlocal (ats_bool_type, tmp115) ; ATSlocal (ats_int_type, tmp116) ; ATSlocal (ats_ptr_type, tmp117) ; ATSlocal (ats_int_type, tmp118) ; ATSlocal (ats_ptr_type, tmp119) ; ATSlocal (ats_ptr_type, tmp120) ; ATSlocal (ats_ptr_type, tmp121) ; ATSlocal (ats_ptr_type, tmp122) ; ATSlocal (ats_ptr_type, tmp123) ; ATSlocal (ats_ptr_type, tmp124) ; __ats_lab_avltree_lrotate_01362_ats_ptr_type_2cats_ptr_type: #line 161 "funmap_avltree.dats" // if (arg3 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 161 "funmap_avltree.dats" tmp108 = ats_caselptr_mac(anairiats_sum_8, arg3, atslab_0) ; #line 161 "funmap_avltree.dats" tmp109 = ats_caselptr_mac(anairiats_sum_8, arg3, atslab_1) ; #line 161 "funmap_avltree.dats" tmp110 = ats_caselptr_mac(anairiats_sum_8, arg3, atslab_2) ; #line 161 "funmap_avltree.dats" tmp111 = ats_caselptr_mac(anairiats_sum_8, arg3, atslab_3) ; #line 161 "funmap_avltree.dats" tmp112 = ats_caselptr_mac(anairiats_sum_8, arg3, atslab_4) ; #line 162 "funmap_avltree.dats" tmp113 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp111) ; #line 162 "funmap_avltree.dats" tmp114 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp112) ; #line 164 "funmap_avltree.dats" tmp115 = atspre_ilte (tmp113, tmp114) ; #line 164 "funmap_avltree.dats" if (tmp115) { #line 165 "funmap_avltree.dats" tmp116 = atspre_iadd (tmp113, 2) ; #line 165 "funmap_avltree.dats" tmp118 = atspre_iadd (tmp113, 1) ; #line 165 "funmap_avltree.dats" tmp117 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp117, atslab_0, tmp118) ; ats_selptrset_mac(anairiats_sum_8, tmp117, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_8, tmp117, atslab_2, arg1) ; ats_selptrset_mac(anairiats_sum_8, tmp117, atslab_3, arg2) ; ats_selptrset_mac(anairiats_sum_8, tmp117, atslab_4, tmp111) ; #line 165 "funmap_avltree.dats" tmp107 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_0, tmp116) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_1, tmp109) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_2, tmp110) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_3, tmp117) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_4, tmp112) ; } else { #line 167 "funmap_avltree.dats" // if (tmp111 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 167 "funmap_avltree.dats" tmp119 = ats_caselptr_mac(anairiats_sum_8, tmp111, atslab_1) ; #line 167 "funmap_avltree.dats" tmp120 = ats_caselptr_mac(anairiats_sum_8, tmp111, atslab_2) ; #line 167 "funmap_avltree.dats" tmp121 = ats_caselptr_mac(anairiats_sum_8, tmp111, atslab_3) ; #line 167 "funmap_avltree.dats" tmp122 = ats_caselptr_mac(anairiats_sum_8, tmp111, atslab_4) ; #line 169 "funmap_avltree.dats" tmp123 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp123, atslab_0, tmp113) ; ats_selptrset_mac(anairiats_sum_8, tmp123, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_8, tmp123, atslab_2, arg1) ; ats_selptrset_mac(anairiats_sum_8, tmp123, atslab_3, arg2) ; ats_selptrset_mac(anairiats_sum_8, tmp123, atslab_4, tmp121) ; #line 169 "funmap_avltree.dats" tmp124 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp124, atslab_0, tmp113) ; ats_selptrset_mac(anairiats_sum_8, tmp124, atslab_1, tmp109) ; ats_selptrset_mac(anairiats_sum_8, tmp124, atslab_2, tmp110) ; ats_selptrset_mac(anairiats_sum_8, tmp124, atslab_3, tmp122) ; ats_selptrset_mac(anairiats_sum_8, tmp124, atslab_4, tmp112) ; #line 169 "funmap_avltree.dats" tmp107 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_0, tmp108) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_1, tmp119) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_2, tmp120) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_3, tmp123) ; ats_selptrset_mac(anairiats_sum_8, tmp107, atslab_4, tmp124) ; } /* end of [if] */ return (tmp107) ; } /* end of [avltree_lrotate_01362_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 5779(line=208, offs=7) -- 6968(line=239, offs=6) */ ATSstaticdec() ats_ptr_type insert_17 (ats_ptr_type env0, ats_ptr_type env1, ats_clo_ref_type env2, ats_ptr_type arg0, ats_ref_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp63) ; ATSlocal (ats_int_type, tmp64) ; ATSlocal (ats_ptr_type, tmp65) ; ATSlocal (ats_ptr_type, tmp66) ; ATSlocal (ats_ptr_type, tmp67) ; ATSlocal (ats_ptr_type, tmp68) ; ATSlocal (ats_int_type, tmp69) ; ATSlocal (ats_bool_type, tmp71) ; ATSlocal (ats_ptr_type, tmp72) ; ATSlocal (ats_int_type, tmp73) ; ATSlocal (ats_int_type, tmp76) ; ATSlocal (ats_bool_type, tmp77) ; ATSlocal (ats_int_type, tmp78) ; ATSlocal (ats_int_type, tmp79) ; ATSlocal (ats_int_type, tmp80) ; ATSlocal (ats_bool_type, tmp99) ; ATSlocal (ats_ptr_type, tmp100) ; ATSlocal (ats_int_type, tmp101) ; ATSlocal (ats_int_type, tmp102) ; ATSlocal (ats_bool_type, tmp103) ; ATSlocal (ats_int_type, tmp104) ; ATSlocal (ats_int_type, tmp105) ; ATSlocal (ats_int_type, tmp106) ; ATSlocal (ats_ptr_type, tmp125) ; ATSlocal (ats_ptr_type, tmp126) ; ATSlocal (ats_ptr_type, tmp127) ; ATSlocal (ats_ptr_type, tmp128) ; ATSlocal (ats_ptr_type, tmp129) ; __ats_lab_insert_17: #line 210 "funmap_avltree.dats" do { /* branch: __ats_lab_17 */ #line 211 "funmap_avltree.dats" __ats_lab_17_0: #line 211 "funmap_avltree.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_20_0 ; } #line 211 "funmap_avltree.dats" __ats_lab_17_1: #line 211 "funmap_avltree.dats" tmp64 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_0) ; #line 211 "funmap_avltree.dats" tmp65 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_1) ; #line 211 "funmap_avltree.dats" tmp66 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_2) ; #line 211 "funmap_avltree.dats" tmp67 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_3) ; #line 211 "funmap_avltree.dats" tmp68 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_4) ; #line 212 "funmap_avltree.dats" tmp69 = compare_key_key_01909_ats_ptr_type (env0, tmp65, env2) ; #line 214 "funmap_avltree.dats" tmp71 = atspre_ilt (tmp69, 0) ; #line 214 "funmap_avltree.dats" if (tmp71) { #line 215 "funmap_avltree.dats" tmp72 = insert_17 (env0, env1, env2, tmp67, arg1) ; #line 216 "funmap_avltree.dats" tmp73 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp72) ; #line 216 "funmap_avltree.dats" tmp76 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp68) ; #line 218 "funmap_avltree.dats" tmp78 = atspre_isub (tmp73, tmp76) ; #line 218 "funmap_avltree.dats" tmp77 = atspre_ilte (tmp78, 1) ; #line 218 "funmap_avltree.dats" if (tmp77) { #line 219 "funmap_avltree.dats" tmp80 = atspre_imax (tmp73, tmp76) ; #line 219 "funmap_avltree.dats" tmp79 = atspre_iadd (tmp80, 1) ; #line 219 "funmap_avltree.dats" tmp63 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_0, tmp79) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_1, tmp65) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_2, tmp66) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_3, tmp72) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_4, tmp68) ; } else { #line 221 "funmap_avltree.dats" tmp63 = avltree_rrotate_01378_ats_ptr_type_2cats_ptr_type (tmp65, tmp66, tmp72, tmp68) ; } /* end of [if] */ } else { #line 223 "funmap_avltree.dats" tmp99 = atspre_igt (tmp69, 0) ; #line 223 "funmap_avltree.dats" if (tmp99) { #line 224 "funmap_avltree.dats" tmp100 = insert_17 (env0, env1, env2, tmp68, arg1) ; #line 225 "funmap_avltree.dats" tmp101 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp67) ; #line 225 "funmap_avltree.dats" tmp102 = avltree_height_01359_ats_ptr_type_2cats_ptr_type (tmp100) ; #line 227 "funmap_avltree.dats" tmp104 = atspre_isub (tmp102, tmp101) ; #line 227 "funmap_avltree.dats" tmp103 = atspre_ilte (tmp104, 1) ; #line 227 "funmap_avltree.dats" if (tmp103) { #line 228 "funmap_avltree.dats" tmp106 = atspre_imax (tmp101, tmp102) ; #line 228 "funmap_avltree.dats" tmp105 = atspre_iadd (tmp106, 1) ; #line 228 "funmap_avltree.dats" tmp63 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_0, tmp105) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_1, tmp65) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_2, tmp66) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_3, tmp67) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_4, tmp100) ; } else { #line 230 "funmap_avltree.dats" tmp63 = avltree_lrotate_01362_ats_ptr_type_2cats_ptr_type (tmp65, tmp66, tmp67, tmp100) ; } /* end of [if] */ } else { #line 233 "funmap_avltree.dats" ats_ptrget_mac(ats_int_type, arg1) = 1 ; #line 233 "funmap_avltree.dats" tmp125 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp125, atslab_0, env1) ; ats_selptrset_mac(anairiats_sum_5, tmp125, atslab_1, tmp66) ; #line 233 "funmap_avltree.dats" tmp63 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_0, tmp64) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_1, tmp65) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_2, tmp125) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_3, tmp67) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_4, tmp68) ; } /* end of [if] */ } /* end of [if] */ break ; /* branch: __ats_lab_20 */ #line 236 "funmap_avltree.dats" __ats_lab_20_0: #line 236 "funmap_avltree.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 236 "funmap_avltree.dats" __ats_lab_20_1: #line 237 "funmap_avltree.dats" ats_ptrget_mac(ats_int_type, arg1) = 0 ; #line 237 "funmap_avltree.dats" tmp127 = (ats_sum_ptr_type)0 ; #line 237 "funmap_avltree.dats" tmp126 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp126, atslab_0, env1) ; ats_selptrset_mac(anairiats_sum_5, tmp126, atslab_1, tmp127) ; #line 237 "funmap_avltree.dats" tmp128 = (ats_sum_ptr_type)0 ; #line 237 "funmap_avltree.dats" tmp129 = (ats_sum_ptr_type)0 ; #line 237 "funmap_avltree.dats" tmp63 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_0, 1) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_2, tmp126) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_3, tmp128) ; ats_selptrset_mac(anairiats_sum_8, tmp63, atslab_4, tmp129) ; break ; } while (0) ; return (tmp63) ; } /* end of [insert_17] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; ats_clo_ref_type closure_env_2 ; } insert_17_closure_type ; ats_ptr_type insert_17_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ref_type arg1) { return insert_17 (((insert_17_closure_type*)cloptr)->closure_env_0, ((insert_17_closure_type*)cloptr)->closure_env_1, ((insert_17_closure_type*)cloptr)->closure_env_2, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type insert_17_closure_init (insert_17_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1, ats_clo_ref_type env2) { p_clo->closure_fun = (ats_fun_ptr_type)&insert_17_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; p_clo->closure_env_2 = env2 ; return ; } /* end of function */ ats_clo_ptr_type insert_17_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_clo_ref_type env2) { insert_17_closure_type *p_clo = ATS_MALLOC(sizeof(insert_17_closure_type)) ; insert_17_closure_init (p_clo, env0, env1, env2) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 5719(line=207, offs=3) -- 6989(line=240, offs=2) */ ATSstaticdec() ats_ptr_type funmap_insert_status_01916_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_clo_ref_type arg3, ats_ref_type arg4) { /* local vardec */ ATSlocal (ats_ptr_type, tmp62) ; __ats_lab_funmap_insert_status_01916_ats_ptr_type_2cats_ptr_type: #line 207 "funmap_avltree.dats" tmp62 = insert_17 (arg1, arg2, arg3, arg0, arg4) ; return (tmp62) ; } /* end of [funmap_insert_status_01916_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 5475(line=197, offs=34) -- 5587(line=201, offs=4) */ ATSstaticdec() ats_ptr_type funmap_insert_01915_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_clo_ref_type arg3) { /* local vardec */ ATSlocal (ats_ptr_type, tmp60) ; ATSlocal (ats_int_type, tmp61) ; __ats_lab_funmap_insert_01915_ats_ptr_type_2cats_ptr_type: #line 198 "funmap_avltree.dats" /* ats_int_type tmp61 ; */ #line 200 "funmap_avltree.dats" tmp60 = funmap_insert_status_01916_ats_ptr_type_2cats_ptr_type (arg0, arg1, arg2, arg3, (&tmp61)) ; return (tmp60) ; } /* end of [funmap_insert_01915_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 3696(line=150, offs=22) -- 3765(line=151, offs=52) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp59) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert: #line 151 "translate.dats" tmp59 = funmap_insert_01915_ats_ptr_type_2cats_ptr_type (arg0, arg1, arg2, statmp56) ; return (tmp59) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 3305(line=130, offs=7) -- 3729(line=143, offs=6) */ ATSstaticdec() ats_ptr_type search_24 (ats_ptr_type env0, ats_clo_ref_type env1, ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp133) ; ATSlocal (ats_ptr_type, tmp134) ; ATSlocal (ats_ptr_type, tmp135) ; ATSlocal (ats_ptr_type, tmp136) ; ATSlocal (ats_ptr_type, tmp137) ; ATSlocal (ats_int_type, tmp138) ; ATSlocal (ats_bool_type, tmp139) ; ATSlocal (ats_bool_type, tmp140) ; ATSlocal (ats_ptr_type, tmp141) ; __ats_lab_search_24: #line 132 "funmap_avltree.dats" do { /* branch: __ats_lab_21 */ #line 133 "funmap_avltree.dats" __ats_lab_21_0: #line 133 "funmap_avltree.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_22_0 ; } #line 133 "funmap_avltree.dats" __ats_lab_21_1: #line 133 "funmap_avltree.dats" tmp134 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_1) ; #line 133 "funmap_avltree.dats" tmp135 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_2) ; #line 133 "funmap_avltree.dats" tmp136 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_3) ; #line 133 "funmap_avltree.dats" tmp137 = ats_caselptr_mac(anairiats_sum_8, arg0, atslab_4) ; #line 134 "funmap_avltree.dats" tmp138 = compare_key_key_01909_ats_ptr_type (env0, tmp134, env1) ; #line 136 "funmap_avltree.dats" tmp139 = atspre_ilt (tmp138, 0) ; #line 136 "funmap_avltree.dats" if (tmp139) { #line 136 "funmap_avltree.dats" arg0 = tmp136 ; #line 136 "funmap_avltree.dats" goto __ats_lab_search_24 ; // tail call } else { #line 136 "funmap_avltree.dats" tmp140 = atspre_igt (tmp138, 0) ; #line 136 "funmap_avltree.dats" if (tmp140) { #line 136 "funmap_avltree.dats" arg0 = tmp137 ; #line 136 "funmap_avltree.dats" goto __ats_lab_search_24 ; // tail call } else { #line 137 "funmap_avltree.dats" // if (tmp135 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 137 "funmap_avltree.dats" tmp141 = ats_caselptr_mac(anairiats_sum_5, tmp135, atslab_0) ; #line 139 "funmap_avltree.dats" tmp133 = ATS_MALLOC(sizeof(anairiats_sum_9)) ; ats_selptrset_mac(anairiats_sum_9, tmp133, atslab_0, tmp141) ; } /* end of [if] */ } /* end of [if] */ break ; /* branch: __ats_lab_22 */ #line 142 "funmap_avltree.dats" __ats_lab_22_0: #line 142 "funmap_avltree.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 142 "funmap_avltree.dats" __ats_lab_22_1: #line 142 "funmap_avltree.dats" tmp133 = (ats_sum_ptr_type)0 ; break ; } while (0) ; return (tmp133) ; } /* end of [search_24] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_clo_ref_type closure_env_1 ; } search_24_closure_type ; ats_ptr_type search_24_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) { return search_24 (((search_24_closure_type*)cloptr)->closure_env_0, ((search_24_closure_type*)cloptr)->closure_env_1, arg0) ; } /* end of function */ ATSinline() ats_void_type search_24_closure_init (search_24_closure_type *p_clo, ats_ptr_type env0, ats_clo_ref_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&search_24_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type search_24_closure_make (ats_ptr_type env0, ats_clo_ref_type env1) { search_24_closure_type *p_clo = ATS_MALLOC(sizeof(search_24_closure_type)) ; search_24_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/LIB/funmap_avltree.dats: 3265(line=129, offs=34) -- 3750(line=144, offs=2) */ ATSstaticdec() ats_ptr_type funmap_search_01914_ats_ptr_type_2cats_ptr_type (ats_ptr_type arg0, ats_ptr_type arg1, ats_clo_ref_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp132) ; __ats_lab_funmap_search_01914_ats_ptr_type_2cats_ptr_type: #line 129 "funmap_avltree.dats" tmp132 = search_24 (arg1, arg2, arg0) ; return (tmp132) ; } /* end of [funmap_search_01914_ats_ptr_type_2cats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 3863(line=155, offs=22) -- 4226(line=168, offs=4) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp130) ; ATSlocal (ats_ptr_type, tmp131) ; ATSlocal (ats_ptr_type, tmp142) ; // ATSlocal_void (tmp143) ; // ATSlocal_void (tmp144) ; // ATSlocal_void (tmp145) ; // ATSlocal_void (tmp146) ; // ATSlocal_void (tmp147) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search: #line 156 "translate.dats" tmp131 = funmap_search_01914_ats_ptr_type_2cats_ptr_type (arg0, arg1, statmp56) ; #line 158 "translate.dats" do { /* branch: __ats_lab_23 */ #line 159 "translate.dats" __ats_lab_23_0: #line 159 "translate.dats" if (tmp131 == (ats_sum_ptr_type)0) { goto __ats_lab_24_0 ; } #line 159 "translate.dats" __ats_lab_23_1: #line 159 "translate.dats" tmp142 = ats_caselptr_mac(anairiats_sum_9, tmp131, atslab_0) ; #line 159 "translate.dats" ATS_FREE(tmp131) ; #line 159 "translate.dats" tmp130 = tmp142 ; break ; /* branch: __ats_lab_24 */ #line 159 "translate.dats" __ats_lab_24_0: #line 159 "translate.dats" // if (tmp131 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 159 "translate.dats" __ats_lab_24_1: #line 160 "translate.dats" /* tmp143 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 161 "translate.dats" /* tmp144 = */ atspre_prerr_string (ATSstrcst(": env_search: unrecognized symbol [")) ; #line 162 "translate.dats" /* tmp145 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__prerr_symbol (arg1) ; #line 163 "translate.dats" /* tmp146 = */ atspre_prerr_string (ATSstrcst("]")) ; #line 164 "translate.dats" /* tmp147 = */ atspre_prerr_newline () ; #line 165 "translate.dats" /* tmp130 = */ ats_exit (1) ; break ; } while (0) ; return (tmp130) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 49564(line=1707, offs=7) -- 49690(line=1709, offs=60) */ ATSstaticdec() ats_ptr_type loop_27 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp151) ; ATSlocal (ats_ptr_type, tmp152) ; ATSlocal (ats_ptr_type, tmp153) ; __ats_lab_loop_27: #line 1708 "list.dats" do { /* branch: __ats_lab_26 */ #line 1709 "list.dats" __ats_lab_26_0: #line 1709 "list.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_27_0 ; } #line 1709 "list.dats" __ats_lab_26_1: #line 1709 "list.dats" tmp152 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 1709 "list.dats" tmp153 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 1709 "list.dats" arg0 = tmp152 ; #line 1709 "list.dats" arg1 = tmp153 ; #line 1709 "list.dats" goto __ats_lab_loop_27 ; // tail call break ; /* branch: __ats_lab_27 */ #line 1709 "list.dats" __ats_lab_27_0: #line 1709 "list.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 1709 "list.dats" __ats_lab_27_1: #line 1709 "list.dats" tmp151 = arg0 ; break ; } while (0) ; return (tmp151) ; } /* end of [loop_27] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 49527(line=1705, offs=11) -- 49742(line=1712, offs=2) */ ATSstaticdec() ats_ptr_type list_last_01475_ats_ptr_type (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp150) ; ATSlocal (ats_ptr_type, tmp154) ; ATSlocal (ats_ptr_type, tmp155) ; __ats_lab_list_last_01475_ats_ptr_type: #line 1711 "list.dats" // if (arg0 == (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 1711 "list.dats" tmp154 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 1711 "list.dats" tmp155 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 1706 "list.dats" tmp150 = loop_27 (tmp154, tmp155) ; return (tmp150) ; } /* end of [list_last_01475_ats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 4301(line=174, offs=5) -- 4610(line=186, offs=4) */ ATSstaticdec() ats_ptr_type frame_stalnk_get_25 (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp148) ; ATSlocal (ats_ptr_type, tmp149) ; // ATSlocal_void (tmp156) ; // ATSlocal_void (tmp157) ; // ATSlocal_void (tmp158) ; __ats_lab_frame_stalnk_get_25: #line 175 "translate.dats" tmp149 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_arglst_get (arg0) ; #line 177 "translate.dats" do { /* branch: __ats_lab_25 */ #line 178 "translate.dats" __ats_lab_25_0: #line 178 "translate.dats" if (tmp149 == (ats_sum_ptr_type)0) { goto __ats_lab_28_0 ; } #line 178 "translate.dats" __ats_lab_25_1: #line 178 "translate.dats" tmp148 = list_last_01475_ats_ptr_type (tmp149) ; break ; /* branch: __ats_lab_28 */ #line 179 "translate.dats" __ats_lab_28_0: #line 179 "translate.dats" // if (tmp149 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 179 "translate.dats" __ats_lab_28_1: #line 180 "translate.dats" /* tmp156 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 181 "translate.dats" /* tmp157 = */ atspre_prerr_string (ATSstrcst(": frame_stalnk_get: arglst is empty")) ; #line 182 "translate.dats" /* tmp158 = */ atspre_prerr_newline () ; #line 183 "translate.dats" /* tmp148 = */ ats_exit (1) ; break ; } while (0) ; return (tmp148) ; } /* end of [frame_stalnk_get_25] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 5103(line=202, offs=7) -- 5626(line=217, offs=8) */ ATSstaticdec() ats_ptr_type loop_29 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp160) ; ATSlocal (ats_bool_type, tmp161) ; ATSlocal (ats_ptr_type, tmp162) ; ATSlocal (ats_ptr_type, tmp163) ; ATSlocal (ats_ptr_type, tmp164) ; ATSlocal (ats_ptr_type, tmp165) ; // ATSlocal_void (tmp166) ; // ATSlocal_void (tmp167) ; __ats_lab_loop_29: #line 205 "translate.dats" tmp161 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__eq_level_level (arg0, arg1) ; #line 205 "translate.dats" if (tmp161) { #line 205 "translate.dats" tmp160 = arg2 ; } else { #line 205 "translate.dats" do { /* branch: __ats_lab_29 */ #line 206 "translate.dats" __ats_lab_29_0: #line 206 "translate.dats" if (((ats_sum_ptr_type)arg1)->tag != 1) { goto __ats_lab_30_0 ; } #line 206 "translate.dats" __ats_lab_29_1: #line 206 "translate.dats" tmp162 = ats_caselptr_mac(anairiats_sum_7, arg1, atslab_1) ; #line 206 "translate.dats" tmp163 = ats_caselptr_mac(anairiats_sum_7, arg1, atslab_2) ; #line 207 "translate.dats" tmp164 = frame_stalnk_get_25 (tmp162) ; #line 208 "translate.dats" tmp165 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_make_access (arg2, tmp164) ; #line 210 "translate.dats" arg0 = arg0 ; #line 210 "translate.dats" arg1 = tmp163 ; #line 210 "translate.dats" arg2 = tmp165 ; #line 210 "translate.dats" goto __ats_lab_loop_29 ; // tail call break ; /* branch: __ats_lab_30 */ #line 212 "translate.dats" __ats_lab_30_0: #line 212 "translate.dats" // if (((ats_sum_ptr_type)arg1)->tag != 0) { ats_deadcode_failure_handle () ; } #line 212 "translate.dats" __ats_lab_30_1: #line 213 "translate.dats" /* tmp166 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR: stalnk_compute: lev = LEVELtop")) ; #line 214 "translate.dats" /* tmp167 = */ atspre_prerr_newline () ; #line 215 "translate.dats" /* tmp160 = */ ats_exit (1) ; break ; } while (0) ; } /* end of [if] */ return (tmp160) ; } /* end of [loop_29] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 4644(line=188, offs=4) -- 5697(line=221, offs=4) */ ATSstaticdec() ats_ptr_type frame_baseptr_compute_28 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp159) ; __ats_lab_frame_baseptr_compute_28: #line 220 "translate.dats" tmp159 = loop_29 (arg0, arg1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_FP) ; return (tmp159) ; } /* end of [frame_baseptr_compute_28] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 5729(line=223, offs=4) -- 5898(line=228, offs=4) */ ATSstaticdec() ats_ptr_type exp_make_level_access_30 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp168) ; ATSlocal (ats_ptr_type, tmp169) ; __ats_lab_exp_make_level_access_30: #line 225 "translate.dats" tmp169 = frame_baseptr_compute_28 (arg0, arg1) ; #line 227 "translate.dats" tmp168 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_make_access (tmp169, arg2) ; return (tmp168) ; } /* end of [exp_make_level_access_30] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 7553(line=284, offs=13) -- 7830(line=289, offs=34) */ ATSstaticdec() ats_int_type loop_32 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2) { /* local vardec */ ATSlocal (ats_int_type, tmp191) ; ATSlocal (ats_ptr_type, tmp192) ; ATSlocal (ats_ptr_type, tmp193) ; ATSlocal (ats_bool_type, tmp194) ; ATSlocal (ats_int_type, tmp195) ; __ats_lab_loop_32: #line 285 "translate.dats" do { /* branch: __ats_lab_37 */ #line 286 "translate.dats" __ats_lab_37_0: #line 286 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_38_0 ; } #line 286 "translate.dats" __ats_lab_37_1: #line 286 "translate.dats" tmp192 = ats_caselptr_mac(anairiats_sum_12, arg0, atslab_0) ; #line 286 "translate.dats" tmp193 = ats_caselptr_mac(anairiats_sum_12, arg0, atslab_2) ; #line 287 "translate.dats" tmp194 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol (arg1, tmp192) ; #line 287 "translate.dats" if (tmp194) { #line 287 "translate.dats" tmp191 = arg2 ; } else { #line 287 "translate.dats" tmp195 = atspre_add_int_int (arg2, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 287 "translate.dats" arg0 = tmp193 ; #line 287 "translate.dats" arg1 = arg1 ; #line 287 "translate.dats" arg2 = tmp195 ; #line 287 "translate.dats" goto __ats_lab_loop_32 ; // tail call } /* end of [if] */ break ; /* branch: __ats_lab_38 */ #line 289 "translate.dats" __ats_lab_38_0: #line 289 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 289 "translate.dats" __ats_lab_38_1: #line 289 "translate.dats" tmp191 = arg2 ; break ; } while (0) ; return (tmp191) ; } /* end of [loop_32] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 6296(line=245, offs=21) -- 8448(line=307, offs=4) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp170) ; ATSlocal (ats_ptr_type, tmp171) ; ATSlocal (ats_ptr_type, tmp172) ; ATSlocal (ats_ptr_type, tmp173) ; ATSlocal (ats_ptr_type, tmp174) ; ATSlocal (ats_ptr_type, tmp175) ; ATSlocal (ats_ptr_type, tmp176) ; // ATSlocal_void (tmp177) ; // ATSlocal_void (tmp178) ; // ATSlocal_void (tmp179) ; // ATSlocal_void (tmp180) ; // ATSlocal_void (tmp181) ; ATSlocal (ats_ptr_type, tmp182) ; ATSlocal (ats_ptr_type, tmp183) ; ATSlocal (ats_ptr_type, tmp184) ; ATSlocal (ats_ptr_type, tmp185) ; ATSlocal (ats_ptr_type, tmp186) ; ATSlocal (ats_ptr_type, tmp187) ; // ATSlocal_void (tmp188) ; // ATSlocal_void (tmp189) ; // ATSlocal_void (tmp190) ; ATSlocal (ats_int_type, tmp196) ; ATSlocal (ats_ptr_type, tmp197) ; ATSlocal (ats_ptr_type, tmp198) ; ATSlocal (ats_ptr_type, tmp199) ; ATSlocal (ats_ptr_type, tmp200) ; ATSlocal (ats_ptr_type, tmp201) ; ATSlocal (ats_ptr_type, tmp202) ; ATSlocal (ats_ptr_type, tmp203) ; ATSlocal (ats_ptr_type, tmp204) ; ATSlocal (ats_ptr_type, tmp205) ; ATSlocal (ats_ptr_type, tmp206) ; ATSlocal (ats_ptr_type, tmp207) ; ATSlocal (ats_ptr_type, tmp208) ; ATSlocal (ats_ptr_type, tmp209) ; ATSlocal (ats_ptr_type, tmp210) ; ATSlocal (ats_ptr_type, tmp211) ; ATSlocal (ats_ptr_type, tmp212) ; ATSlocal (ats_ptr_type, tmp213) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1: #line 252 "translate.dats" tmp171 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_10, arg2), atslab_v1ar_node) ; #line 252 "translate.dats" do { /* branch: __ats_lab_31 */ #line 253 "translate.dats" __ats_lab_31_0: #line 253 "translate.dats" if (((ats_sum_ptr_type)tmp171)->tag != 0) { goto __ats_lab_34_0 ; } #line 253 "translate.dats" __ats_lab_31_1: #line 253 "translate.dats" tmp172 = ats_caselptr_mac(anairiats_sum_0, tmp171, atslab_0) ; #line 260 "translate.dats" tmp173 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search (arg1, tmp172) ; #line 261 "translate.dats" do { /* branch: __ats_lab_32 */ #line 262 "translate.dats" __ats_lab_32_0: #line 262 "translate.dats" if (((ats_sum_ptr_type)tmp173)->tag != 1) { goto __ats_lab_33_0 ; } #line 262 "translate.dats" __ats_lab_32_1: #line 262 "translate.dats" tmp175 = ats_caselptr_mac(anairiats_sum_1, tmp173, atslab_0) ; #line 262 "translate.dats" tmp176 = ats_caselptr_mac(anairiats_sum_1, tmp173, atslab_1) ; #line 262 "translate.dats" tmp174 = exp_make_level_access_30 (tmp175, arg0, tmp176) ; break ; /* branch: __ats_lab_33 */ #line 263 "translate.dats" __ats_lab_33_0: #line 263 "translate.dats" __ats_lab_33_1: #line 264 "translate.dats" /* tmp177 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 265 "translate.dats" /* tmp178 = */ atspre_prerr_string (ATSstrcst(": tranVar1: unrecognized symbol [")) ; #line 266 "translate.dats" /* tmp179 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__prerr_symbol (tmp172) ; #line 267 "translate.dats" /* tmp180 = */ atspre_prerr_string (ATSstrcst("]")) ; #line 268 "translate.dats" /* tmp181 = */ atspre_prerr_newline () ; #line 269 "translate.dats" /* tmp174 = */ ats_exit (1) ; break ; } while (0) ; #line 253 "translate.dats" tmp170 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp170)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp170, atslab_0, tmp174) ; break ; /* branch: __ats_lab_34 */ #line 273 "translate.dats" __ats_lab_34_0: #line 273 "translate.dats" if (((ats_sum_ptr_type)tmp171)->tag != 1) { goto __ats_lab_39_0 ; } #line 273 "translate.dats" __ats_lab_34_1: #line 273 "translate.dats" tmp182 = ats_caselptr_mac(anairiats_sum_1, tmp171, atslab_0) ; #line 273 "translate.dats" tmp183 = ats_caselptr_mac(anairiats_sum_1, tmp171, atslab_1) ; #line 274 "translate.dats" tmp184 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1 (arg0, arg1, tmp182) ; #line 276 "translate.dats" tmp186 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_10, tmp182), atslab_v1ar_ty) ; #line 276 "translate.dats" do { /* branch: __ats_lab_35 */ #line 277 "translate.dats" __ats_lab_35_0: #line 277 "translate.dats" if (((ats_sum_ptr_type)tmp186)->tag != 4) { goto __ats_lab_36_0 ; } #line 277 "translate.dats" __ats_lab_35_1: #line 277 "translate.dats" tmp187 = ats_caselptr_mac(anairiats_sum_11, tmp186, atslab_1) ; #line 277 "translate.dats" tmp185 = tmp187 ; break ; /* branch: __ats_lab_36 */ #line 277 "translate.dats" __ats_lab_36_0: #line 277 "translate.dats" __ats_lab_36_1: #line 278 "translate.dats" /* tmp188 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 279 "translate.dats" /* tmp189 = */ atspre_prerr_string (ATSstrcst(": transVar1: FieldVar: not a record type")) ; #line 280 "translate.dats" /* tmp190 = */ atspre_prerr_newline () ; #line 281 "translate.dats" /* tmp185 = */ ats_exit (1) ; break ; } while (0) ; #line 275 "translate.dats" tmp196 = loop_32 (tmp185, tmp183, 0) ; #line 292 "translate.dats" tmp197 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp184) ; #line 293 "translate.dats" tmp199 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 293 "translate.dats" tmp200 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp200)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp200, atslab_0, tmp196) ; #line 293 "translate.dats" tmp198 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp198)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp198, atslab_0, tmp199) ; ats_selptrset_mac(anairiats_sum_13, tmp198, atslab_1, tmp197) ; ats_selptrset_mac(anairiats_sum_13, tmp198, atslab_2, tmp200) ; #line 295 "translate.dats" tmp201 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp201)->tag = 4 ; ats_selptrset_mac(anairiats_sum_0, tmp201, atslab_0, tmp198) ; #line 295 "translate.dats" tmp170 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp170)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp170, atslab_0, tmp201) ; break ; /* branch: __ats_lab_39 */ #line 297 "translate.dats" __ats_lab_39_0: #line 297 "translate.dats" // if (((ats_sum_ptr_type)tmp171)->tag != 2) { ats_deadcode_failure_handle () ; } #line 297 "translate.dats" __ats_lab_39_1: #line 297 "translate.dats" tmp202 = ats_caselptr_mac(anairiats_sum_1, tmp171, atslab_0) ; #line 297 "translate.dats" tmp203 = ats_caselptr_mac(anairiats_sum_1, tmp171, atslab_1) ; #line 298 "translate.dats" tmp204 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1 (arg0, arg1, tmp202) ; #line 299 "translate.dats" tmp205 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp203) ; #line 300 "translate.dats" tmp206 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp204) ; #line 301 "translate.dats" tmp207 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp205) ; #line 302 "translate.dats" tmp209 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MUL) ; #line 302 "translate.dats" tmp210 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp210)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp210, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 302 "translate.dats" tmp208 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp208)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp208, atslab_0, tmp209) ; ats_selptrset_mac(anairiats_sum_13, tmp208, atslab_1, tmp207) ; ats_selptrset_mac(anairiats_sum_13, tmp208, atslab_2, tmp210) ; #line 303 "translate.dats" tmp212 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 303 "translate.dats" tmp211 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp211)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp211, atslab_0, tmp212) ; ats_selptrset_mac(anairiats_sum_13, tmp211, atslab_1, tmp206) ; ats_selptrset_mac(anairiats_sum_13, tmp211, atslab_2, tmp208) ; #line 305 "translate.dats" tmp213 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp213)->tag = 4 ; ats_selptrset_mac(anairiats_sum_0, tmp213, atslab_0, tmp211) ; #line 305 "translate.dats" tmp170 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp170)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp170, atslab_0, tmp213) ; break ; } while (0) ; return (tmp170) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 8583(line=313, offs=7) -- 8715(line=316, offs=41) */ ATSstaticdec() ats_ptr_type seq0_34 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp215) ; ATSlocal (ats_ptr_type, tmp216) ; ATSlocal (ats_ptr_type, tmp217) ; ATSlocal (ats_ptr_type, tmp218) ; __ats_lab_seq0_34: #line 314 "translate.dats" do { /* branch: __ats_lab_40 */ #line 315 "translate.dats" __ats_lab_40_0: #line 315 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_41_0 ; } #line 315 "translate.dats" __ats_lab_40_1: #line 315 "translate.dats" tmp216 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 315 "translate.dats" tmp217 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 315 "translate.dats" tmp215 = seq1_35 (env0, env1, tmp216, tmp217) ; break ; /* branch: __ats_lab_41 */ #line 316 "translate.dats" __ats_lab_41_0: #line 316 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 316 "translate.dats" __ats_lab_41_1: #line 316 "translate.dats" tmp218 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp218)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp218, atslab_0, 0) ; #line 316 "translate.dats" tmp215 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp215)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp215, atslab_0, tmp218) ; break ; } while (0) ; return (tmp215) ; } /* end of [seq0_34] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } seq0_34_closure_type ; ats_ptr_type seq0_34_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) { return seq0_34 (((seq0_34_closure_type*)cloptr)->closure_env_0, ((seq0_34_closure_type*)cloptr)->closure_env_1, arg0) ; } /* end of function */ ATSinline() ats_void_type seq0_34_closure_init (seq0_34_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&seq0_34_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type seq0_34_closure_make (ats_ptr_type env0, ats_ptr_type env1) { seq0_34_closure_type *p_clo = ATS_MALLOC(sizeof(seq0_34_closure_type)) ; seq0_34_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 8741(line=318, offs=7) -- 8911(line=322, offs=6) */ ATSstaticdec() ats_ptr_type seq1_35 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp219) ; ATSlocal (ats_ptr_type, tmp220) ; ATSlocal (ats_ptr_type, tmp221) ; ATSlocal (ats_ptr_type, tmp222) ; __ats_lab_seq1_35: #line 319 "translate.dats" do { /* branch: __ats_lab_42 */ #line 320 "translate.dats" __ats_lab_42_0: #line 320 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_43_0 ; } #line 320 "translate.dats" __ats_lab_42_1: #line 320 "translate.dats" tmp220 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 320 "translate.dats" tmp221 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 320 "translate.dats" tmp222 = seq2_36 (env0, env1, arg0, tmp220, tmp221) ; #line 320 "translate.dats" tmp219 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp219)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp219, atslab_0, tmp222) ; break ; /* branch: __ats_lab_43 */ #line 321 "translate.dats" __ats_lab_43_0: #line 321 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 321 "translate.dats" __ats_lab_43_1: #line 321 "translate.dats" tmp219 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, arg0) ; break ; } while (0) ; return (tmp219) ; } /* end of [seq1_35] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } seq1_35_closure_type ; ats_ptr_type seq1_35_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return seq1_35 (((seq1_35_closure_type*)cloptr)->closure_env_0, ((seq1_35_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type seq1_35_closure_init (seq1_35_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&seq1_35_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type seq1_35_closure_make (ats_ptr_type env0, ats_ptr_type env1) { seq1_35_closure_type *p_clo = ATS_MALLOC(sizeof(seq1_35_closure_type)) ; seq1_35_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 8935(line=323, offs=7) -- 9355(line=333, offs=7) */ ATSstaticdec() ats_ptr_type seq2_36 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp223) ; ATSlocal (ats_ptr_type, tmp224) ; ATSlocal (ats_ptr_type, tmp225) ; ATSlocal (ats_ptr_type, tmp226) ; ATSlocal (ats_ptr_type, tmp227) ; ATSlocal (ats_ptr_type, tmp228) ; ATSlocal (ats_ptr_type, tmp229) ; ATSlocal (ats_ptr_type, tmp230) ; ATSlocal (ats_ptr_type, tmp231) ; ATSlocal (ats_ptr_type, tmp232) ; __ats_lab_seq2_36: #line 324 "translate.dats" do { /* branch: __ats_lab_44 */ #line 325 "translate.dats" __ats_lab_44_0: #line 325 "translate.dats" if (arg2 == (ats_sum_ptr_type)0) { goto __ats_lab_45_0 ; } #line 325 "translate.dats" __ats_lab_44_1: #line 325 "translate.dats" tmp224 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_0) ; #line 325 "translate.dats" tmp225 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_1) ; #line 326 "translate.dats" tmp226 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, arg0) ; #line 327 "translate.dats" tmp227 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (tmp226) ; #line 327 "translate.dats" tmp228 = seq2_36 (env0, env1, arg1, tmp224, tmp225) ; #line 327 "translate.dats" tmp223 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp223)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp223, atslab_0, tmp227) ; ats_selptrset_mac(anairiats_sum_1, tmp223, atslab_1, tmp228) ; break ; /* branch: __ats_lab_45 */ #line 329 "translate.dats" __ats_lab_45_0: #line 329 "translate.dats" // if (arg2 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 329 "translate.dats" __ats_lab_45_1: #line 330 "translate.dats" tmp229 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, arg0) ; #line 331 "translate.dats" tmp230 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, arg1) ; #line 331 "translate.dats" tmp231 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (tmp229) ; #line 331 "translate.dats" tmp232 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp230) ; #line 331 "translate.dats" tmp223 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp223)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp223, atslab_0, tmp231) ; ats_selptrset_mac(anairiats_sum_1, tmp223, atslab_1, tmp232) ; break ; } while (0) ; return (tmp223) ; } /* end of [seq2_36] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } seq2_36_closure_type ; ats_ptr_type seq2_36_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { return seq2_36 (((seq2_36_closure_type*)cloptr)->closure_env_0, ((seq2_36_closure_type*)cloptr)->closure_env_1, arg0, arg1, arg2) ; } /* end of function */ ATSinline() ats_void_type seq2_36_closure_init (seq2_36_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&seq2_36_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type seq2_36_closure_make (ats_ptr_type env0, ats_ptr_type env1) { seq2_36_closure_type *p_clo = ATS_MALLOC(sizeof(seq2_36_closure_type)) ; seq2_36_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 8496(line=311, offs=4) -- 9374(line=334, offs=2) */ ATSstaticdec() ats_ptr_type transExp1_SeqExp_33 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp214) ; __ats_lab_transExp1_SeqExp_33: #line 312 "translate.dats" tmp214 = seq0_34 (arg0, arg1, arg2) ; return (tmp214) ; } /* end of [transExp1_SeqExp_33] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 9420(line=338, offs=5) -- 9606(line=342, offs=24) */ ATSstaticdec() ats_ptr_type seq_stm_stmlst_rev_37 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp233) ; ATSlocal (ats_ptr_type, tmp234) ; ATSlocal (ats_ptr_type, tmp235) ; ATSlocal (ats_ptr_type, tmp236) ; __ats_lab_seq_stm_stmlst_rev_37: #line 339 "translate.dats" do { /* branch: __ats_lab_46 */ #line 340 "translate.dats" __ats_lab_46_0: #line 340 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_47_0 ; } #line 340 "translate.dats" __ats_lab_46_1: #line 340 "translate.dats" tmp234 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 340 "translate.dats" tmp235 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 341 "translate.dats" tmp236 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp236)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp236, atslab_0, tmp234) ; ats_selptrset_mac(anairiats_sum_1, tmp236, atslab_1, arg0) ; #line 341 "translate.dats" arg0 = tmp236 ; #line 341 "translate.dats" arg1 = tmp235 ; #line 341 "translate.dats" goto __ats_lab_seq_stm_stmlst_rev_37 ; // tail call break ; /* branch: __ats_lab_47 */ #line 342 "translate.dats" __ats_lab_47_0: #line 342 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 342 "translate.dats" __ats_lab_47_1: #line 342 "translate.dats" tmp233 = arg0 ; break ; } while (0) ; return (tmp233) ; } /* end of [seq_stm_stmlst_rev_37] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 9642(line=345, offs=4) -- 9886(line=351, offs=4) */ ATSstaticdec() ats_ptr_type eseq_stmlst_rev_exp_38 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp237) ; ATSlocal (ats_ptr_type, tmp238) ; ATSlocal (ats_ptr_type, tmp239) ; ATSlocal (ats_ptr_type, tmp240) ; __ats_lab_eseq_stmlst_rev_exp_38: #line 346 "translate.dats" do { /* branch: __ats_lab_48 */ #line 347 "translate.dats" __ats_lab_48_0: #line 347 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_49_0 ; } #line 347 "translate.dats" __ats_lab_48_1: #line 347 "translate.dats" tmp238 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 347 "translate.dats" tmp239 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 348 "translate.dats" tmp240 = seq_stm_stmlst_rev_37 (tmp238, tmp239) ; #line 348 "translate.dats" tmp237 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp237)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp237, atslab_0, tmp240) ; ats_selptrset_mac(anairiats_sum_1, tmp237, atslab_1, arg1) ; break ; /* branch: __ats_lab_49 */ #line 350 "translate.dats" __ats_lab_49_0: #line 350 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 350 "translate.dats" __ats_lab_49_1: #line 350 "translate.dats" tmp237 = arg1 ; break ; } while (0) ; return (tmp237) ; } /* end of [eseq_stmlst_rev_exp_38] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/reference.dats: 1834(line=59, offs=18) -- 1908(line=61, offs=4) */ ATSstaticdec() ats_ptr_type ref_01023_ats_ptr_type (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp243) ; ATSlocal (ats_ptr_type, tmp244) ; __ats_lab_ref_01023_ats_ptr_type: #line 60 "reference.dats" /* ats_ptr_type tmp244 ; */ #line 60 "reference.dats" tmp244 = arg0 ; #line 60 "reference.dats" tmp243 = atspre_ref_make_elt_tsz ((&tmp244), sizeof(ats_ptr_type)) ; return (tmp243) ; } /* end of [ref_01023_ats_ptr_type] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/reference.dats: 2000(line=64, offs=27) -- 2015(line=64, offs=42) */ ATSstaticdec() ats_ptr_type ref_make_elt_01024_ats_ptr_type (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp242) ; __ats_lab_ref_make_elt_01024_ats_ptr_type: #line 64 "reference.dats" tmp242 = ref_01023_ats_ptr_type (arg0) ; return (tmp242) ; } /* end of [ref_make_elt_01024_ats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 10135(line=364, offs=4) -- 10295(line=369, offs=4) */ ATSstaticdec() ats_void_type theBreaklabLst_push_41 (ats_ptr_type arg0) { /* local vardec */ // ATSlocal_void (tmp248) ; ATSlocal (ats_ptr_type, tmp249) ; ATSlocal (ats_ptr_type, tmp250) ; ATSlocal (ats_ptr_type, tmp251) ; __ats_lab_theBreaklabLst_push_41: #line 365 "translate.dats" tmp249 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp241), atslab_1) ; #line 368 "translate.dats" tmp251 = ats_ptrget_mac(ats_ptr_type, tmp249) ; #line 368 "translate.dats" tmp250 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp250, atslab_0, arg0) ; ats_selptrset_mac(anairiats_sum_5, tmp250, atslab_1, tmp251) ; #line 368 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp249) = tmp250 ; return /* (tmp248) */ ; } /* end of [theBreaklabLst_push_41] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 10327(line=371, offs=4) -- 10510(line=377, offs=4) */ ATSstaticdec() ats_void_type theBreaklabLst_pop_42 () { /* local vardec */ // ATSlocal_void (tmp252) ; ATSlocal (ats_ptr_type, tmp253) ; ATSlocal (ats_ptr_type, tmp254) ; ATSlocal (ats_ptr_type, tmp255) ; __ats_lab_theBreaklabLst_pop_42: #line 372 "translate.dats" tmp253 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp241), atslab_1) ; #line 375 "translate.dats" tmp254 = ats_ptrget_mac(ats_ptr_type, tmp253) ; #line 375 "translate.dats" do { /* branch: __ats_lab_50 */ #line 376 "translate.dats" __ats_lab_50_0: #line 376 "translate.dats" if (tmp254 == (ats_sum_ptr_type)0) { goto __ats_lab_51_0 ; } #line 376 "translate.dats" __ats_lab_50_1: #line 376 "translate.dats" tmp255 = ats_caselptr_mac(anairiats_sum_5, tmp254, atslab_1) ; #line 376 "translate.dats" ATS_FREE(tmp254) ; #line 376 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp253) = tmp255 ; break ; /* branch: __ats_lab_51 */ #line 376 "translate.dats" __ats_lab_51_0: #line 376 "translate.dats" __ats_lab_51_1: break ; } while (0) ; return /* (tmp252) */ ; } /* end of [theBreaklabLst_pop_42] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 10542(line=379, offs=4) -- 10925(line=391, offs=4) */ ATSstaticdec() ats_ptr_type loop_breaklab_get_43 () { /* local vardec */ ATSlocal (ats_ptr_type, tmp256) ; ATSlocal (ats_ptr_type, tmp257) ; ATSlocal (ats_ptr_type, tmp258) ; ATSlocal (ats_ptr_type, tmp259) ; // ATSlocal_void (tmp260) ; // ATSlocal_void (tmp261) ; // ATSlocal_void (tmp262) ; __ats_lab_loop_breaklab_get_43: #line 380 "translate.dats" tmp257 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp241), atslab_1) ; #line 383 "translate.dats" tmp258 = ats_ptrget_mac(ats_ptr_type, tmp257) ; #line 383 "translate.dats" do { /* branch: __ats_lab_52 */ #line 384 "translate.dats" __ats_lab_52_0: #line 384 "translate.dats" if (tmp258 == (ats_sum_ptr_type)0) { goto __ats_lab_53_0 ; } #line 384 "translate.dats" __ats_lab_52_1: #line 384 "translate.dats" tmp259 = ats_caselptr_mac(anairiats_sum_5, tmp258, atslab_0) ; #line 384 "translate.dats" tmp256 = tmp259 ; break ; /* branch: __ats_lab_53 */ #line 385 "translate.dats" __ats_lab_53_0: #line 385 "translate.dats" __ats_lab_53_1: #line 386 "translate.dats" /* tmp260 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 387 "translate.dats" /* tmp261 = */ atspre_prerr_string (ATSstrcst(": loop_breaklab_get: [theBreaklabLst] is empty")) ; #line 388 "translate.dats" /* tmp262 = */ atspre_prerr_newline () ; #line 389 "translate.dats" /* tmp256 = */ ats_exit (1) ; break ; } while (0) ; return (tmp256) ; } /* end of [loop_breaklab_get_43] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 10964(line=395, offs=4) -- 11130(line=400, offs=4) */ ATSstaticdec() ats_void_type theContinuelabLst_push_44 (ats_ptr_type arg0) { /* local vardec */ // ATSlocal_void (tmp263) ; ATSlocal (ats_ptr_type, tmp264) ; ATSlocal (ats_ptr_type, tmp265) ; ATSlocal (ats_ptr_type, tmp266) ; __ats_lab_theContinuelabLst_push_44: #line 396 "translate.dats" tmp264 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp246), atslab_1) ; #line 399 "translate.dats" tmp266 = ats_ptrget_mac(ats_ptr_type, tmp264) ; #line 399 "translate.dats" tmp265 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp265, atslab_0, arg0) ; ats_selptrset_mac(anairiats_sum_5, tmp265, atslab_1, tmp266) ; #line 399 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp264) = tmp265 ; return /* (tmp263) */ ; } /* end of [theContinuelabLst_push_44] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 11162(line=402, offs=4) -- 11347(line=407, offs=4) */ ATSstaticdec() ats_void_type theContinuelabLst_pop_45 () { /* local vardec */ // ATSlocal_void (tmp267) ; ATSlocal (ats_ptr_type, tmp268) ; ATSlocal (ats_ptr_type, tmp269) ; ATSlocal (ats_ptr_type, tmp270) ; __ats_lab_theContinuelabLst_pop_45: #line 403 "translate.dats" tmp268 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp246), atslab_1) ; #line 406 "translate.dats" tmp269 = ats_ptrget_mac(ats_ptr_type, tmp268) ; #line 406 "translate.dats" do { /* branch: __ats_lab_54 */ #line 406 "translate.dats" __ats_lab_54_0: #line 406 "translate.dats" if (tmp269 == (ats_sum_ptr_type)0) { goto __ats_lab_55_0 ; } #line 406 "translate.dats" __ats_lab_54_1: #line 406 "translate.dats" tmp270 = ats_caselptr_mac(anairiats_sum_5, tmp269, atslab_1) ; #line 406 "translate.dats" ATS_FREE(tmp269) ; #line 406 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp268) = tmp270 ; break ; /* branch: __ats_lab_55 */ #line 406 "translate.dats" __ats_lab_55_0: #line 406 "translate.dats" __ats_lab_55_1: break ; } while (0) ; return /* (tmp267) */ ; } /* end of [theContinuelabLst_pop_45] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 11382(line=409, offs=4) -- 11777(line=421, offs=4) */ ATSstaticdec() ats_ptr_type loop_continuelab_get_46 () { /* local vardec */ ATSlocal (ats_ptr_type, tmp271) ; ATSlocal (ats_ptr_type, tmp272) ; ATSlocal (ats_ptr_type, tmp273) ; ATSlocal (ats_ptr_type, tmp274) ; // ATSlocal_void (tmp275) ; // ATSlocal_void (tmp276) ; // ATSlocal_void (tmp277) ; __ats_lab_loop_continuelab_get_46: #line 410 "translate.dats" tmp272 = ats_selsin_mac(ats_castfn_mac(ats_ptr_type, statmp246), atslab_1) ; #line 413 "translate.dats" tmp273 = ats_ptrget_mac(ats_ptr_type, tmp272) ; #line 413 "translate.dats" do { /* branch: __ats_lab_56 */ #line 414 "translate.dats" __ats_lab_56_0: #line 414 "translate.dats" if (tmp273 == (ats_sum_ptr_type)0) { goto __ats_lab_57_0 ; } #line 414 "translate.dats" __ats_lab_56_1: #line 414 "translate.dats" tmp274 = ats_caselptr_mac(anairiats_sum_5, tmp273, atslab_0) ; #line 414 "translate.dats" tmp271 = tmp274 ; break ; /* branch: __ats_lab_57 */ #line 415 "translate.dats" __ats_lab_57_0: #line 415 "translate.dats" __ats_lab_57_1: #line 416 "translate.dats" /* tmp275 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 417 "translate.dats" /* tmp276 = */ atspre_prerr_string (ATSstrcst(": loop_continuelab_get: [theContinuelabLst] is empty")) ; #line 418 "translate.dats" /* tmp277 = */ atspre_prerr_newline () ; #line 419 "translate.dats" /* tmp271 = */ ats_exit (1) ; break ; } while (0) ; return (tmp271) ; } /* end of [loop_continuelab_get_46] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 11859(line=427, offs=4) -- 12137(line=434, offs=41) */ ATSstaticdec() ats_ptr_type expbinop_plus_make_47 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp278) ; ATSlocal (ats_int_type, tmp279) ; ATSlocal (ats_int_type, tmp280) ; ATSlocal (ats_int_type, tmp281) ; ATSlocal (ats_ptr_type, tmp282) ; ATSlocal (ats_ptr_type, tmp283) ; __ats_lab_expbinop_plus_make_47: #line 429 "translate.dats" do { /* branch: __ats_lab_58 */ #line 430 "translate.dats" __ats_lab_58_0: #line 430 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_61_0 ; } #line 430 "translate.dats" __ats_lab_58_1: #line 430 "translate.dats" tmp279 = ats_caselptr_mac(anairiats_sum_4, arg0, atslab_0) ; #line 430 "translate.dats" do { /* branch: __ats_lab_59 */ #line 431 "translate.dats" __ats_lab_59_0: #line 431 "translate.dats" if (((ats_sum_ptr_type)arg1)->tag != 0) { goto __ats_lab_60_0 ; } #line 431 "translate.dats" __ats_lab_59_1: #line 431 "translate.dats" tmp280 = ats_caselptr_mac(anairiats_sum_4, arg1, atslab_0) ; #line 431 "translate.dats" tmp281 = atspre_add_int_int (tmp279, tmp280) ; #line 431 "translate.dats" tmp278 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp278)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp278, atslab_0, tmp281) ; break ; /* branch: __ats_lab_60 */ #line 432 "translate.dats" __ats_lab_60_0: #line 432 "translate.dats" __ats_lab_60_1: #line 432 "translate.dats" tmp282 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 432 "translate.dats" tmp278 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp278)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_0, tmp282) ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_1, arg1) ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_2, arg0) ; break ; } while (0) ; break ; /* branch: __ats_lab_61 */ #line 434 "translate.dats" __ats_lab_61_0: #line 434 "translate.dats" __ats_lab_61_1: #line 434 "translate.dats" tmp283 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 434 "translate.dats" tmp278 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp278)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_0, tmp283) ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_13, tmp278, atslab_2, arg1) ; break ; } while (0) ; return (tmp278) ; } /* end of [expbinop_plus_make_47] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 12173(line=437, offs=4) -- 12454(line=444, offs=42) */ ATSstaticdec() ats_ptr_type expbinop_minus_make_48 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp284) ; ATSlocal (ats_int_type, tmp285) ; ATSlocal (ats_int_type, tmp286) ; ATSlocal (ats_int_type, tmp287) ; ATSlocal (ats_ptr_type, tmp288) ; ATSlocal (ats_ptr_type, tmp289) ; __ats_lab_expbinop_minus_make_48: #line 439 "translate.dats" do { /* branch: __ats_lab_62 */ #line 440 "translate.dats" __ats_lab_62_0: #line 440 "translate.dats" if (((ats_sum_ptr_type)arg0)->tag != 0) { goto __ats_lab_65_0 ; } #line 440 "translate.dats" __ats_lab_62_1: #line 440 "translate.dats" tmp285 = ats_caselptr_mac(anairiats_sum_4, arg0, atslab_0) ; #line 440 "translate.dats" do { /* branch: __ats_lab_63 */ #line 441 "translate.dats" __ats_lab_63_0: #line 441 "translate.dats" if (((ats_sum_ptr_type)arg1)->tag != 0) { goto __ats_lab_64_0 ; } #line 441 "translate.dats" __ats_lab_63_1: #line 441 "translate.dats" tmp286 = ats_caselptr_mac(anairiats_sum_4, arg1, atslab_0) ; #line 441 "translate.dats" tmp287 = atspre_sub_int_int (tmp285, tmp286) ; #line 441 "translate.dats" tmp284 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp284)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp284, atslab_0, tmp287) ; break ; /* branch: __ats_lab_64 */ #line 442 "translate.dats" __ats_lab_64_0: #line 442 "translate.dats" __ats_lab_64_1: #line 442 "translate.dats" tmp288 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MINUS) ; #line 442 "translate.dats" tmp284 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp284)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_0, tmp288) ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_2, arg1) ; break ; } while (0) ; break ; /* branch: __ats_lab_65 */ #line 444 "translate.dats" __ats_lab_65_0: #line 444 "translate.dats" __ats_lab_65_1: #line 444 "translate.dats" tmp289 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MINUS) ; #line 444 "translate.dats" tmp284 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp284)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_0, tmp289) ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_1, arg0) ; ats_selptrset_mac(anairiats_sum_13, tmp284, atslab_2, arg1) ; break ; } while (0) ; return (tmp284) ; } /* end of [expbinop_minus_make_48] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 13835(line=488, offs=13) -- 14397(line=499, offs=16) */ ATSstaticdec() ats_ptr_type loop_50 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2, ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp316) ; ATSlocal (ats_ptr_type, tmp317) ; ATSlocal (ats_ptr_type, tmp318) ; ATSlocal (ats_ptr_type, tmp319) ; ATSlocal (ats_ptr_type, tmp320) ; ATSlocal (ats_ptr_type, tmp321) ; ATSlocal (ats_ptr_type, tmp322) ; ATSlocal (ats_ptr_type, tmp323) ; ATSlocal (ats_ptr_type, tmp324) ; __ats_lab_loop_50: #line 488 "translate.dats" do { /* branch: __ats_lab_75 */ #line 489 "translate.dats" __ats_lab_75_0: #line 489 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_76_0 ; } #line 489 "translate.dats" __ats_lab_75_1: #line 489 "translate.dats" tmp317 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 489 "translate.dats" tmp318 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 490 "translate.dats" tmp319 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, tmp317) ; #line 490 "translate.dats" tmp320 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp319) ; #line 490 "translate.dats" tmp321 = loop_50 (env0, env1, env2, tmp318) ; #line 490 "translate.dats" tmp316 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp316, atslab_0, tmp320) ; ats_selptrset_mac(anairiats_sum_5, tmp316, atslab_1, tmp321) ; break ; /* branch: __ats_lab_76 */ #line 492 "translate.dats" __ats_lab_76_0: #line 492 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 492 "translate.dats" __ats_lab_76_1: #line 492 "translate.dats" do { /* branch: __ats_lab_77 */ #line 493 "translate.dats" __ats_lab_77_0: #line 493 "translate.dats" if (env2 == (ats_sum_ptr_type)0) { goto __ats_lab_78_0 ; } #line 493 "translate.dats" __ats_lab_77_1: #line 493 "translate.dats" tmp322 = ats_caselptr_mac(anairiats_sum_9, env2, atslab_0) ; #line 494 "translate.dats" tmp323 = frame_baseptr_compute_28 (tmp322, env0) ; #line 496 "translate.dats" tmp324 = (ats_sum_ptr_type)0 ; #line 496 "translate.dats" tmp316 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp316, atslab_0, tmp323) ; ats_selptrset_mac(anairiats_sum_5, tmp316, atslab_1, tmp324) ; break ; /* branch: __ats_lab_78 */ #line 498 "translate.dats" __ats_lab_78_0: #line 498 "translate.dats" // if (env2 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 498 "translate.dats" __ats_lab_78_1: #line 498 "translate.dats" tmp316 = (ats_sum_ptr_type)0 ; break ; } while (0) ; break ; } while (0) ; return (tmp316) ; } /* end of [loop_50] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; ats_ptr_type closure_env_2 ; } loop_50_closure_type ; ats_ptr_type loop_50_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0) { return loop_50 (((loop_50_closure_type*)cloptr)->closure_env_0, ((loop_50_closure_type*)cloptr)->closure_env_1, ((loop_50_closure_type*)cloptr)->closure_env_2, arg0) ; } /* end of function */ ATSinline() ats_void_type loop_50_closure_init (loop_50_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) { p_clo->closure_fun = (ats_fun_ptr_type)&loop_50_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; p_clo->closure_env_2 = env2 ; return ; } /* end of function */ ats_clo_ptr_type loop_50_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) { loop_50_closure_type *p_clo = ATS_MALLOC(sizeof(loop_50_closure_type)) ; loop_50_closure_init (p_clo, env0, env1, env2) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 15187(line=522, offs=15) -- 15242(line=522, offs=70) */ ATSstaticdec() ats_ptr_type __ats_fun_51 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp351) ; ATSlocal (ats_ptr_type, tmp352) ; __ats_lab___ats_fun_51: #line 522 "translate.dats" tmp352 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EQ) ; #line 522 "translate.dats" tmp351 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp351)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp351, atslab_0, tmp352) ; ats_selptrset_mac(anairiats_sum_6, tmp351, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp351, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp351, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp351, atslab_4, arg1) ; return (tmp351) ; } /* end of [__ats_fun_51] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_51_closure_type ; ats_ptr_type __ats_fun_51_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_51 (((__ats_fun_51_closure_type*)cloptr)->closure_env_0, ((__ats_fun_51_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_51_closure_init (__ats_fun_51_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_51_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_51_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_51_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_51_closure_type)) ; __ats_fun_51_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 15575(line=530, offs=15) -- 15630(line=530, offs=70) */ ATSstaticdec() ats_ptr_type __ats_fun_52 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp360) ; ATSlocal (ats_ptr_type, tmp361) ; __ats_lab___ats_fun_52: #line 530 "translate.dats" tmp361 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__EQ) ; #line 530 "translate.dats" tmp360 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp360)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp360, atslab_0, tmp361) ; ats_selptrset_mac(anairiats_sum_6, tmp360, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp360, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp360, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp360, atslab_4, arg1) ; return (tmp360) ; } /* end of [__ats_fun_52] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_52_closure_type ; ats_ptr_type __ats_fun_52_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_52 (((__ats_fun_52_closure_type*)cloptr)->closure_env_0, ((__ats_fun_52_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_52_closure_init (__ats_fun_52_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_52_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_52_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_52_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_52_closure_type)) ; __ats_fun_52_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 15888(line=538, offs=15) -- 15944(line=538, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_53 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp367) ; ATSlocal (ats_ptr_type, tmp368) ; __ats_lab___ats_fun_53: #line 538 "translate.dats" tmp368 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__NEQ) ; #line 538 "translate.dats" tmp367 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp367)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp367, atslab_0, tmp368) ; ats_selptrset_mac(anairiats_sum_6, tmp367, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp367, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp367, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp367, atslab_4, arg1) ; return (tmp367) ; } /* end of [__ats_fun_53] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_53_closure_type ; ats_ptr_type __ats_fun_53_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_53 (((__ats_fun_53_closure_type*)cloptr)->closure_env_0, ((__ats_fun_53_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_53_closure_init (__ats_fun_53_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_53_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_53_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_53_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_53_closure_type)) ; __ats_fun_53_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 16278(line=546, offs=15) -- 16334(line=546, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_54 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp376) ; ATSlocal (ats_ptr_type, tmp377) ; __ats_lab___ats_fun_54: #line 546 "translate.dats" tmp377 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__NEQ) ; #line 546 "translate.dats" tmp376 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp376)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp376, atslab_0, tmp377) ; ats_selptrset_mac(anairiats_sum_6, tmp376, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp376, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp376, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp376, atslab_4, arg1) ; return (tmp376) ; } /* end of [__ats_fun_54] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_54_closure_type ; ats_ptr_type __ats_fun_54_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_54 (((__ats_fun_54_closure_type*)cloptr)->closure_env_0, ((__ats_fun_54_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_54_closure_init (__ats_fun_54_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_54_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_54_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_54_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_54_closure_type)) ; __ats_fun_54_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 16479(line=551, offs=16) -- 16534(line=551, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_55 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp380) ; ATSlocal (ats_ptr_type, tmp381) ; __ats_lab___ats_fun_55: #line 551 "translate.dats" tmp381 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__GT) ; #line 551 "translate.dats" tmp380 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp380)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp380, atslab_0, tmp381) ; ats_selptrset_mac(anairiats_sum_6, tmp380, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp380, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp380, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp380, atslab_4, arg1) ; return (tmp380) ; } /* end of [__ats_fun_55] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_55_closure_type ; ats_ptr_type __ats_fun_55_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_55 (((__ats_fun_55_closure_type*)cloptr)->closure_env_0, ((__ats_fun_55_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_55_closure_init (__ats_fun_55_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_55_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_55_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_55_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_55_closure_type)) ; __ats_fun_55_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 16651(line=555, offs=16) -- 16706(line=555, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_56 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp384) ; ATSlocal (ats_ptr_type, tmp385) ; __ats_lab___ats_fun_56: #line 555 "translate.dats" tmp385 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__GE) ; #line 555 "translate.dats" tmp384 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp384)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp384, atslab_0, tmp385) ; ats_selptrset_mac(anairiats_sum_6, tmp384, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp384, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp384, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp384, atslab_4, arg1) ; return (tmp384) ; } /* end of [__ats_fun_56] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_56_closure_type ; ats_ptr_type __ats_fun_56_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_56 (((__ats_fun_56_closure_type*)cloptr)->closure_env_0, ((__ats_fun_56_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_56_closure_init (__ats_fun_56_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_56_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_56_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_56_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_56_closure_type)) ; __ats_fun_56_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 16823(line=559, offs=16) -- 16878(line=559, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_57 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp388) ; ATSlocal (ats_ptr_type, tmp389) ; __ats_lab___ats_fun_57: #line 559 "translate.dats" tmp389 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LT) ; #line 559 "translate.dats" tmp388 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp388)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp388, atslab_0, tmp389) ; ats_selptrset_mac(anairiats_sum_6, tmp388, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp388, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp388, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp388, atslab_4, arg1) ; return (tmp388) ; } /* end of [__ats_fun_57] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_57_closure_type ; ats_ptr_type __ats_fun_57_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_57 (((__ats_fun_57_closure_type*)cloptr)->closure_env_0, ((__ats_fun_57_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_57_closure_init (__ats_fun_57_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_57_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_57_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_57_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_57_closure_type)) ; __ats_fun_57_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 16995(line=563, offs=16) -- 17050(line=563, offs=71) */ ATSstaticdec() ats_ptr_type __ats_fun_58 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp392) ; ATSlocal (ats_ptr_type, tmp393) ; __ats_lab___ats_fun_58: #line 563 "translate.dats" tmp393 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LE) ; #line 563 "translate.dats" tmp392 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp392)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp392, atslab_0, tmp393) ; ats_selptrset_mac(anairiats_sum_6, tmp392, atslab_1, env0) ; ats_selptrset_mac(anairiats_sum_6, tmp392, atslab_2, env1) ; ats_selptrset_mac(anairiats_sum_6, tmp392, atslab_3, arg0) ; ats_selptrset_mac(anairiats_sum_6, tmp392, atslab_4, arg1) ; return (tmp392) ; } /* end of [__ats_fun_58] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; } __ats_fun_58_closure_type ; ats_ptr_type __ats_fun_58_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_58 (((__ats_fun_58_closure_type*)cloptr)->closure_env_0, ((__ats_fun_58_closure_type*)cloptr)->closure_env_1, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_58_closure_init (__ats_fun_58_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_58_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_58_closure_make (ats_ptr_type env0, ats_ptr_type env1) { __ats_fun_58_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_58_closure_type)) ; __ats_fun_58_closure_init (p_clo, env0, env1) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 17262(line=570, offs=15) -- 17361(line=571, offs=83) */ ATSstaticdec() ats_ptr_type __ats_fun_59 (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp398) ; ATSlocal (ats_ptr_type, tmp399) ; ATSlocal (ats_ptr_type, tmp400) ; ATSlocal (ats_ptr_type, tmp401) ; __ats_lab___ats_fun_59: #line 571 "translate.dats" tmp399 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(env1))) (env1, env0, arg1) ; #line 571 "translate.dats" tmp401 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(env2))) (env2, arg0, arg1) ; #line 571 "translate.dats" tmp400 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp400)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp400, atslab_0, env3) ; ats_selptrset_mac(anairiats_sum_1, tmp400, atslab_1, tmp401) ; #line 571 "translate.dats" tmp398 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp398)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp398, atslab_0, tmp399) ; ats_selptrset_mac(anairiats_sum_1, tmp398, atslab_1, tmp400) ; return (tmp398) ; } /* end of [__ats_fun_59] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_clo_ref_type closure_env_1 ; ats_clo_ref_type closure_env_2 ; ats_ptr_type closure_env_3 ; } __ats_fun_59_closure_type ; ats_ptr_type __ats_fun_59_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_59 (((__ats_fun_59_closure_type*)cloptr)->closure_env_0, ((__ats_fun_59_closure_type*)cloptr)->closure_env_1, ((__ats_fun_59_closure_type*)cloptr)->closure_env_2, ((__ats_fun_59_closure_type*)cloptr)->closure_env_3, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_59_closure_init (__ats_fun_59_closure_type *p_clo, ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_59_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; p_clo->closure_env_2 = env2 ; p_clo->closure_env_3 = env3 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_59_closure_make (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) { __ats_fun_59_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_59_closure_type)) ; __ats_fun_59_closure_init (p_clo, env0, env1, env2, env3) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 17599(line=579, offs=15) -- 17698(line=580, offs=83) */ ATSstaticdec() ats_ptr_type __ats_fun_60 (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3, ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp406) ; ATSlocal (ats_ptr_type, tmp407) ; ATSlocal (ats_ptr_type, tmp408) ; ATSlocal (ats_ptr_type, tmp409) ; __ats_lab___ats_fun_60: #line 580 "translate.dats" tmp407 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(env1))) (env1, arg0, env0) ; #line 580 "translate.dats" tmp409 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(env2))) (env2, arg0, arg1) ; #line 580 "translate.dats" tmp408 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp408)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp408, atslab_0, env3) ; ats_selptrset_mac(anairiats_sum_1, tmp408, atslab_1, tmp409) ; #line 580 "translate.dats" tmp406 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp406)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp406, atslab_0, tmp407) ; ats_selptrset_mac(anairiats_sum_1, tmp406, atslab_1, tmp408) ; return (tmp406) ; } /* end of [__ats_fun_60] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_clo_ref_type closure_env_1 ; ats_clo_ref_type closure_env_2 ; ats_ptr_type closure_env_3 ; } __ats_fun_60_closure_type ; ats_ptr_type __ats_fun_60_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_ptr_type arg1) { return __ats_fun_60 (((__ats_fun_60_closure_type*)cloptr)->closure_env_0, ((__ats_fun_60_closure_type*)cloptr)->closure_env_1, ((__ats_fun_60_closure_type*)cloptr)->closure_env_2, ((__ats_fun_60_closure_type*)cloptr)->closure_env_3, arg0, arg1) ; } /* end of function */ ATSinline() ats_void_type __ats_fun_60_closure_init (__ats_fun_60_closure_type *p_clo, ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) { p_clo->closure_fun = (ats_fun_ptr_type)&__ats_fun_60_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; p_clo->closure_env_2 = env2 ; p_clo->closure_env_3 = env3 ; return ; } /* end of function */ ats_clo_ptr_type __ats_fun_60_closure_make (ats_ptr_type env0, ats_clo_ref_type env1, ats_clo_ref_type env2, ats_ptr_type env3) { __ats_fun_60_closure_type *p_clo = ATS_MALLOC(sizeof(__ats_fun_60_closure_type)) ; __ats_fun_60_closure_init (p_clo, env0, env1, env2, env3) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 50131(line=1731, offs=7) -- 50271(line=1734, offs=6) */ ATSstaticdec() ats_int_type loop_62 (ats_ptr_type arg0, ats_int_type arg1) { /* local vardec */ ATSlocal (ats_int_type, tmp413) ; ATSlocal (ats_ptr_type, tmp414) ; ATSlocal (ats_int_type, tmp415) ; __ats_lab_loop_62: #line 1733 "list.dats" do { /* branch: __ats_lab_99 */ #line 1733 "list.dats" __ats_lab_99_0: #line 1733 "list.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_100_0 ; } #line 1733 "list.dats" __ats_lab_99_1: #line 1733 "list.dats" tmp414 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 1733 "list.dats" tmp415 = atspre_isucc (arg1) ; #line 1733 "list.dats" arg0 = tmp414 ; #line 1733 "list.dats" arg1 = tmp415 ; #line 1733 "list.dats" goto __ats_lab_loop_62 ; // tail call break ; /* branch: __ats_lab_100 */ #line 1733 "list.dats" __ats_lab_100_0: #line 1733 "list.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 1733 "list.dats" __ats_lab_100_1: #line 1733 "list.dats" tmp413 = arg1 ; break ; } while (0) ; return (tmp413) ; } /* end of [loop_62] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 50114(line=1730, offs=13) -- 50310(line=1737, offs=4) */ ATSstaticdec() ats_int_type list_length_01478_ats_ptr_type (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_int_type, tmp412) ; __ats_lab_list_length_01478_ats_ptr_type: #line 1736 "list.dats" tmp412 = loop_62 (arg0, 0) ; return (tmp412) ; } /* end of [list_length_01478_ats_ptr_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 18132(line=592, offs=11) -- 18596(line=601, offs=30) */ ATSstaticdec() ats_ptr_type aux_63 (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2, ats_ptr_type arg0, ats_int_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp425) ; ATSlocal (ats_ptr_type, tmp426) ; ATSlocal (ats_ptr_type, tmp427) ; ATSlocal (ats_ptr_type, tmp428) ; ATSlocal (ats_ptr_type, tmp429) ; ATSlocal (ats_ptr_type, tmp430) ; ATSlocal (ats_ptr_type, tmp431) ; ATSlocal (ats_ptr_type, tmp432) ; ATSlocal (ats_ptr_type, tmp433) ; ATSlocal (ats_ptr_type, tmp434) ; ATSlocal (ats_ptr_type, tmp435) ; ATSlocal (ats_int_type, tmp436) ; ATSlocal (ats_ptr_type, tmp437) ; __ats_lab_aux_63: #line 593 "translate.dats" do { /* branch: __ats_lab_101 */ #line 594 "translate.dats" __ats_lab_101_0: #line 594 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_102_0 ; } #line 594 "translate.dats" __ats_lab_101_1: #line 594 "translate.dats" tmp426 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 594 "translate.dats" tmp427 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 595 "translate.dats" tmp429 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_16, tmp426), atslab_fieldexp_exp) ; #line 595 "translate.dats" tmp428 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (env0, env1, tmp429) ; #line 596 "translate.dats" tmp431 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 596 "translate.dats" tmp432 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp432)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp432, atslab_0, arg1) ; #line 596 "translate.dats" tmp430 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp430)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp430, atslab_0, tmp431) ; ats_selptrset_mac(anairiats_sum_13, tmp430, atslab_1, env2) ; ats_selptrset_mac(anairiats_sum_13, tmp430, atslab_2, tmp432) ; #line 597 "translate.dats" tmp434 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp434)->tag = 4 ; ats_selptrset_mac(anairiats_sum_0, tmp434, atslab_0, tmp430) ; #line 597 "translate.dats" tmp435 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp428) ; #line 597 "translate.dats" tmp433 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp433)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp433, atslab_0, tmp434) ; ats_selptrset_mac(anairiats_sum_1, tmp433, atslab_1, tmp435) ; #line 599 "translate.dats" tmp436 = atspre_add_int_int (arg1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 599 "translate.dats" tmp437 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp437, atslab_0, tmp433) ; ats_selptrset_mac(anairiats_sum_5, tmp437, atslab_1, arg2) ; #line 599 "translate.dats" arg0 = tmp427 ; #line 599 "translate.dats" arg1 = tmp436 ; #line 599 "translate.dats" arg2 = tmp437 ; #line 599 "translate.dats" goto __ats_lab_aux_63 ; // tail call break ; /* branch: __ats_lab_102 */ #line 601 "translate.dats" __ats_lab_102_0: #line 601 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 601 "translate.dats" __ats_lab_102_1: #line 601 "translate.dats" tmp425 = arg2 ; break ; } while (0) ; return (tmp425) ; } /* end of [aux_63] */ typedef struct { ats_fun_ptr_type closure_fun ; ats_ptr_type closure_env_0 ; ats_ptr_type closure_env_1 ; ats_ptr_type closure_env_2 ; } aux_63_closure_type ; ats_ptr_type aux_63_clofun (ats_clo_ptr_type cloptr, ats_ptr_type arg0, ats_int_type arg1, ats_ptr_type arg2) { return aux_63 (((aux_63_closure_type*)cloptr)->closure_env_0, ((aux_63_closure_type*)cloptr)->closure_env_1, ((aux_63_closure_type*)cloptr)->closure_env_2, arg0, arg1, arg2) ; } /* end of function */ ATSinline() ats_void_type aux_63_closure_init (aux_63_closure_type *p_clo, ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) { p_clo->closure_fun = (ats_fun_ptr_type)&aux_63_clofun ; p_clo->closure_env_0 = env0 ; p_clo->closure_env_1 = env1 ; p_clo->closure_env_2 = env2 ; return ; } /* end of function */ ats_clo_ptr_type aux_63_closure_make (ats_ptr_type env0, ats_ptr_type env1, ats_ptr_type env2) { aux_63_closure_type *p_clo = ATS_MALLOC(sizeof(aux_63_closure_type)) ; aux_63_closure_init (p_clo, env0, env1, env2) ; return (ats_clo_ptr_type)p_clo ; } /* end of function */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 23809(line=734, offs=13) -- 24135(line=742, offs=30) */ ATSstaticdec() ats_void_type loop_64 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2, ats_ref_type arg3) { /* local vardec */ // ATSlocal_void (tmp591) ; ATSlocal (ats_ptr_type, tmp592) ; ATSlocal (ats_ptr_type, tmp593) ; // ATSlocal_void (tmp594) ; __ats_lab_loop_64: #line 736 "translate.dats" do { /* branch: __ats_lab_115 */ #line 737 "translate.dats" __ats_lab_115_0: #line 737 "translate.dats" if (arg2 == (ats_sum_ptr_type)0) { goto __ats_lab_116_0 ; } #line 737 "translate.dats" __ats_lab_115_1: #line 737 "translate.dats" tmp592 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_0) ; #line 737 "translate.dats" tmp593 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_1) ; #line 738 "translate.dats" /* tmp594 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transDec1 (arg0, arg1, tmp592, arg3) ; #line 740 "translate.dats" arg0 = arg0 ; #line 740 "translate.dats" arg1 = arg1 ; #line 740 "translate.dats" arg2 = tmp593 ; #line 740 "translate.dats" arg3 = arg3 ; #line 740 "translate.dats" goto __ats_lab_loop_64 ; // tail call break ; /* branch: __ats_lab_116 */ #line 742 "translate.dats" __ats_lab_116_0: #line 742 "translate.dats" // if (arg2 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 742 "translate.dats" __ats_lab_116_1: break ; } while (0) ; return /* (tmp591) */ ; } /* end of [loop_64] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 12529(line=449, offs=21) -- 24635(line=756, offs=4) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp290) ; ATSlocal (ats_ptr_type, tmp291) ; ATSlocal (ats_ptr_type, tmp292) ; ATSlocal (ats_ptr_type, tmp293) ; ATSlocal (ats_int_type, tmp294) ; ATSlocal (ats_ptr_type, tmp295) ; ATSlocal (ats_ptr_type, tmp296) ; ATSlocal (ats_ptr_type, tmp297) ; ATSlocal (ats_ptr_type, tmp298) ; // ATSlocal_void (tmp299) ; ATSlocal (ats_ptr_type, tmp300) ; ATSlocal (ats_ptr_type, tmp301) ; ATSlocal (ats_ptr_type, tmp302) ; ATSlocal (ats_ptr_type, tmp303) ; ATSlocal (anairiats_rec_15, tmp304) ; ATSlocal (ats_ptr_type, tmp305) ; ATSlocal (ats_ptr_type, tmp306) ; // ATSlocal_void (tmp307) ; // ATSlocal_void (tmp308) ; // ATSlocal_void (tmp309) ; // ATSlocal_void (tmp310) ; ATSlocal (ats_ptr_type, tmp311) ; ATSlocal (ats_ptr_type, tmp312) ; ATSlocal (ats_ptr_type, tmp313) ; ATSlocal (ats_ptr_type, tmp314) ; ATSlocal (ats_ptr_type, tmp315) ; ATSlocal (ats_ptr_type, tmp325) ; ATSlocal (ats_ptr_type, tmp326) ; ATSlocal (ats_ptr_type, tmp327) ; ATSlocal (ats_ptr_type, tmp328) ; ATSlocal (ats_ptr_type, tmp329) ; ATSlocal (ats_ptr_type, tmp330) ; ATSlocal (ats_ptr_type, tmp331) ; ATSlocal (ats_ptr_type, tmp332) ; ATSlocal (ats_ptr_type, tmp333) ; ATSlocal (ats_ptr_type, tmp334) ; ATSlocal (ats_ptr_type, tmp335) ; ATSlocal (ats_ptr_type, tmp336) ; ATSlocal (ats_ptr_type, tmp337) ; ATSlocal (ats_ptr_type, tmp338) ; ATSlocal (ats_ptr_type, tmp339) ; ATSlocal (ats_ptr_type, tmp340) ; ATSlocal (ats_ptr_type, tmp341) ; ATSlocal (ats_ptr_type, tmp342) ; ATSlocal (ats_ptr_type, tmp343) ; ATSlocal (ats_ptr_type, tmp344) ; ATSlocal (ats_ptr_type, tmp345) ; ATSlocal (ats_ptr_type, tmp346) ; ATSlocal (ats_ptr_type, tmp347) ; ATSlocal (ats_ptr_type, tmp348) ; ATSlocal (ats_ptr_type, tmp349) ; ATSlocal (ats_bool_type, tmp350) ; ATSlocal (ats_ptr_type, tmp353) ; ATSlocal (ats_bool_type, tmp354) ; ATSlocal (ats_ptr_type, tmp355) ; ATSlocal (ats_ptr_type, tmp356) ; ATSlocal (ats_ptr_type, tmp357) ; ATSlocal (ats_ptr_type, tmp358) ; ATSlocal (ats_ptr_type, tmp359) ; ATSlocal (ats_ptr_type, tmp362) ; ATSlocal (ats_ptr_type, tmp363) ; ATSlocal (ats_ptr_type, tmp364) ; ATSlocal (ats_ptr_type, tmp365) ; ATSlocal (ats_bool_type, tmp366) ; ATSlocal (ats_ptr_type, tmp369) ; ATSlocal (ats_bool_type, tmp370) ; ATSlocal (ats_ptr_type, tmp371) ; ATSlocal (ats_ptr_type, tmp372) ; ATSlocal (ats_ptr_type, tmp373) ; ATSlocal (ats_ptr_type, tmp374) ; ATSlocal (ats_ptr_type, tmp375) ; ATSlocal (ats_ptr_type, tmp378) ; ATSlocal (ats_ptr_type, tmp379) ; ATSlocal (ats_ptr_type, tmp382) ; ATSlocal (ats_ptr_type, tmp383) ; ATSlocal (ats_ptr_type, tmp386) ; ATSlocal (ats_ptr_type, tmp387) ; ATSlocal (ats_ptr_type, tmp390) ; ATSlocal (ats_ptr_type, tmp391) ; ATSlocal (ats_ptr_type, tmp394) ; ATSlocal (ats_clo_ref_type, tmp395) ; ATSlocal (ats_clo_ref_type, tmp396) ; ATSlocal (ats_ptr_type, tmp397) ; ATSlocal (ats_ptr_type, tmp402) ; ATSlocal (ats_clo_ref_type, tmp403) ; ATSlocal (ats_clo_ref_type, tmp404) ; ATSlocal (ats_ptr_type, tmp405) ; ATSlocal (ats_ptr_type, tmp410) ; ATSlocal (ats_int_type, tmp411) ; ATSlocal (ats_ptr_type, tmp416) ; ATSlocal (ats_int64_type, tmp417) ; ATSlocal (ats_ptr_type, tmp418) ; ATSlocal (ats_ptr_type, tmp419) ; ATSlocal (ats_ptr_type, tmp420) ; ATSlocal (ats_ptr_type, tmp421) ; ATSlocal (ats_ptr_type, tmp422) ; ATSlocal (ats_ptr_type, tmp423) ; ATSlocal (ats_ptr_type, tmp424) ; ATSlocal (ats_ptr_type, tmp438) ; ATSlocal (ats_ptr_type, tmp439) ; ATSlocal (ats_ptr_type, tmp440) ; ATSlocal (ats_ptr_type, tmp441) ; ATSlocal (ats_ptr_type, tmp442) ; ATSlocal (ats_ptr_type, tmp443) ; ATSlocal (ats_ptr_type, tmp444) ; ATSlocal (ats_ptr_type, tmp445) ; ATSlocal (ats_ptr_type, tmp446) ; ATSlocal (ats_ptr_type, tmp447) ; ATSlocal (ats_ptr_type, tmp448) ; ATSlocal (ats_ptr_type, tmp449) ; ATSlocal (ats_ptr_type, tmp450) ; ATSlocal (ats_ptr_type, tmp451) ; ATSlocal (ats_ptr_type, tmp452) ; ATSlocal (ats_ptr_type, tmp453) ; ATSlocal (ats_ptr_type, tmp454) ; ATSlocal (ats_ptr_type, tmp455) ; ATSlocal (ats_ptr_type, tmp456) ; ATSlocal (ats_ptr_type, tmp457) ; ATSlocal (ats_ptr_type, tmp458) ; ATSlocal (ats_clo_ref_type, tmp459) ; ATSlocal (ats_ptr_type, tmp460) ; ATSlocal (ats_ptr_type, tmp461) ; ATSlocal (ats_int64_type, tmp462) ; ATSlocal (ats_ptr_type, tmp463) ; ATSlocal (ats_ptr_type, tmp464) ; ATSlocal (ats_ptr_type, tmp465) ; ATSlocal (ats_ptr_type, tmp466) ; ATSlocal (ats_ptr_type, tmp467) ; ATSlocal (ats_ptr_type, tmp468) ; ATSlocal (ats_ptr_type, tmp469) ; ATSlocal (ats_ptr_type, tmp470) ; ATSlocal (ats_ptr_type, tmp471) ; ATSlocal (ats_ptr_type, tmp472) ; ATSlocal (ats_ptr_type, tmp473) ; ATSlocal (ats_ptr_type, tmp474) ; ATSlocal (ats_ptr_type, tmp475) ; ATSlocal (ats_ptr_type, tmp476) ; ATSlocal (ats_ptr_type, tmp477) ; ATSlocal (ats_ptr_type, tmp478) ; ATSlocal (ats_ptr_type, tmp479) ; ATSlocal (ats_ptr_type, tmp480) ; ATSlocal (ats_ptr_type, tmp481) ; ATSlocal (ats_ptr_type, tmp482) ; ATSlocal (ats_ptr_type, tmp483) ; ATSlocal (ats_ptr_type, tmp484) ; ATSlocal (ats_ptr_type, tmp485) ; ATSlocal (ats_ptr_type, tmp486) ; ATSlocal (ats_ptr_type, tmp487) ; ATSlocal (ats_ptr_type, tmp488) ; ATSlocal (ats_ptr_type, tmp489) ; ATSlocal (ats_ptr_type, tmp490) ; ATSlocal (ats_ptr_type, tmp491) ; ATSlocal (ats_ptr_type, tmp492) ; ATSlocal (ats_ptr_type, tmp493) ; ATSlocal (ats_ptr_type, tmp494) ; ATSlocal (ats_ptr_type, tmp495) ; ATSlocal (ats_ptr_type, tmp496) ; ATSlocal (ats_ptr_type, tmp497) ; // ATSlocal_void (tmp498) ; // ATSlocal_void (tmp499) ; ATSlocal (ats_ptr_type, tmp500) ; ATSlocal (ats_clo_ref_type, tmp501) ; ATSlocal (ats_ptr_type, tmp502) ; ATSlocal (ats_ptr_type, tmp503) ; ATSlocal (ats_ptr_type, tmp504) ; ATSlocal (ats_ptr_type, tmp505) ; ATSlocal (ats_ptr_type, tmp506) ; ATSlocal (ats_ptr_type, tmp507) ; ATSlocal (ats_ptr_type, tmp508) ; ATSlocal (ats_ptr_type, tmp509) ; ATSlocal (ats_ptr_type, tmp510) ; ATSlocal (ats_ptr_type, tmp511) ; ATSlocal (ats_ptr_type, tmp512) ; ATSlocal (ats_ptr_type, tmp513) ; ATSlocal (ats_ptr_type, tmp514) ; ATSlocal (ats_ptr_type, tmp515) ; ATSlocal (ats_ptr_type, tmp516) ; ATSlocal (ats_ptr_type, tmp517) ; // ATSlocal_void (tmp518) ; // ATSlocal_void (tmp519) ; ATSlocal (ats_ptr_type, tmp520) ; ATSlocal (ats_ptr_type, tmp521) ; ATSlocal (ats_ptr_type, tmp522) ; ATSlocal (ats_ptr_type, tmp523) ; ATSlocal (ats_ptr_type, tmp524) ; ATSlocal (ats_ptr_type, tmp525) ; ATSlocal (ats_ptr_type, tmp526) ; ATSlocal (ats_ptr_type, tmp527) ; ATSlocal (ats_ptr_type, tmp528) ; ATSlocal (ats_ptr_type, tmp529) ; ATSlocal (ats_ptr_type, tmp530) ; ATSlocal (ats_bool_type, tmp531) ; ATSlocal (ats_ptr_type, tmp532) ; ATSlocal (ats_ptr_type, tmp533) ; ATSlocal (ats_ptr_type, tmp534) ; ATSlocal (ats_ptr_type, tmp535) ; ATSlocal (ats_int64_type, tmp536) ; ATSlocal (ats_ptr_type, tmp537) ; ATSlocal (ats_ptr_type, tmp538) ; ATSlocal (ats_ptr_type, tmp539) ; ATSlocal (ats_ptr_type, tmp540) ; ATSlocal (ats_ptr_type, tmp541) ; ATSlocal (ats_ptr_type, tmp542) ; ATSlocal (ats_ptr_type, tmp543) ; // ATSlocal_void (tmp544) ; // ATSlocal_void (tmp545) ; ATSlocal (ats_ptr_type, tmp546) ; ATSlocal (ats_ptr_type, tmp547) ; ATSlocal (ats_ptr_type, tmp548) ; ATSlocal (ats_ptr_type, tmp549) ; ATSlocal (ats_ptr_type, tmp550) ; ATSlocal (ats_ptr_type, tmp551) ; ATSlocal (ats_ptr_type, tmp552) ; ATSlocal (ats_ptr_type, tmp553) ; ATSlocal (ats_ptr_type, tmp554) ; ATSlocal (ats_ptr_type, tmp555) ; ATSlocal (ats_ptr_type, tmp556) ; ATSlocal (ats_ptr_type, tmp557) ; ATSlocal (ats_ptr_type, tmp558) ; ATSlocal (ats_ptr_type, tmp559) ; ATSlocal (ats_ptr_type, tmp560) ; ATSlocal (ats_ptr_type, tmp561) ; ATSlocal (ats_ptr_type, tmp562) ; ATSlocal (ats_ptr_type, tmp563) ; ATSlocal (ats_ptr_type, tmp564) ; ATSlocal (ats_ptr_type, tmp565) ; ATSlocal (ats_ptr_type, tmp566) ; ATSlocal (ats_ptr_type, tmp567) ; ATSlocal (ats_ptr_type, tmp568) ; ATSlocal (ats_ptr_type, tmp569) ; ATSlocal (ats_ptr_type, tmp570) ; ATSlocal (ats_ptr_type, tmp571) ; ATSlocal (ats_ptr_type, tmp572) ; // ATSlocal_void (tmp573) ; // ATSlocal_void (tmp574) ; ATSlocal (ats_ptr_type, tmp575) ; ATSlocal (ats_ptr_type, tmp576) ; ATSlocal (ats_ptr_type, tmp577) ; ATSlocal (ats_ptr_type, tmp578) ; ATSlocal (ats_ptr_type, tmp579) ; ATSlocal (ats_ptr_type, tmp580) ; ATSlocal (ats_ptr_type, tmp581) ; ATSlocal (ats_ptr_type, tmp582) ; ATSlocal (ats_ptr_type, tmp583) ; ATSlocal (ats_ptr_type, tmp584) ; ATSlocal (ats_ptr_type, tmp585) ; ATSlocal (ats_ptr_type, tmp586) ; ATSlocal (ats_ptr_type, tmp587) ; ATSlocal (ats_ptr_type, tmp588) ; ATSlocal (ats_ptr_type, tmp589) ; ATSlocal (ats_ptr_type, tmp590) ; // ATSlocal_void (tmp595) ; ATSlocal (ats_ptr_type, tmp596) ; ATSlocal (ats_ptr_type, tmp597) ; ATSlocal (ats_ptr_type, tmp598) ; ATSlocal (ats_ptr_type, tmp599) ; ATSlocal (ats_ptr_type, tmp600) ; ATSlocal (ats_ptr_type, tmp601) ; ATSlocal (ats_ptr_type, tmp602) ; ATSlocal (ats_ptr_type, tmp603) ; ATSlocal (ats_ptr_type, tmp604) ; ATSlocal (ats_ptr_type, tmp605) ; ATSlocal (ats_ptr_type, tmp606) ; ATSlocal (ats_ptr_type, tmp607) ; ATSlocal (ats_ptr_type, tmp608) ; ATSlocal (ats_ptr_type, tmp609) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1: #line 456 "translate.dats" tmp291 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_14, arg2), atslab_exp_node) ; #line 456 "translate.dats" do { /* branch: __ats_lab_66 */ #line 457 "translate.dats" __ats_lab_66_0: #line 457 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 0) { goto __ats_lab_67_0 ; } #line 457 "translate.dats" __ats_lab_66_1: #line 457 "translate.dats" tmp292 = ats_caselptr_mac(anairiats_sum_0, tmp291, atslab_0) ; #line 457 "translate.dats" tmp290 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1 (arg0, arg1, tmp292) ; break ; /* branch: __ats_lab_67 */ #line 458 "translate.dats" __ats_lab_67_0: #line 458 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 1) { goto __ats_lab_68_0 ; } #line 458 "translate.dats" __ats_lab_67_1: #line 458 "translate.dats" tmp293 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp293)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp293, atslab_0, 0) ; #line 458 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp293) ; break ; /* branch: __ats_lab_68 */ #line 459 "translate.dats" __ats_lab_68_0: #line 459 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 2) { goto __ats_lab_69_0 ; } #line 459 "translate.dats" __ats_lab_68_1: #line 459 "translate.dats" tmp294 = ats_caselptr_mac(anairiats_sum_4, tmp291, atslab_0) ; #line 459 "translate.dats" tmp295 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp295)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp295, atslab_0, tmp294) ; #line 459 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp295) ; break ; /* branch: __ats_lab_69 */ #line 460 "translate.dats" __ats_lab_69_0: #line 460 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 3) { goto __ats_lab_70_0 ; } #line 460 "translate.dats" __ats_lab_69_1: #line 460 "translate.dats" tmp296 = ats_caselptr_mac(anairiats_sum_0, tmp291, atslab_0) ; #line 461 "translate.dats" tmp297 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_str_new () ; #line 462 "translate.dats" tmp298 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp298)->tag = 1 ; ats_selptrset_mac(anairiats_sum_1, tmp298, atslab_0, tmp297) ; ats_selptrset_mac(anairiats_sum_1, tmp298, atslab_1, tmp296) ; #line 463 "translate.dats" /* tmp299 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_theFraglst_add (tmp298) ; #line 465 "translate.dats" tmp300 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp300)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp300, atslab_0, tmp297) ; #line 465 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp300) ; break ; /* branch: __ats_lab_70 */ #line 467 "translate.dats" __ats_lab_70_0: #line 467 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 4) { goto __ats_lab_79_0 ; } #line 467 "translate.dats" __ats_lab_70_1: #line 467 "translate.dats" tmp301 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_0) ; #line 467 "translate.dats" tmp302 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_1) ; #line 473 "translate.dats" tmp303 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_search (arg1, tmp301) ; #line 474 "translate.dats" do { /* branch: __ats_lab_71 */ #line 475 "translate.dats" __ats_lab_71_0: #line 475 "translate.dats" if (((ats_sum_ptr_type)tmp303)->tag != 0) { goto __ats_lab_72_0 ; } #line 475 "translate.dats" __ats_lab_71_1: #line 475 "translate.dats" tmp305 = ats_caselptr_mac(anairiats_sum_1, tmp303, atslab_0) ; #line 475 "translate.dats" tmp306 = ats_caselptr_mac(anairiats_sum_1, tmp303, atslab_1) ; #line 475 "translate.dats" tmp304.atslab_0 = tmp305 ; tmp304.atslab_1 = tmp306 ; break ; /* branch: __ats_lab_72 */ #line 475 "translate.dats" __ats_lab_72_0: #line 475 "translate.dats" __ats_lab_72_1: #line 476 "translate.dats" /* tmp307 = */ atspre_prerr_string (ATSstrcst("INTERNAL ERROR")) ; #line 477 "translate.dats" /* tmp308 = */ atspre_prerr_string (ATSstrcst(": transExp1: CallExp: illegal function entry: f = ")) ; #line 478 "translate.dats" /* tmp309 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__prerr_symbol (tmp301) ; #line 479 "translate.dats" /* tmp310 = */ atspre_prerr_newline () ; #line 480 "translate.dats" /* tmp304 = */ ats_exit (1) ; break ; } while (0) ; #line 474 "translate.dats" tmp311 = ats_select_mac(tmp304, atslab_0) ; #line 474 "translate.dats" tmp312 = ats_select_mac(tmp304, atslab_1) ; #line 483 "translate.dats" do { /* branch: __ats_lab_73 */ #line 484 "translate.dats" __ats_lab_73_0: #line 484 "translate.dats" if (((ats_sum_ptr_type)tmp312)->tag != 0) { goto __ats_lab_74_0 ; } #line 484 "translate.dats" __ats_lab_73_1: #line 484 "translate.dats" tmp313 = (ats_sum_ptr_type)0 ; break ; /* branch: __ats_lab_74 */ #line 484 "translate.dats" __ats_lab_74_0: #line 484 "translate.dats" // if (((ats_sum_ptr_type)tmp312)->tag != 1) { ats_deadcode_failure_handle () ; } #line 484 "translate.dats" __ats_lab_74_1: #line 484 "translate.dats" tmp314 = ats_caselptr_mac(anairiats_sum_7, tmp312, atslab_2) ; #line 484 "translate.dats" tmp313 = ATS_MALLOC(sizeof(anairiats_sum_9)) ; ats_selptrset_mac(anairiats_sum_9, tmp313, atslab_0, tmp314) ; break ; } while (0) ; #line 486 "translate.dats" tmp315 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp315)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp315, atslab_0, tmp311) ; #line 487 "translate.dats" tmp325 = loop_50 (arg0, arg1, tmp313, tmp302) ; #line 502 "translate.dats" tmp326 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp326)->tag = 5 ; ats_selptrset_mac(anairiats_sum_1, tmp326, atslab_0, tmp315) ; ats_selptrset_mac(anairiats_sum_1, tmp326, atslab_1, tmp325) ; #line 467 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp326) ; break ; /* branch: __ats_lab_79 */ #line 504 "translate.dats" __ats_lab_79_0: #line 504 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 5) { goto __ats_lab_98_0 ; } #line 504 "translate.dats" __ats_lab_79_1: #line 504 "translate.dats" tmp327 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_0) ; #line 504 "translate.dats" tmp328 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_1) ; #line 504 "translate.dats" tmp329 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_2) ; #line 505 "translate.dats" tmp330 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp327) ; #line 506 "translate.dats" tmp331 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp329) ; #line 508 "translate.dats" do { /* branch: __ats_lab_80 */ #line 509 "translate.dats" __ats_lab_80_0: #line 509 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 0) { goto __ats_lab_81_0 ; } #line 509 "translate.dats" __ats_lab_80_1: #line 510 "translate.dats" tmp333 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 510 "translate.dats" tmp334 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 510 "translate.dats" tmp332 = expbinop_plus_make_47 (tmp333, tmp334) ; #line 510 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp332) ; break ; /* branch: __ats_lab_81 */ #line 511 "translate.dats" __ats_lab_81_0: #line 511 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 1) { goto __ats_lab_82_0 ; } #line 511 "translate.dats" __ats_lab_81_1: #line 512 "translate.dats" tmp336 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 512 "translate.dats" tmp337 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 512 "translate.dats" tmp335 = expbinop_minus_make_48 (tmp336, tmp337) ; #line 512 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp335) ; break ; /* branch: __ats_lab_82 */ #line 513 "translate.dats" __ats_lab_82_0: #line 513 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 2) { goto __ats_lab_83_0 ; } #line 513 "translate.dats" __ats_lab_82_1: #line 514 "translate.dats" tmp339 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__MUL) ; #line 514 "translate.dats" tmp340 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 514 "translate.dats" tmp341 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 514 "translate.dats" tmp338 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp338)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp338, atslab_0, tmp339) ; ats_selptrset_mac(anairiats_sum_13, tmp338, atslab_1, tmp340) ; ats_selptrset_mac(anairiats_sum_13, tmp338, atslab_2, tmp341) ; #line 514 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp338) ; break ; /* branch: __ats_lab_83 */ #line 515 "translate.dats" __ats_lab_83_0: #line 515 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 3) { goto __ats_lab_84_0 ; } #line 515 "translate.dats" __ats_lab_83_1: #line 516 "translate.dats" tmp343 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__DIV) ; #line 516 "translate.dats" tmp344 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 516 "translate.dats" tmp345 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 516 "translate.dats" tmp342 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp342)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp342, atslab_0, tmp343) ; ats_selptrset_mac(anairiats_sum_13, tmp342, atslab_1, tmp344) ; ats_selptrset_mac(anairiats_sum_13, tmp342, atslab_2, tmp345) ; #line 516 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp342) ; break ; /* branch: __ats_lab_84 */ #line 517 "translate.dats" __ats_lab_84_0: #line 517 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 4) { goto __ats_lab_88_0 ; } #line 517 "translate.dats" __ats_lab_84_1: #line 518 "translate.dats" tmp346 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_14, tmp327), atslab_exp_ty) ; #line 519 "translate.dats" tmp347 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 519 "translate.dats" tmp348 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 520 "translate.dats" do { /* branch: __ats_lab_85 */ #line 521 "translate.dats" __ats_lab_85_0: #line 521 "translate.dats" if (((ats_sum_ptr_type)tmp346)->tag != 1) { goto __ats_lab_86_0 ; } #line 521 "translate.dats" __ats_lab_85_1: #line 521 "translate.dats" tmp349 = ats_caselptr_mac(anairiats_sum_0, tmp346, atslab_0) ; #line 521 "translate.dats" tmp350 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol (tmp349, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_INT) ; #line 521 "translate.dats" if (!tmp350) { goto __ats_lab_86_1 ; } #line 521 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_51_closure_make (tmp347, tmp348)) ; break ; /* branch: __ats_lab_86 */ #line 524 "translate.dats" __ats_lab_86_0: #line 524 "translate.dats" if (((ats_sum_ptr_type)tmp346)->tag != 1) { goto __ats_lab_87_0 ; } #line 524 "translate.dats" __ats_lab_86_1: #line 524 "translate.dats" tmp353 = ats_caselptr_mac(anairiats_sum_0, tmp346, atslab_0) ; #line 524 "translate.dats" tmp354 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol (tmp353, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_STRING) ; #line 524 "translate.dats" if (!tmp354) { goto __ats_lab_87_1 ; } #line 525 "translate.dats" tmp355 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp355)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp355, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_eq_string_string) ; #line 527 "translate.dats" tmp357 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp357, atslab_0, tmp347) ; #line 527 "translate.dats" tmp358 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp357), atslab_1) ; #line 527 "translate.dats" tmp359 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp359, atslab_0, tmp348) ; #line 527 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp358) = tmp359 ; #line 527 "translate.dats" tmp358 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp359), atslab_1) ; #line 527 "translate.dats" tmp359 = (ats_sum_ptr_type)0 ; #line 527 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp358) = tmp359 ; #line 527 "translate.dats" tmp356 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp356)->tag = 5 ; ats_selptrset_mac(anairiats_sum_1, tmp356, atslab_0, tmp355) ; ats_selptrset_mac(anairiats_sum_1, tmp356, atslab_1, tmp357) ; #line 527 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp356) ; break ; /* branch: __ats_lab_87 */ #line 529 "translate.dats" __ats_lab_87_0: #line 529 "translate.dats" __ats_lab_87_1: #line 529 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_52_closure_make (tmp347, tmp348)) ; break ; } while (0) ; break ; /* branch: __ats_lab_88 */ #line 533 "translate.dats" __ats_lab_88_0: #line 533 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 5) { goto __ats_lab_92_0 ; } #line 533 "translate.dats" __ats_lab_88_1: #line 534 "translate.dats" tmp362 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_14, tmp327), atslab_exp_ty) ; #line 535 "translate.dats" tmp363 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 535 "translate.dats" tmp364 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 536 "translate.dats" do { /* branch: __ats_lab_89 */ #line 537 "translate.dats" __ats_lab_89_0: #line 537 "translate.dats" if (((ats_sum_ptr_type)tmp362)->tag != 1) { goto __ats_lab_90_0 ; } #line 537 "translate.dats" __ats_lab_89_1: #line 537 "translate.dats" tmp365 = ats_caselptr_mac(anairiats_sum_0, tmp362, atslab_0) ; #line 537 "translate.dats" tmp366 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol (tmp365, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_INT) ; #line 537 "translate.dats" if (!tmp366) { goto __ats_lab_90_1 ; } #line 537 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_53_closure_make (tmp363, tmp364)) ; break ; /* branch: __ats_lab_90 */ #line 540 "translate.dats" __ats_lab_90_0: #line 540 "translate.dats" if (((ats_sum_ptr_type)tmp362)->tag != 1) { goto __ats_lab_91_0 ; } #line 540 "translate.dats" __ats_lab_90_1: #line 540 "translate.dats" tmp369 = ats_caselptr_mac(anairiats_sum_0, tmp362, atslab_0) ; #line 540 "translate.dats" tmp370 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__eq_symbol_symbol (tmp369, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_STRING) ; #line 540 "translate.dats" if (!tmp370) { goto __ats_lab_91_1 ; } #line 541 "translate.dats" tmp371 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp371)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp371, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_neq_string_string) ; #line 543 "translate.dats" tmp373 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp373, atslab_0, tmp363) ; #line 543 "translate.dats" tmp374 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp373), atslab_1) ; #line 543 "translate.dats" tmp375 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp375, atslab_0, tmp364) ; #line 543 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp374) = tmp375 ; #line 543 "translate.dats" tmp374 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp375), atslab_1) ; #line 543 "translate.dats" tmp375 = (ats_sum_ptr_type)0 ; #line 543 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp374) = tmp375 ; #line 543 "translate.dats" tmp372 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp372)->tag = 5 ; ats_selptrset_mac(anairiats_sum_1, tmp372, atslab_0, tmp371) ; ats_selptrset_mac(anairiats_sum_1, tmp372, atslab_1, tmp373) ; #line 543 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp372) ; break ; /* branch: __ats_lab_91 */ #line 545 "translate.dats" __ats_lab_91_0: #line 545 "translate.dats" __ats_lab_91_1: #line 545 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_54_closure_make (tmp363, tmp364)) ; break ; } while (0) ; break ; /* branch: __ats_lab_92 */ #line 549 "translate.dats" __ats_lab_92_0: #line 549 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 6) { goto __ats_lab_93_0 ; } #line 549 "translate.dats" __ats_lab_92_1: #line 550 "translate.dats" tmp378 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 550 "translate.dats" tmp379 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 551 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_55_closure_make (tmp378, tmp379)) ; break ; /* branch: __ats_lab_93 */ #line 553 "translate.dats" __ats_lab_93_0: #line 553 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 7) { goto __ats_lab_94_0 ; } #line 553 "translate.dats" __ats_lab_93_1: #line 554 "translate.dats" tmp382 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 554 "translate.dats" tmp383 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 555 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_56_closure_make (tmp382, tmp383)) ; break ; /* branch: __ats_lab_94 */ #line 557 "translate.dats" __ats_lab_94_0: #line 557 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 8) { goto __ats_lab_95_0 ; } #line 557 "translate.dats" __ats_lab_94_1: #line 558 "translate.dats" tmp386 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 558 "translate.dats" tmp387 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 559 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_57_closure_make (tmp386, tmp387)) ; break ; /* branch: __ats_lab_95 */ #line 561 "translate.dats" __ats_lab_95_0: #line 561 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 9) { goto __ats_lab_96_0 ; } #line 561 "translate.dats" __ats_lab_95_1: #line 562 "translate.dats" tmp390 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp330) ; #line 562 "translate.dats" tmp391 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp331) ; #line 563 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_58_closure_make (tmp390, tmp391)) ; break ; /* branch: __ats_lab_96 */ #line 565 "translate.dats" __ats_lab_96_0: #line 565 "translate.dats" if (((ats_sum_ptr_type)tmp328)->tag != 10) { goto __ats_lab_97_0 ; } #line 565 "translate.dats" __ats_lab_96_1: #line 566 "translate.dats" tmp394 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 567 "translate.dats" tmp395 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp330) ; #line 567 "translate.dats" tmp396 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp331) ; #line 568 "translate.dats" tmp397 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp397)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp397, atslab_0, tmp394) ; #line 570 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_59_closure_make (tmp394, tmp395, tmp396, tmp397)) ; break ; /* branch: __ats_lab_97 */ #line 574 "translate.dats" __ats_lab_97_0: #line 574 "translate.dats" // if (((ats_sum_ptr_type)tmp328)->tag != 11) { ats_deadcode_failure_handle () ; } #line 574 "translate.dats" __ats_lab_97_1: #line 575 "translate.dats" tmp402 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 576 "translate.dats" tmp403 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp330) ; #line 576 "translate.dats" tmp404 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp331) ; #line 577 "translate.dats" tmp405 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp405)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp405, atslab_0, tmp402) ; #line 579 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 2 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, __ats_fun_60_closure_make (tmp402, tmp403, tmp404, tmp405)) ; break ; } while (0) ; break ; /* branch: __ats_lab_98 */ #line 584 "translate.dats" __ats_lab_98_0: #line 584 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 6) { goto __ats_lab_105_0 ; } #line 584 "translate.dats" __ats_lab_98_1: #line 584 "translate.dats" tmp410 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_0) ; #line 585 "translate.dats" tmp411 = list_length_01478_ats_ptr_type (tmp410) ; #line 586 "translate.dats" tmp416 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp416)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp416, atslab_0, tmp411) ; #line 587 "translate.dats" tmp417 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new () ; #line 588 "translate.dats" tmp418 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp418)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp418, atslab_0, tmp417) ; #line 589 "translate.dats" tmp419 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp419)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp419, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_array_alloc) ; #line 590 "translate.dats" tmp421 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp421, atslab_0, tmp416) ; #line 590 "translate.dats" tmp422 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp421), atslab_1) ; #line 590 "translate.dats" tmp423 = (ats_sum_ptr_type)0 ; #line 590 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp422) = tmp423 ; #line 590 "translate.dats" tmp420 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp420)->tag = 5 ; ats_selptrset_mac(anairiats_sum_1, tmp420, atslab_0, tmp419) ; ats_selptrset_mac(anairiats_sum_1, tmp420, atslab_1, tmp421) ; #line 591 "translate.dats" tmp424 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp424)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp424, atslab_0, tmp418) ; ats_selptrset_mac(anairiats_sum_1, tmp424, atslab_1, tmp420) ; #line 603 "translate.dats" tmp439 = (ats_sum_ptr_type)0 ; #line 603 "translate.dats" tmp438 = aux_63 (arg0, arg1, tmp418, tmp410, 0, tmp439) ; #line 604 "translate.dats" do { /* branch: __ats_lab_103 */ #line 605 "translate.dats" __ats_lab_103_0: #line 605 "translate.dats" if (tmp438 == (ats_sum_ptr_type)0) { goto __ats_lab_104_0 ; } #line 605 "translate.dats" __ats_lab_103_1: #line 605 "translate.dats" tmp441 = ats_caselptr_mac(anairiats_sum_5, tmp438, atslab_0) ; #line 605 "translate.dats" tmp442 = ats_caselptr_mac(anairiats_sum_5, tmp438, atslab_1) ; #line 606 "translate.dats" tmp443 = seq_stm_stmlst_rev_37 (tmp441, tmp442) ; #line 606 "translate.dats" tmp440 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp440)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp440, atslab_0, tmp424) ; ats_selptrset_mac(anairiats_sum_1, tmp440, atslab_1, tmp443) ; break ; /* branch: __ats_lab_104 */ #line 607 "translate.dats" __ats_lab_104_0: #line 607 "translate.dats" // if (tmp438 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 607 "translate.dats" __ats_lab_104_1: #line 607 "translate.dats" tmp440 = tmp424 ; break ; } while (0) ; #line 610 "translate.dats" tmp444 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp444)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp444, atslab_0, tmp440) ; ats_selptrset_mac(anairiats_sum_1, tmp444, atslab_1, tmp418) ; #line 610 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp444) ; break ; /* branch: __ats_lab_105 */ #line 612 "translate.dats" __ats_lab_105_0: #line 612 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 7) { goto __ats_lab_106_0 ; } #line 612 "translate.dats" __ats_lab_105_1: #line 612 "translate.dats" tmp445 = ats_caselptr_mac(anairiats_sum_0, tmp291, atslab_0) ; #line 612 "translate.dats" tmp290 = transExp1_SeqExp_33 (arg0, arg1, tmp445) ; break ; /* branch: __ats_lab_106 */ #line 613 "translate.dats" __ats_lab_106_0: #line 613 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 8) { goto __ats_lab_107_0 ; } #line 613 "translate.dats" __ats_lab_106_1: #line 613 "translate.dats" tmp446 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_0) ; #line 613 "translate.dats" tmp447 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_1) ; #line 614 "translate.dats" tmp448 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transVar1 (arg0, arg1, tmp446) ; #line 615 "translate.dats" tmp449 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp447) ; #line 617 "translate.dats" tmp451 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp448) ; #line 617 "translate.dats" tmp452 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp449) ; #line 617 "translate.dats" tmp450 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp450)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp450, atslab_0, tmp451) ; ats_selptrset_mac(anairiats_sum_1, tmp450, atslab_1, tmp452) ; #line 617 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp450) ; break ; /* branch: __ats_lab_107 */ #line 619 "translate.dats" __ats_lab_107_0: #line 619 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 9) { goto __ats_lab_110_0 ; } #line 619 "translate.dats" __ats_lab_107_1: #line 619 "translate.dats" tmp453 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_0) ; #line 619 "translate.dats" tmp454 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_1) ; #line 619 "translate.dats" tmp455 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_2) ; #line 621 "translate.dats" tmp456 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 622 "translate.dats" tmp457 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 623 "translate.dats" tmp458 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp453) ; #line 624 "translate.dats" tmp459 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp458) ; #line 625 "translate.dats" tmp460 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(tmp459))) (tmp459, tmp456, tmp457) ; #line 627 "translate.dats" do { /* branch: __ats_lab_108 */ #line 628 "translate.dats" __ats_lab_108_0: #line 628 "translate.dats" if (tmp455 == (ats_sum_ptr_type)0) { goto __ats_lab_109_0 ; } #line 628 "translate.dats" __ats_lab_108_1: #line 628 "translate.dats" tmp461 = ats_caselptr_mac(anairiats_sum_9, tmp455, atslab_0) ; #line 629 "translate.dats" tmp462 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new () ; #line 630 "translate.dats" tmp463 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp463)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp463, atslab_0, tmp462) ; #line 631 "translate.dats" tmp464 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 632 "translate.dats" tmp465 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp465)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp465, atslab_0, tmp464) ; #line 633 "translate.dats" tmp466 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp466)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp466, atslab_0, tmp456) ; #line 634 "translate.dats" tmp467 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp454) ; #line 635 "translate.dats" tmp469 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp467) ; #line 635 "translate.dats" tmp468 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp468)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp468, atslab_0, tmp463) ; ats_selptrset_mac(anairiats_sum_1, tmp468, atslab_1, tmp469) ; #line 636 "translate.dats" tmp471 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp471, atslab_0, tmp464) ; #line 636 "translate.dats" tmp472 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp471), atslab_1) ; #line 636 "translate.dats" tmp473 = (ats_sum_ptr_type)0 ; #line 636 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp472) = tmp473 ; #line 636 "translate.dats" tmp470 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp470)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp470, atslab_0, tmp465) ; ats_selptrset_mac(anairiats_sum_1, tmp470, atslab_1, tmp471) ; #line 637 "translate.dats" tmp474 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp474)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp474, atslab_0, tmp457) ; #line 638 "translate.dats" tmp475 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp461) ; #line 639 "translate.dats" tmp477 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp475) ; #line 639 "translate.dats" tmp476 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp476)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp476, atslab_0, tmp463) ; ats_selptrset_mac(anairiats_sum_1, tmp476, atslab_1, tmp477) ; #line 640 "translate.dats" tmp478 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp478)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp478, atslab_0, tmp464) ; #line 641 "translate.dats" tmp484 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp484)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp484, atslab_0, tmp476) ; ats_selptrset_mac(anairiats_sum_1, tmp484, atslab_1, tmp478) ; #line 641 "translate.dats" tmp483 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp483)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp483, atslab_0, tmp474) ; ats_selptrset_mac(anairiats_sum_1, tmp483, atslab_1, tmp484) ; #line 641 "translate.dats" tmp482 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp482)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp482, atslab_0, tmp470) ; ats_selptrset_mac(anairiats_sum_1, tmp482, atslab_1, tmp483) ; #line 641 "translate.dats" tmp481 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp481)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp481, atslab_0, tmp468) ; ats_selptrset_mac(anairiats_sum_1, tmp481, atslab_1, tmp482) ; #line 641 "translate.dats" tmp480 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp480)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp480, atslab_0, tmp466) ; ats_selptrset_mac(anairiats_sum_1, tmp480, atslab_1, tmp481) ; #line 641 "translate.dats" tmp479 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp479)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp479, atslab_0, tmp460) ; ats_selptrset_mac(anairiats_sum_1, tmp479, atslab_1, tmp480) ; #line 645 "translate.dats" tmp485 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp485)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp485, atslab_0, tmp479) ; ats_selptrset_mac(anairiats_sum_1, tmp485, atslab_1, tmp463) ; #line 645 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp485) ; break ; /* branch: __ats_lab_109 */ #line 647 "translate.dats" __ats_lab_109_0: #line 647 "translate.dats" // if (tmp455 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 647 "translate.dats" __ats_lab_109_1: #line 648 "translate.dats" tmp486 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp486)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp486, atslab_0, tmp456) ; #line 649 "translate.dats" tmp487 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp454) ; #line 650 "translate.dats" tmp488 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (tmp487) ; #line 651 "translate.dats" tmp489 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp489)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp489, atslab_0, tmp457) ; #line 653 "translate.dats" tmp492 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp492)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp492, atslab_0, tmp488) ; ats_selptrset_mac(anairiats_sum_1, tmp492, atslab_1, tmp489) ; #line 653 "translate.dats" tmp491 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp491)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp491, atslab_0, tmp486) ; ats_selptrset_mac(anairiats_sum_1, tmp491, atslab_1, tmp492) ; #line 653 "translate.dats" tmp490 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp490)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp490, atslab_0, tmp460) ; ats_selptrset_mac(anairiats_sum_1, tmp490, atslab_1, tmp491) ; #line 653 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp490) ; break ; } while (0) ; break ; /* branch: __ats_lab_110 */ #line 656 "translate.dats" __ats_lab_110_0: #line 656 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 10) { goto __ats_lab_111_0 ; } #line 656 "translate.dats" __ats_lab_110_1: #line 656 "translate.dats" tmp493 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_0) ; #line 656 "translate.dats" tmp494 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_1) ; #line 658 "translate.dats" tmp495 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 659 "translate.dats" tmp496 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 660 "translate.dats" tmp497 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 661 "translate.dats" /* tmp498 = */ theBreaklabLst_push_41 (tmp497) ; #line 662 "translate.dats" /* tmp499 = */ theContinuelabLst_push_44 (tmp495) ; #line 663 "translate.dats" tmp500 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp493) ; #line 664 "translate.dats" tmp501 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unCx (tmp500) ; #line 665 "translate.dats" tmp502 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp494) ; #line 666 "translate.dats" tmp503 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp503)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp503, atslab_0, tmp495) ; #line 667 "translate.dats" tmp504 = ((ats_ptr_type(*)(ats_clo_ptr_type, ats_ptr_type, ats_ptr_type))(ats_closure_fun(tmp501))) (tmp501, tmp496, tmp497) ; #line 668 "translate.dats" tmp505 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp505)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp505, atslab_0, tmp496) ; #line 669 "translate.dats" tmp506 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (tmp502) ; #line 670 "translate.dats" tmp508 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp508)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp508, atslab_0, tmp495) ; #line 670 "translate.dats" tmp509 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp509, atslab_0, tmp495) ; #line 670 "translate.dats" tmp510 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp509), atslab_1) ; #line 670 "translate.dats" tmp511 = (ats_sum_ptr_type)0 ; #line 670 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp510) = tmp511 ; #line 670 "translate.dats" tmp507 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp507)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp507, atslab_0, tmp508) ; ats_selptrset_mac(anairiats_sum_1, tmp507, atslab_1, tmp509) ; #line 671 "translate.dats" tmp512 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp512)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp512, atslab_0, tmp497) ; #line 672 "translate.dats" tmp517 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp517)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp517, atslab_0, tmp507) ; ats_selptrset_mac(anairiats_sum_1, tmp517, atslab_1, tmp512) ; #line 672 "translate.dats" tmp516 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp516)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp516, atslab_0, tmp506) ; ats_selptrset_mac(anairiats_sum_1, tmp516, atslab_1, tmp517) ; #line 672 "translate.dats" tmp515 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp515)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp515, atslab_0, tmp505) ; ats_selptrset_mac(anairiats_sum_1, tmp515, atslab_1, tmp516) ; #line 672 "translate.dats" tmp514 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp514)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp514, atslab_0, tmp504) ; ats_selptrset_mac(anairiats_sum_1, tmp514, atslab_1, tmp515) ; #line 672 "translate.dats" tmp513 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp513)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp513, atslab_0, tmp503) ; ats_selptrset_mac(anairiats_sum_1, tmp513, atslab_1, tmp514) ; #line 675 "translate.dats" /* tmp518 = */ theBreaklabLst_pop_42 () ; #line 675 "translate.dats" /* tmp519 = */ theContinuelabLst_pop_45 () ; #line 677 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp513) ; break ; /* branch: __ats_lab_111 */ #line 679 "translate.dats" __ats_lab_111_0: #line 679 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 11) { goto __ats_lab_112_0 ; } #line 679 "translate.dats" __ats_lab_111_1: #line 679 "translate.dats" tmp520 = ats_caselptr_mac(anairiats_sum_6, tmp291, atslab_0) ; #line 679 "translate.dats" tmp521 = ats_caselptr_mac(anairiats_sum_6, tmp291, atslab_1) ; #line 679 "translate.dats" tmp522 = ats_caselptr_mac(anairiats_sum_6, tmp291, atslab_2) ; #line 679 "translate.dats" tmp523 = ats_caselptr_mac(anairiats_sum_6, tmp291, atslab_3) ; #line 679 "translate.dats" tmp524 = ats_caselptr_mac(anairiats_sum_6, tmp291, atslab_4) ; #line 681 "translate.dats" tmp525 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp522) ; #line 682 "translate.dats" tmp526 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp525) ; #line 683 "translate.dats" tmp527 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp523) ; #line 684 "translate.dats" tmp528 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp527) ; #line 685 "translate.dats" tmp529 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get (arg0) ; #line 686 "translate.dats" tmp531 = ats_ptrget_mac(ats_bool_type, tmp521) ; #line 686 "translate.dats" tmp530 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_alloc_local (tmp529, tmp531) ; #line 687 "translate.dats" tmp533 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp533)->tag = 1 ; ats_selptrset_mac(anairiats_sum_1, tmp533, atslab_0, arg0) ; ats_selptrset_mac(anairiats_sum_1, tmp533, atslab_1, tmp530) ; #line 687 "translate.dats" tmp532 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (arg1, tmp520, tmp533) ; #line 688 "translate.dats" tmp534 = exp_make_level_access_30 (arg0, arg0, tmp530) ; #line 689 "translate.dats" tmp535 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp535)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp535, atslab_0, tmp534) ; ats_selptrset_mac(anairiats_sum_1, tmp535, atslab_1, tmp526) ; #line 690 "translate.dats" tmp536 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new () ; #line 691 "translate.dats" tmp537 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp537)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp537, atslab_0, tmp536) ; #line 692 "translate.dats" tmp538 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp538)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp538, atslab_0, tmp537) ; ats_selptrset_mac(anairiats_sum_1, tmp538, atslab_1, tmp528) ; #line 693 "translate.dats" tmp539 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp539)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp539, atslab_0, tmp535) ; ats_selptrset_mac(anairiats_sum_1, tmp539, atslab_1, tmp538) ; #line 694 "translate.dats" tmp540 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 695 "translate.dats" tmp541 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 696 "translate.dats" tmp542 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 697 "translate.dats" tmp543 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_new () ; #line 698 "translate.dats" /* tmp544 = */ theBreaklabLst_push_41 (tmp543) ; #line 699 "translate.dats" /* tmp545 = */ theContinuelabLst_push_44 (tmp541) ; #line 700 "translate.dats" tmp547 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LE) ; #line 700 "translate.dats" tmp546 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp546)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp546, atslab_0, tmp547) ; ats_selptrset_mac(anairiats_sum_6, tmp546, atslab_1, tmp534) ; ats_selptrset_mac(anairiats_sum_6, tmp546, atslab_2, tmp537) ; ats_selptrset_mac(anairiats_sum_6, tmp546, atslab_3, tmp540) ; ats_selptrset_mac(anairiats_sum_6, tmp546, atslab_4, tmp543) ; #line 701 "translate.dats" tmp548 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp548)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp548, atslab_0, tmp540) ; #line 702 "translate.dats" tmp549 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, tmp532, tmp524) ; #line 703 "translate.dats" tmp550 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unNx (tmp549) ; #line 704 "translate.dats" tmp551 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp551)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp551, atslab_0, tmp541) ; #line 705 "translate.dats" tmp553 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__LT) ; #line 705 "translate.dats" tmp552 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ((ats_sum_ptr_type)tmp552)->tag = 3 ; ats_selptrset_mac(anairiats_sum_6, tmp552, atslab_0, tmp553) ; ats_selptrset_mac(anairiats_sum_6, tmp552, atslab_1, tmp534) ; ats_selptrset_mac(anairiats_sum_6, tmp552, atslab_2, tmp537) ; ats_selptrset_mac(anairiats_sum_6, tmp552, atslab_3, tmp542) ; ats_selptrset_mac(anairiats_sum_6, tmp552, atslab_4, tmp543) ; #line 706 "translate.dats" tmp554 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp554)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp554, atslab_0, tmp551) ; ats_selptrset_mac(anairiats_sum_1, tmp554, atslab_1, tmp552) ; #line 707 "translate.dats" tmp555 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp555)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp555, atslab_0, tmp542) ; #line 708 "translate.dats" tmp557 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 708 "translate.dats" tmp556 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp556)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp556, atslab_0, tmp557) ; ats_selptrset_mac(anairiats_sum_13, tmp556, atslab_1, tmp534) ; ats_selptrset_mac(anairiats_sum_13, tmp556, atslab_2, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__exp_const_1) ; #line 709 "translate.dats" tmp558 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp558)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp558, atslab_0, tmp534) ; ats_selptrset_mac(anairiats_sum_1, tmp558, atslab_1, tmp556) ; #line 710 "translate.dats" tmp559 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp559)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp559, atslab_0, tmp555) ; ats_selptrset_mac(anairiats_sum_1, tmp559, atslab_1, tmp558) ; #line 711 "translate.dats" tmp561 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp561)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp561, atslab_0, tmp540) ; #line 711 "translate.dats" tmp562 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp562, atslab_0, tmp540) ; #line 711 "translate.dats" tmp563 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp562), atslab_1) ; #line 711 "translate.dats" tmp564 = (ats_sum_ptr_type)0 ; #line 711 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp563) = tmp564 ; #line 711 "translate.dats" tmp560 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp560)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp560, atslab_0, tmp561) ; ats_selptrset_mac(anairiats_sum_1, tmp560, atslab_1, tmp562) ; #line 712 "translate.dats" tmp565 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp565)->tag = 5 ; ats_selptrset_mac(anairiats_sum_0, tmp565, atslab_0, tmp543) ; #line 713 "translate.dats" tmp572 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp572)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp572, atslab_0, tmp560) ; ats_selptrset_mac(anairiats_sum_1, tmp572, atslab_1, tmp565) ; #line 713 "translate.dats" tmp571 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp571)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp571, atslab_0, tmp559) ; ats_selptrset_mac(anairiats_sum_1, tmp571, atslab_1, tmp572) ; #line 713 "translate.dats" tmp570 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp570)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp570, atslab_0, tmp554) ; ats_selptrset_mac(anairiats_sum_1, tmp570, atslab_1, tmp571) ; #line 713 "translate.dats" tmp569 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp569)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp569, atslab_0, tmp550) ; ats_selptrset_mac(anairiats_sum_1, tmp569, atslab_1, tmp570) ; #line 713 "translate.dats" tmp568 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp568)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp568, atslab_0, tmp548) ; ats_selptrset_mac(anairiats_sum_1, tmp568, atslab_1, tmp569) ; #line 713 "translate.dats" tmp567 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp567)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp567, atslab_0, tmp546) ; ats_selptrset_mac(anairiats_sum_1, tmp567, atslab_1, tmp568) ; #line 713 "translate.dats" tmp566 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp566)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp566, atslab_0, tmp539) ; ats_selptrset_mac(anairiats_sum_1, tmp566, atslab_1, tmp567) ; #line 716 "translate.dats" /* tmp573 = */ theBreaklabLst_pop_42 () ; #line 716 "translate.dats" /* tmp574 = */ theContinuelabLst_pop_45 () ; #line 718 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp566) ; break ; /* branch: __ats_lab_112 */ #line 720 "translate.dats" __ats_lab_112_0: #line 720 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 12) { goto __ats_lab_113_0 ; } #line 720 "translate.dats" __ats_lab_112_1: #line 721 "translate.dats" tmp575 = loop_breaklab_get_43 () ; #line 723 "translate.dats" tmp577 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp577)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp577, atslab_0, tmp575) ; #line 723 "translate.dats" tmp578 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp578, atslab_0, tmp575) ; #line 723 "translate.dats" tmp579 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp578), atslab_1) ; #line 723 "translate.dats" tmp580 = (ats_sum_ptr_type)0 ; #line 723 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp579) = tmp580 ; #line 723 "translate.dats" tmp576 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp576)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp576, atslab_0, tmp577) ; ats_selptrset_mac(anairiats_sum_1, tmp576, atslab_1, tmp578) ; #line 723 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp576) ; break ; /* branch: __ats_lab_113 */ #line 725 "translate.dats" __ats_lab_113_0: #line 725 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 13) { goto __ats_lab_114_0 ; } #line 725 "translate.dats" __ats_lab_113_1: #line 726 "translate.dats" tmp581 = loop_continuelab_get_46 () ; #line 728 "translate.dats" tmp583 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp583)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp583, atslab_0, tmp581) ; #line 728 "translate.dats" tmp584 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp584, atslab_0, tmp581) ; #line 728 "translate.dats" tmp585 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp584), atslab_1) ; #line 728 "translate.dats" tmp586 = (ats_sum_ptr_type)0 ; #line 728 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp585) = tmp586 ; #line 728 "translate.dats" tmp582 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp582)->tag = 2 ; ats_selptrset_mac(anairiats_sum_1, tmp582, atslab_0, tmp583) ; ats_selptrset_mac(anairiats_sum_1, tmp582, atslab_1, tmp584) ; #line 728 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp582) ; break ; /* branch: __ats_lab_114 */ #line 730 "translate.dats" __ats_lab_114_0: #line 730 "translate.dats" if (((ats_sum_ptr_type)tmp291)->tag != 14) { goto __ats_lab_117_0 ; } #line 730 "translate.dats" __ats_lab_114_1: #line 730 "translate.dats" tmp587 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_0) ; #line 730 "translate.dats" tmp588 = ats_caselptr_mac(anairiats_sum_1, tmp291, atslab_1) ; #line 731 "translate.dats" /* ats_ptr_type tmp589 ; */ #line 731 "translate.dats" tmp589 = arg1 ; #line 732 "translate.dats" /* ats_ptr_type tmp590 ; */ #line 732 "translate.dats" tmp590 = (ats_sum_ptr_type)0 ; #line 733 "translate.dats" /* tmp595 = */ loop_64 (arg0, (&tmp589), tmp587, (&tmp590)) ; #line 745 "translate.dats" tmp596 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, tmp589, tmp588) ; #line 747 "translate.dats" tmp598 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp596) ; #line 747 "translate.dats" tmp597 = eseq_stmlst_rev_exp_38 (tmp590, tmp598) ; #line 747 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp597) ; break ; /* branch: __ats_lab_117 */ #line 749 "translate.dats" __ats_lab_117_0: #line 749 "translate.dats" // if (((ats_sum_ptr_type)tmp291)->tag != 15) { ats_deadcode_failure_handle () ; } #line 749 "translate.dats" __ats_lab_117_1: #line 749 "translate.dats" tmp599 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_1) ; #line 749 "translate.dats" tmp600 = ats_caselptr_mac(anairiats_sum_13, tmp291, atslab_2) ; #line 750 "translate.dats" tmp601 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp599) ; #line 751 "translate.dats" tmp602 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, arg1, tmp600) ; #line 752 "translate.dats" tmp603 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp601) ; #line 752 "translate.dats" tmp604 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp602) ; #line 754 "translate.dats" tmp606 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp606)->tag = 1 ; ats_selptrset_mac(anairiats_sum_0, tmp606, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_array_make_elt) ; #line 754 "translate.dats" tmp607 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp607, atslab_0, tmp603) ; #line 754 "translate.dats" tmp608 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp607), atslab_1) ; #line 754 "translate.dats" tmp609 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp609, atslab_0, tmp604) ; #line 754 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp608) = tmp609 ; #line 754 "translate.dats" tmp608 = &ats_selptr_mac(ats_castptr_mac(anairiats_sum_5, tmp609), atslab_1) ; #line 754 "translate.dats" tmp609 = (ats_sum_ptr_type)0 ; #line 754 "translate.dats" ats_ptrget_mac(ats_ptr_type, tmp608) = tmp609 ; #line 754 "translate.dats" tmp605 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp605)->tag = 5 ; ats_selptrset_mac(anairiats_sum_1, tmp605, atslab_0, tmp606) ; ats_selptrset_mac(anairiats_sum_1, tmp605, atslab_1, tmp607) ; #line 754 "translate.dats" tmp290 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp290)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp290, atslab_0, tmp605) ; break ; } while (0) ; return (tmp290) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 24794(line=763, offs=7) -- 25483(line=782, offs=24) */ ATSstaticdec() ats_void_type loop1_66 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2, ats_ref_type arg3) { /* local vardec */ // ATSlocal_void (tmp611) ; ATSlocal (ats_ptr_type, tmp612) ; ATSlocal (ats_ptr_type, tmp613) ; ATSlocal (ats_int64_type, tmp614) ; ATSlocal (ats_ptr_type, tmp615) ; ATSlocal (ats_ptr_type, tmp616) ; ATSlocal (ats_ptr_type, tmp617) ; ATSlocal (ats_ptr_type, tmp618) ; ATSlocal (ats_ptr_type, tmp619) ; ATSlocal (ats_ptr_type, tmp620) ; ATSlocal (ats_int_type, tmp621) ; __ats_lab_loop1_66: #line 769 "translate.dats" do { /* branch: __ats_lab_118 */ #line 770 "translate.dats" __ats_lab_118_0: #line 770 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_121_0 ; } #line 770 "translate.dats" __ats_lab_118_1: #line 770 "translate.dats" tmp612 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 770 "translate.dats" tmp613 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 770 "translate.dats" do { /* branch: __ats_lab_119 */ #line 771 "translate.dats" __ats_lab_119_0: #line 771 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_120_0 ; } #line 771 "translate.dats" __ats_lab_119_1: #line 771 "translate.dats" tmp614 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_0) ; #line 771 "translate.dats" tmp615 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_1) ; #line 772 "translate.dats" tmp616 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp616)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp616, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__FP) ; #line 773 "translate.dats" tmp617 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_make_access (tmp616, tmp612) ; #line 774 "translate.dats" tmp618 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp618)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp618, atslab_0, tmp614) ; #line 775 "translate.dats" tmp620 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp620)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp620, atslab_0, tmp617) ; ats_selptrset_mac(anairiats_sum_1, tmp620, atslab_1, tmp618) ; #line 775 "translate.dats" tmp619 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp619, atslab_0, tmp620) ; ats_selptrset_mac(anairiats_sum_5, tmp619, atslab_1, ats_ptrget_mac(ats_ptr_type, arg3)) ; #line 775 "translate.dats" ats_ptrget_mac(ats_ptr_type, arg3) = tmp619 ; #line 777 "translate.dats" tmp621 = atspre_add_int_int (arg2, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 777 "translate.dats" arg0 = tmp615 ; #line 777 "translate.dats" arg1 = tmp613 ; #line 777 "translate.dats" arg2 = tmp621 ; #line 777 "translate.dats" arg3 = arg3 ; #line 777 "translate.dats" goto __ats_lab_loop1_66 ; // tail call break ; /* branch: __ats_lab_120 */ #line 779 "translate.dats" __ats_lab_120_0: #line 779 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 779 "translate.dats" __ats_lab_120_1: #line 779 "translate.dats" /* tmp611 = */ loop2_67 (tmp612, tmp613, arg2, arg3) ; break ; } while (0) ; break ; /* branch: __ats_lab_121 */ #line 782 "translate.dats" __ats_lab_121_0: #line 782 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 782 "translate.dats" __ats_lab_121_1: break ; } while (0) ; return /* (tmp611) */ ; } /* end of [loop1_66] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 25511(line=785, offs=7) -- 26167(line=806, offs=6) */ ATSstaticdec() ats_void_type loop2_67 (ats_ptr_type arg0, ats_ptr_type arg1, ats_int_type arg2, ats_ref_type arg3) { /* local vardec */ // ATSlocal_void (tmp622) ; ATSlocal (ats_bool_type, tmp624) ; ATSlocal (ats_ptr_type, tmp625) ; ATSlocal (ats_ptr_type, tmp626) ; ATSlocal (ats_ptr_type, tmp627) ; ATSlocal (ats_ptr_type, tmp628) ; ATSlocal (ats_ptr_type, tmp629) ; ATSlocal (ats_ptr_type, tmp630) ; ATSlocal (ats_ptr_type, tmp631) ; ATSlocal (ats_ptr_type, tmp632) ; ATSlocal (ats_ptr_type, tmp633) ; ATSlocal (ats_ptr_type, tmp634) ; ATSlocal (ats_int_type, tmp635) ; __ats_lab_loop2_67: #line 791 "translate.dats" tmp624 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__access_is_inreg (arg0) ; #line 791 "translate.dats" if (tmp624) { #line 792 "translate.dats" tmp625 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp625)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp625, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__FP) ; #line 793 "translate.dats" tmp626 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_make_access (tmp625, arg0) ; #line 795 "translate.dats" tmp629 = (ats_sum_ptr_type)(&_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__PLUS) ; #line 795 "translate.dats" tmp630 = ATS_MALLOC(sizeof(anairiats_sum_4)) ; ((ats_sum_ptr_type)tmp630)->tag = 0 ; ats_selptrset_mac(anairiats_sum_4, tmp630, atslab_0, arg2) ; #line 795 "translate.dats" tmp628 = ATS_MALLOC(sizeof(anairiats_sum_13)) ; ((ats_sum_ptr_type)tmp628)->tag = 3 ; ats_selptrset_mac(anairiats_sum_13, tmp628, atslab_0, tmp629) ; ats_selptrset_mac(anairiats_sum_13, tmp628, atslab_1, tmp625) ; ats_selptrset_mac(anairiats_sum_13, tmp628, atslab_2, tmp630) ; #line 795 "translate.dats" tmp627 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp627)->tag = 4 ; ats_selptrset_mac(anairiats_sum_0, tmp627, atslab_0, tmp628) ; #line 796 "translate.dats" tmp632 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp632)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp632, atslab_0, tmp626) ; ats_selptrset_mac(anairiats_sum_1, tmp632, atslab_1, tmp627) ; #line 796 "translate.dats" tmp631 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp631, atslab_0, tmp632) ; ats_selptrset_mac(anairiats_sum_5, tmp631, atslab_1, ats_ptrget_mac(ats_ptr_type, arg3)) ; #line 796 "translate.dats" ats_ptrget_mac(ats_ptr_type, arg3) = tmp631 ; } else { /* empty */ } /* end of [if] */ #line 803 "translate.dats" do { /* branch: __ats_lab_122 */ #line 804 "translate.dats" __ats_lab_122_0: #line 804 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_123_0 ; } #line 804 "translate.dats" __ats_lab_122_1: #line 804 "translate.dats" tmp633 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 804 "translate.dats" tmp634 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 804 "translate.dats" tmp635 = atspre_add_int_int (arg2, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 804 "translate.dats" arg0 = tmp633 ; #line 804 "translate.dats" arg1 = tmp634 ; #line 804 "translate.dats" arg2 = tmp635 ; #line 804 "translate.dats" arg3 = arg3 ; #line 804 "translate.dats" goto __ats_lab_loop2_67 ; // tail call break ; /* branch: __ats_lab_123 */ #line 805 "translate.dats" __ats_lab_123_0: #line 805 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 805 "translate.dats" __ats_lab_123_1: break ; } while (0) ; return /* (tmp622) */ ; } /* end of [loop2_67] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 26367(line=813, offs=13) -- 26561(line=816, offs=35) */ ATSstaticdec() ats_ptr_type loop_68 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp640) ; ATSlocal (ats_ptr_type, tmp641) ; ATSlocal (ats_ptr_type, tmp642) ; ATSlocal (ats_ptr_type, tmp643) ; __ats_lab_loop_68: #line 814 "translate.dats" do { /* branch: __ats_lab_125 */ #line 815 "translate.dats" __ats_lab_125_0: #line 815 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_126_0 ; } #line 815 "translate.dats" __ats_lab_125_1: #line 815 "translate.dats" tmp641 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 815 "translate.dats" tmp642 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 815 "translate.dats" ATS_FREE(arg0) ; #line 815 "translate.dats" tmp643 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp643)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp643, atslab_0, tmp641) ; ats_selptrset_mac(anairiats_sum_1, tmp643, atslab_1, arg1) ; #line 815 "translate.dats" arg0 = tmp642 ; #line 815 "translate.dats" arg1 = tmp643 ; #line 815 "translate.dats" goto __ats_lab_loop_68 ; // tail call break ; /* branch: __ats_lab_126 */ #line 816 "translate.dats" __ats_lab_126_0: #line 816 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 816 "translate.dats" __ats_lab_126_1: #line 816 "translate.dats" tmp640 = arg1 ; break ; } while (0) ; return (tmp640) ; } /* end of [loop_68] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 24683(line=760, offs=4) -- 26655(line=821, offs=4) */ ATSstaticdec() ats_ptr_type funarglst_move_65 (ats_ptr_type arg0, ats_int_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp610) ; ATSlocal (ats_ptr_type, tmp636) ; // ATSlocal_void (tmp637) ; ATSlocal (ats_ptr_type, tmp638) ; ATSlocal (ats_ptr_type, tmp639) ; __ats_lab_funarglst_move_65: #line 808 "translate.dats" /* ats_ptr_type tmp636 ; */ #line 808 "translate.dats" tmp636 = (ats_sum_ptr_type)0 ; #line 809 "translate.dats" /* tmp637 = */ loop1_66 (_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theFunargReglst, arg0, arg1, (&tmp636)) ; #line 811 "translate.dats" do { /* branch: __ats_lab_124 */ #line 812 "translate.dats" __ats_lab_124_0: #line 812 "translate.dats" if (tmp636 == (ats_sum_ptr_type)0) { goto __ats_lab_127_0 ; } #line 812 "translate.dats" __ats_lab_124_1: #line 812 "translate.dats" tmp638 = ats_caselptr_mac(anairiats_sum_5, tmp636, atslab_0) ; #line 812 "translate.dats" tmp639 = ats_caselptr_mac(anairiats_sum_5, tmp636, atslab_1) ; #line 812 "translate.dats" ATS_FREE(tmp636) ; #line 812 "translate.dats" tmp610 = loop_68 (tmp639, tmp638) ; break ; /* branch: __ats_lab_127 */ #line 819 "translate.dats" __ats_lab_127_0: #line 819 "translate.dats" // if (tmp636 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 819 "translate.dats" __ats_lab_127_1: #line 819 "translate.dats" tmp610 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__stm_nop ; break ; } while (0) ; return (tmp610) ; } /* end of [funarglst_move_65] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 26771(line=827, offs=7) -- 27173(line=836, offs=49) */ ATSstaticdec() anairiats_rec_15 aux_70 (ats_ptr_type arg0) { /* local vardec */ ATSlocal (anairiats_rec_15, tmp645) ; ATSlocal (ats_int64_type, tmp646) ; ATSlocal (ats_ptr_type, tmp647) ; ATSlocal (ats_int64_type, tmp648) ; ATSlocal (ats_ptr_type, tmp649) ; ATSlocal (ats_ptr_type, tmp650) ; ATSlocal (ats_ptr_type, tmp651) ; ATSlocal (anairiats_rec_15, tmp652) ; ATSlocal (ats_ptr_type, tmp653) ; ATSlocal (ats_ptr_type, tmp654) ; ATSlocal (ats_ptr_type, tmp655) ; ATSlocal (ats_ptr_type, tmp656) ; ATSlocal (ats_ptr_type, tmp657) ; __ats_lab_aux_70: #line 828 "translate.dats" do { /* branch: __ats_lab_128 */ #line 829 "translate.dats" __ats_lab_128_0: #line 829 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_129_0 ; } #line 829 "translate.dats" __ats_lab_128_1: #line 829 "translate.dats" tmp646 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_0) ; #line 829 "translate.dats" tmp647 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_1) ; #line 830 "translate.dats" tmp648 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__temp_make_new () ; #line 831 "translate.dats" tmp650 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp650)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp650, atslab_0, tmp648) ; #line 831 "translate.dats" tmp651 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp651)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp651, atslab_0, tmp646) ; #line 831 "translate.dats" tmp649 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp649)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp649, atslab_0, tmp650) ; ats_selptrset_mac(anairiats_sum_1, tmp649, atslab_1, tmp651) ; #line 832 "translate.dats" tmp652 = aux_70 (tmp647) ; #line 834 "translate.dats" tmp654 = ats_select_mac(tmp652, atslab_0) ; #line 834 "translate.dats" tmp653 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp653)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp653, atslab_0, tmp649) ; ats_selptrset_mac(anairiats_sum_1, tmp653, atslab_1, tmp654) ; #line 834 "translate.dats" tmp656 = ats_select_mac(tmp652, atslab_1) ; #line 834 "translate.dats" tmp655 = ATS_MALLOC(sizeof(anairiats_sum_17)) ; ats_selptrset_mac(anairiats_sum_17, tmp655, atslab_0, tmp648) ; ats_selptrset_mac(anairiats_sum_17, tmp655, atslab_1, tmp656) ; #line 834 "translate.dats" tmp645.atslab_0 = tmp653 ; tmp645.atslab_1 = tmp655 ; break ; /* branch: __ats_lab_129 */ #line 836 "translate.dats" __ats_lab_129_0: #line 836 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 836 "translate.dats" __ats_lab_129_1: #line 836 "translate.dats" tmp657 = (ats_sum_ptr_type)0 ; #line 836 "translate.dats" tmp645.atslab_0 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__stm_nop ; tmp645.atslab_1 = tmp657 ; break ; } while (0) ; return (tmp645) ; } /* end of [aux_70] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 26708(line=825, offs=4) -- 27230(line=840, offs=4) */ ATSstaticdec() anairiats_rec_15 calleesaved_save_69 () { /* local vardec */ ATSlocal (anairiats_rec_15, tmp644) ; __ats_lab_calleesaved_save_69: #line 839 "translate.dats" tmp644 = aux_70 (_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCalleesavedReglst) ; return (tmp644) ; } /* end of [calleesaved_save_69] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 27333(line=844, offs=7) -- 27840(line=856, offs=37) */ ATSstaticdec() ats_ptr_type aux_72 (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp659) ; ATSlocal (ats_int64_type, tmp660) ; ATSlocal (ats_ptr_type, tmp661) ; ATSlocal (ats_int64_type, tmp662) ; ATSlocal (ats_ptr_type, tmp663) ; ATSlocal (ats_ptr_type, tmp664) ; ATSlocal (ats_ptr_type, tmp665) ; ATSlocal (ats_ptr_type, tmp666) ; ATSlocal (ats_ptr_type, tmp667) ; __ats_lab_aux_72: #line 846 "translate.dats" do { /* branch: __ats_lab_130 */ #line 847 "translate.dats" __ats_lab_130_0: #line 847 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_133_0 ; } #line 847 "translate.dats" __ats_lab_130_1: #line 847 "translate.dats" tmp660 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_0) ; #line 847 "translate.dats" tmp661 = ats_caselptr_mac(anairiats_sum_17, arg0, atslab_1) ; #line 847 "translate.dats" ATS_FREE(arg0) ; #line 847 "translate.dats" do { /* branch: __ats_lab_131 */ #line 848 "translate.dats" __ats_lab_131_0: #line 848 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_132_0 ; } #line 848 "translate.dats" __ats_lab_131_1: #line 848 "translate.dats" tmp662 = ats_caselptr_mac(anairiats_sum_17, arg1, atslab_0) ; #line 848 "translate.dats" tmp663 = ats_caselptr_mac(anairiats_sum_17, arg1, atslab_1) ; #line 849 "translate.dats" tmp665 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp665)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp665, atslab_0, tmp662) ; #line 849 "translate.dats" tmp666 = ATS_MALLOC(sizeof(anairiats_sum_3)) ; ((ats_sum_ptr_type)tmp666)->tag = 2 ; ats_selptrset_mac(anairiats_sum_3, tmp666, atslab_0, tmp660) ; #line 849 "translate.dats" tmp664 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp664)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp664, atslab_0, tmp665) ; ats_selptrset_mac(anairiats_sum_1, tmp664, atslab_1, tmp666) ; #line 850 "translate.dats" tmp667 = aux_72 (tmp661, tmp663) ; #line 852 "translate.dats" tmp659 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp659)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp659, atslab_0, tmp664) ; ats_selptrset_mac(anairiats_sum_1, tmp659, atslab_1, tmp667) ; break ; /* branch: __ats_lab_132 */ #line 854 "translate.dats" __ats_lab_132_0: #line 854 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 854 "translate.dats" __ats_lab_132_1: #line 854 "translate.dats" arg0 = tmp661 ; #line 854 "translate.dats" arg1 = arg1 ; #line 854 "translate.dats" goto __ats_lab_aux_72 ; // tail call break ; } while (0) ; break ; /* branch: __ats_lab_133 */ #line 856 "translate.dats" __ats_lab_133_0: #line 856 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 856 "translate.dats" __ats_lab_133_1: #line 856 "translate.dats" tmp659 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__stm_nop ; break ; } while (0) ; return (tmp659) ; } /* end of [aux_72] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 27263(line=842, offs=4) -- 27907(line=860, offs=4) */ ATSstaticdec() ats_ptr_type calleesaved_restore_71 (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp658) ; __ats_lab_calleesaved_restore_71: #line 859 "translate.dats" tmp658 = aux_72 (arg0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCalleesavedReglst) ; return (tmp658) ; } /* end of [calleesaved_restore_71] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 28304(line=875, offs=9) -- 28522(line=879, offs=35) */ ATSstaticdec() ats_ptr_type aux_74 (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp672) ; ATSlocal (ats_ptr_type, tmp673) ; ATSlocal (ats_ptr_type, tmp674) ; ATSlocal (ats_ptr_type, tmp675) ; ATSlocal (ats_bool_type, tmp676) ; ATSlocal (ats_ptr_type, tmp677) ; __ats_lab_aux_74: #line 875 "translate.dats" do { /* branch: __ats_lab_134 */ #line 876 "translate.dats" __ats_lab_134_0: #line 876 "translate.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_135_0 ; } #line 876 "translate.dats" __ats_lab_134_1: #line 876 "translate.dats" tmp673 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_0) ; #line 876 "translate.dats" tmp674 = ats_caselptr_mac(anairiats_sum_5, arg0, atslab_1) ; #line 877 "translate.dats" tmp675 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_19, tmp673), atslab_fieldtyp_escape) ; #line 877 "translate.dats" tmp676 = ats_ptrget_mac(ats_bool_type, tmp675) ; #line 877 "translate.dats" tmp677 = aux_74 (tmp674) ; #line 877 "translate.dats" tmp672 = ATS_MALLOC(sizeof(anairiats_sum_20)) ; ats_selptrset_mac(anairiats_sum_20, tmp672, atslab_0, tmp676) ; ats_selptrset_mac(anairiats_sum_20, tmp672, atslab_1, tmp677) ; break ; /* branch: __ats_lab_135 */ #line 879 "translate.dats" __ats_lab_135_0: #line 879 "translate.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 879 "translate.dats" __ats_lab_135_1: #line 879 "translate.dats" tmp672 = (ats_sum_ptr_type)0 ; break ; } while (0) ; return (tmp672) ; } /* end of [aux_74] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 18216(line=635, offs=7) -- 18589(line=646, offs=6) */ ATSstaticdec() ats_void_type loop_76 (ats_ptr_type arg0, ats_bool_type arg1, ats_ref_type arg2) { /* local vardec */ // ATSlocal_void (tmp682) ; ATSlocal (ats_bool_type, tmp683) ; ATSlocal (ats_ptr_type, tmp684) ; ATSlocal (ats_ptr_type, tmp685) ; ATSlocal (ats_ptr_type, tmp686) ; ATSlocal (ats_ptr_type, tmp687) ; ATSlocal (ats_ptr_type, tmp688) ; __ats_lab_loop_76: #line 639 "list.dats" do { /* branch: __ats_lab_136 */ #line 640 "list.dats" __ats_lab_136_0: #line 640 "list.dats" if (arg0 == (ats_sum_ptr_type)0) { goto __ats_lab_137_0 ; } #line 640 "list.dats" __ats_lab_136_1: #line 640 "list.dats" tmp683 = ats_caselptr_mac(anairiats_sum_20, arg0, atslab_0) ; #line 640 "list.dats" tmp684 = ats_caselptr_mac(anairiats_sum_20, arg0, atslab_1) ; #line 641 "list.dats" tmp685 = ATS_MALLOC(sizeof(anairiats_sum_20)) ; ats_selptrset_mac(anairiats_sum_20, tmp685, atslab_0, tmp683) ; #line 641 "list.dats" ats_ptrget_mac(ats_ptr_type, arg2) = tmp685 ; #line 641 "list.dats" if (ats_ptrget_mac(ats_ptr_type, arg2) == (ats_sum_ptr_type)0) { ats_caseof_failure_handle ("/home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 18429(line=641, offs=60) -- 18455(line=641, offs=86)") ; } #line 641 "list.dats" tmp686 = &ats_caselptr_mac(anairiats_sum_20, ats_ptrget_mac(ats_ptr_type, arg2), atslab_1) ; #line 643 "list.dats" arg0 = tmp684 ; #line 643 "list.dats" arg1 = arg1 ; #line 643 "list.dats" arg2 = tmp686 ; #line 643 "list.dats" goto __ats_lab_loop_76 ; // tail call break ; /* branch: __ats_lab_137 */ #line 645 "list.dats" __ats_lab_137_0: #line 645 "list.dats" // if (arg0 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 645 "list.dats" __ats_lab_137_1: #line 645 "list.dats" tmp688 = (ats_sum_ptr_type)0 ; #line 645 "list.dats" tmp687 = ATS_MALLOC(sizeof(anairiats_sum_20)) ; ats_selptrset_mac(anairiats_sum_20, tmp687, atslab_0, arg1) ; ats_selptrset_mac(anairiats_sum_20, tmp687, atslab_1, tmp688) ; #line 645 "list.dats" ats_ptrget_mac(ats_ptr_type, arg2) = tmp687 ; break ; } while (0) ; return /* (tmp682) */ ; } /* end of [loop_76] */ /* // /home/fac2/hwxi/research/ATS/IMPLEMENT/Geizella/Anairiats/svn/ats-lang/prelude/DATS/list.dats: 18158(line=633, offs=13) -- 18638(line=649, offs=4) */ ATSstaticdec() ats_ptr_type list_extend_01405_ats_bool_type (ats_ptr_type arg0, ats_bool_type arg1) { /* local vardec */ ATSlocal (ats_ptr_type, tmp680) ; ATSlocal (ats_ptr_type, tmp681) ; // ATSlocal_void (tmp689) ; __ats_lab_list_extend_01405_ats_bool_type: #line 634 "list.dats" /* ats_ptr_type tmp681 ; */ #line 648 "list.dats" /* tmp689 = */ loop_76 (arg0, arg1, (&tmp681)) ; #line 648 "list.dats" tmp680 = tmp681 ; return (tmp680) ; } /* end of [list_extend_01405_ats_bool_type] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 27965(line=864, offs=4) -- 29122(line=899, offs=4) */ ATSstaticdec() ats_ptr_type transFundec1_fst_73 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp668) ; ATSlocal (ats_ptr_type, tmp669) ; ATSlocal (ats_ptr_type, tmp670) ; ATSlocal (ats_ptr_type, tmp671) ; ATSlocal (ats_ptr_type, tmp678) ; ATSlocal (ats_ptr_type, tmp679) ; ATSlocal (ats_int_type, tmp690) ; ATSlocal (ats_int_type, tmp691) ; ATSlocal (ats_int_type, tmp692) ; ATSlocal (ats_ptr_type, tmp693) ; ATSlocal (ats_ptr_type, tmp694) ; ATSlocal (ats_int64_type, tmp695) ; ATSlocal (ats_ptr_type, tmp696) ; ATSlocal (ats_ptr_type, tmp697) ; ATSlocal (ats_ptr_type, tmp698) ; ATSlocal (ats_ptr_type, tmp699) ; __ats_lab_transFundec1_fst_73: #line 872 "translate.dats" tmp670 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_18, arg2), atslab_fundec_name) ; #line 872 "translate.dats" tmp669 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__label_make_fun_new (tmp670) ; #line 873 "translate.dats" tmp671 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_18, arg2), atslab_fundec_arglst) ; #line 874 "translate.dats" tmp678 = aux_74 (tmp671) ; #line 882 "translate.dats" tmp679 = list_extend_01405_ats_bool_type (tmp678, ats_true_bool) ; #line 884 "translate.dats" /* ats_int_type tmp690 ; */ #line 884 "translate.dats" tmp690 = 0 ; #line 886 "translate.dats" tmp691 = atspre_add_int_int (tmp690, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 886 "translate.dats" tmp690 = tmp691 ; #line 889 "translate.dats" tmp692 = atspre_add_int_int (tmp690, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__WORDSIZE) ; #line 889 "translate.dats" tmp690 = tmp692 ; #line 891 "translate.dats" tmp693 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_make_new (tmp669, tmp690, ats_castfn_mac(ats_ptr_type, tmp679)) ; #line 892 "translate.dats" tmp694 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_arglst_get (tmp693) ; #line 893 "translate.dats" tmp695 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__stamp_make () ; #line 894 "translate.dats" tmp696 = ATS_MALLOC(sizeof(anairiats_sum_7)) ; ((ats_sum_ptr_type)tmp696)->tag = 1 ; ats_selptrset_mac(anairiats_sum_7, tmp696, atslab_0, tmp695) ; ats_selptrset_mac(anairiats_sum_7, tmp696, atslab_1, tmp693) ; ats_selptrset_mac(anairiats_sum_7, tmp696, atslab_2, arg0) ; #line 896 "translate.dats" tmp698 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_18, arg2), atslab_fundec_name) ; #line 896 "translate.dats" tmp699 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp699)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp699, atslab_0, tmp669) ; ats_selptrset_mac(anairiats_sum_1, tmp699, atslab_1, tmp696) ; #line 896 "translate.dats" tmp697 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (ats_ptrget_mac(ats_ptr_type, arg1), tmp698, tmp699) ; #line 895 "translate.dats" ats_ptrget_mac(ats_ptr_type, arg1) = tmp697 ; #line 898 "translate.dats" tmp668 = tmp696 ; return (tmp668) ; } /* end of [transFundec1_fst_73] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 29433(line=908, offs=9) -- 29849(line=920, offs=8) */ ATSstaticdec() ats_ptr_type loop_78 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2, ats_ptr_type arg3) { /* local vardec */ ATSlocal (ats_ptr_type, tmp705) ; ATSlocal (ats_ptr_type, tmp706) ; ATSlocal (ats_ptr_type, tmp707) ; ATSlocal (ats_ptr_type, tmp708) ; ATSlocal (ats_ptr_type, tmp709) ; ATSlocal (ats_ptr_type, tmp710) ; ATSlocal (ats_ptr_type, tmp711) ; ATSlocal (ats_ptr_type, tmp712) ; __ats_lab_loop_78: #line 913 "translate.dats" do { /* branch: __ats_lab_138 */ #line 914 "translate.dats" __ats_lab_138_0: #line 914 "translate.dats" if (arg2 == (ats_sum_ptr_type)0) { goto __ats_lab_139_0 ; } #line 914 "translate.dats" __ats_lab_138_1: #line 914 "translate.dats" if (arg3 == (ats_sum_ptr_type)0) { goto __ats_lab_139_1 ; } #line 914 "translate.dats" __ats_lab_138_2: #line 914 "translate.dats" tmp706 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_0) ; #line 914 "translate.dats" tmp707 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_1) ; #line 914 "translate.dats" tmp708 = ats_caselptr_mac(anairiats_sum_5, arg3, atslab_0) ; #line 914 "translate.dats" tmp709 = ats_caselptr_mac(anairiats_sum_5, arg3, atslab_1) ; #line 915 "translate.dats" tmp710 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp710)->tag = 1 ; ats_selptrset_mac(anairiats_sum_1, tmp710, atslab_0, arg0) ; ats_selptrset_mac(anairiats_sum_1, tmp710, atslab_1, tmp708) ; #line 917 "translate.dats" tmp712 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_19, tmp706), atslab_fieldtyp_lab) ; #line 916 "translate.dats" tmp711 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (arg1, tmp712, tmp710) ; #line 917 "translate.dats" arg0 = arg0 ; #line 917 "translate.dats" arg1 = tmp711 ; #line 917 "translate.dats" arg2 = tmp707 ; #line 917 "translate.dats" arg3 = tmp709 ; #line 917 "translate.dats" goto __ats_lab_loop_78 ; // tail call break ; /* branch: __ats_lab_139 */ #line 919 "translate.dats" __ats_lab_139_0: #line 919 "translate.dats" __ats_lab_139_1: #line 919 "translate.dats" __ats_lab_139_2: #line 919 "translate.dats" tmp705 = arg1 ; break ; } while (0) ; return (tmp705) ; } /* end of [loop_78] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 29156(line=901, offs=4) -- 30540(line=936, offs=4) */ ATSstaticdec() ats_void_type transFundec1_snd_77 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ // ATSlocal_void (tmp700) ; ATSlocal (ats_ptr_type, tmp701) ; ATSlocal (ats_ptr_type, tmp702) ; ATSlocal (ats_int_type, tmp703) ; ATSlocal (ats_ptr_type, tmp704) ; ATSlocal (ats_ptr_type, tmp713) ; ATSlocal (anairiats_rec_15, tmp714) ; ATSlocal (ats_ptr_type, tmp715) ; ATSlocal (ats_ptr_type, tmp716) ; ATSlocal (ats_ptr_type, tmp717) ; ATSlocal (ats_ptr_type, tmp718) ; ATSlocal (ats_ptr_type, tmp719) ; ATSlocal (ats_ptr_type, tmp720) ; ATSlocal (ats_ptr_type, tmp721) ; ATSlocal (ats_ptr_type, tmp722) ; ATSlocal (ats_ptr_type, tmp723) ; ATSlocal (ats_ptr_type, tmp724) ; ATSlocal (ats_ptr_type, tmp725) ; ATSlocal (ats_ptr_type, tmp726) ; ATSlocal (ats_ptr_type, tmp727) ; ATSlocal (ats_ptr_type, tmp728) ; ATSlocal (ats_ptr_type, tmp729) ; __ats_lab_transFundec1_snd_77: #line 903 "translate.dats" tmp701 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_18, arg1), atslab_fundec_arglst) ; #line 904 "translate.dats" tmp702 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get (arg2) ; #line 905 "translate.dats" tmp703 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_argofs_get (tmp702) ; #line 906 "translate.dats" tmp704 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_arglst_get (tmp702) ; #line 907 "translate.dats" tmp713 = loop_78 (arg2, arg0, tmp701, tmp704) ; #line 922 "translate.dats" tmp714 = calleesaved_save_69 () ; #line 923 "translate.dats" tmp715 = ats_select_mac(tmp714, atslab_0) ; #line 924 "translate.dats" tmp717 = ats_select_mac(tmp714, atslab_1) ; #line 924 "translate.dats" tmp716 = calleesaved_restore_71 (tmp717) ; #line 926 "translate.dats" tmp719 = (ats_sum_ptr_type)0 ; #line 926 "translate.dats" tmp718 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp718)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp718, atslab_0, tmp719) ; ats_selptrset_mac(anairiats_sum_1, tmp718, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCallersavedReglst) ; #line 927 "translate.dats" tmp720 = funarglst_move_65 (tmp704, tmp703) ; #line 928 "translate.dats" tmp722 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_18, arg1), atslab_fundec_body) ; #line 928 "translate.dats" tmp721 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg2, tmp713, tmp722) ; #line 929 "translate.dats" tmp724 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp721) ; #line 929 "translate.dats" tmp723 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp723)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp723, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_RV) ; ats_selptrset_mac(anairiats_sum_1, tmp723, atslab_1, tmp724) ; #line 930 "translate.dats" tmp725 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp725)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp725, atslab_0, tmp723) ; ats_selptrset_mac(anairiats_sum_1, tmp725, atslab_1, tmp716) ; #line 931 "translate.dats" tmp726 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp726)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp726, atslab_0, tmp720) ; ats_selptrset_mac(anairiats_sum_1, tmp726, atslab_1, tmp725) ; #line 932 "translate.dats" tmp727 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp727)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp727, atslab_0, tmp718) ; ats_selptrset_mac(anairiats_sum_1, tmp727, atslab_1, tmp726) ; #line 933 "translate.dats" tmp728 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp728)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp728, atslab_0, tmp715) ; ats_selptrset_mac(anairiats_sum_1, tmp728, atslab_1, tmp727) ; #line 935 "translate.dats" tmp729 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp729)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp729, atslab_0, tmp702) ; ats_selptrset_mac(anairiats_sum_1, tmp729, atslab_1, tmp728) ; #line 935 "translate.dats" /* tmp700 = */ _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_theFraglst_add (tmp729) ; return /* (tmp700) */ ; } /* end of [transFundec1_snd_77] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 31337(line=961, offs=11) -- 31654(line=967, offs=37) */ ATSstaticdec() ats_ptr_type aux1_80 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2) { /* local vardec */ ATSlocal (ats_ptr_type, tmp746) ; ATSlocal (ats_ptr_type, tmp747) ; ATSlocal (ats_ptr_type, tmp748) ; ATSlocal (ats_ptr_type, tmp749) ; ATSlocal (ats_ptr_type, tmp750) ; __ats_lab_aux1_80: #line 962 "translate.dats" do { /* branch: __ats_lab_142 */ #line 963 "translate.dats" __ats_lab_142_0: #line 963 "translate.dats" if (arg2 == (ats_sum_ptr_type)0) { goto __ats_lab_143_0 ; } #line 963 "translate.dats" __ats_lab_142_1: #line 963 "translate.dats" tmp747 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_0) ; #line 963 "translate.dats" tmp748 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_1) ; #line 964 "translate.dats" tmp749 = transFundec1_fst_73 (arg0, arg1, tmp747) ; #line 965 "translate.dats" tmp750 = aux1_80 (arg0, arg1, tmp748) ; #line 965 "translate.dats" tmp746 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp746, atslab_0, tmp749) ; ats_selptrset_mac(anairiats_sum_5, tmp746, atslab_1, tmp750) ; break ; /* branch: __ats_lab_143 */ #line 967 "translate.dats" __ats_lab_143_0: #line 967 "translate.dats" // if (arg2 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 967 "translate.dats" __ats_lab_143_1: #line 967 "translate.dats" tmp746 = (ats_sum_ptr_type)0 ; break ; } while (0) ; return (tmp746) ; } /* end of [aux1_80] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 31761(line=971, offs=11) -- 32078(line=978, offs=28) */ ATSstaticdec() ats_void_type aux2_81 (ats_ptr_type arg0, ats_ptr_type arg1, ats_ptr_type arg2) { /* local vardec */ // ATSlocal_void (tmp752) ; ATSlocal (ats_ptr_type, tmp753) ; ATSlocal (ats_ptr_type, tmp754) ; ATSlocal (ats_ptr_type, tmp755) ; ATSlocal (ats_ptr_type, tmp756) ; // ATSlocal_void (tmp757) ; __ats_lab_aux2_81: #line 972 "translate.dats" do { /* branch: __ats_lab_144 */ #line 973 "translate.dats" __ats_lab_144_0: #line 973 "translate.dats" if (arg1 == (ats_sum_ptr_type)0) { goto __ats_lab_145_0 ; } #line 973 "translate.dats" __ats_lab_144_1: #line 973 "translate.dats" tmp753 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_0) ; #line 973 "translate.dats" tmp754 = ats_caselptr_mac(anairiats_sum_5, arg1, atslab_1) ; #line 974 "translate.dats" if (arg2 == (ats_sum_ptr_type)0) { ats_caseof_failure_handle ("/cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 31894(line=974, offs=18) -- 31923(line=974, offs=47)") ; } #line 974 "translate.dats" tmp755 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_0) ; #line 974 "translate.dats" tmp756 = ats_caselptr_mac(anairiats_sum_5, arg2, atslab_1) ; #line 975 "translate.dats" /* tmp757 = */ transFundec1_snd_77 (arg0, tmp753, tmp755) ; #line 976 "translate.dats" arg0 = arg0 ; #line 976 "translate.dats" arg1 = tmp754 ; #line 976 "translate.dats" arg2 = tmp756 ; #line 976 "translate.dats" goto __ats_lab_aux2_81 ; // tail call break ; /* branch: __ats_lab_145 */ #line 978 "translate.dats" __ats_lab_145_0: #line 978 "translate.dats" // if (arg1 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } #line 978 "translate.dats" __ats_lab_145_1: break ; } while (0) ; return /* (tmp752) */ ; } /* end of [aux2_81] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 30612(line=940, offs=21) -- 32183(line=982, offs=4) */ ATSglobaldec() ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transDec1 (ats_ptr_type arg0, ats_ref_type arg1, ats_ptr_type arg2, ats_ref_type arg3) { /* local vardec */ // ATSlocal_void (tmp730) ; ATSlocal (ats_ptr_type, tmp731) ; ATSlocal (ats_ptr_type, tmp732) ; ATSlocal (ats_ptr_type, tmp733) ; ATSlocal (ats_ptr_type, tmp734) ; ATSlocal (ats_ptr_type, tmp735) ; ATSlocal (ats_ptr_type, tmp736) ; ATSlocal (ats_ptr_type, tmp737) ; ATSlocal (ats_bool_type, tmp738) ; ATSlocal (ats_ptr_type, tmp739) ; ATSlocal (ats_ptr_type, tmp740) ; ATSlocal (ats_ptr_type, tmp741) ; ATSlocal (ats_ptr_type, tmp742) ; ATSlocal (ats_ptr_type, tmp743) ; ATSlocal (ats_ptr_type, tmp744) ; ATSlocal (ats_ptr_type, tmp745) ; ATSlocal (ats_ptr_type, tmp751) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transDec1: #line 947 "translate.dats" tmp731 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_21, arg2), atslab_dec_node) ; #line 947 "translate.dats" do { /* branch: __ats_lab_140 */ #line 948 "translate.dats" __ats_lab_140_0: #line 948 "translate.dats" if (((ats_sum_ptr_type)tmp731)->tag != 1) { goto __ats_lab_141_0 ; } #line 948 "translate.dats" __ats_lab_140_1: #line 948 "translate.dats" tmp732 = ats_caselptr_mac(anairiats_sum_22, tmp731, atslab_0) ; #line 948 "translate.dats" tmp733 = ats_caselptr_mac(anairiats_sum_22, tmp731, atslab_1) ; #line 948 "translate.dats" tmp734 = ats_caselptr_mac(anairiats_sum_22, tmp731, atslab_3) ; #line 949 "translate.dats" tmp735 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (arg0, ats_ptrget_mac(ats_ptr_type, arg1), tmp734) ; #line 950 "translate.dats" tmp736 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__level_frame_get (arg0) ; #line 951 "translate.dats" tmp738 = ats_ptrget_mac(ats_bool_type, tmp733) ; #line 951 "translate.dats" tmp737 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__frame_alloc_local (tmp736, tmp738) ; #line 952 "translate.dats" tmp740 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp740)->tag = 1 ; ats_selptrset_mac(anairiats_sum_1, tmp740, atslab_0, arg0) ; ats_selptrset_mac(anairiats_sum_1, tmp740, atslab_1, tmp737) ; #line 952 "translate.dats" tmp739 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (ats_ptrget_mac(ats_ptr_type, arg1), tmp732, tmp740) ; #line 953 "translate.dats" tmp741 = exp_make_level_access_30 (arg0, arg0, tmp737) ; #line 954 "translate.dats" tmp743 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp735) ; #line 954 "translate.dats" tmp742 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp742)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp742, atslab_0, tmp741) ; ats_selptrset_mac(anairiats_sum_1, tmp742, atslab_1, tmp743) ; #line 955 "translate.dats" tmp744 = ATS_MALLOC(sizeof(anairiats_sum_5)) ; ats_selptrset_mac(anairiats_sum_5, tmp744, atslab_0, tmp742) ; ats_selptrset_mac(anairiats_sum_5, tmp744, atslab_1, ats_ptrget_mac(ats_ptr_type, arg3)) ; #line 955 "translate.dats" ats_ptrget_mac(ats_ptr_type, arg3) = tmp744 ; #line 957 "translate.dats" ats_ptrget_mac(ats_ptr_type, arg1) = tmp739 ; break ; /* branch: __ats_lab_141 */ #line 959 "translate.dats" __ats_lab_141_0: #line 959 "translate.dats" if (((ats_sum_ptr_type)tmp731)->tag != 0) { goto __ats_lab_146_0 ; } #line 959 "translate.dats" __ats_lab_141_1: #line 959 "translate.dats" tmp745 = ats_caselptr_mac(anairiats_sum_0, tmp731, atslab_0) ; #line 969 "translate.dats" tmp751 = aux1_80 (arg0, arg1, tmp745) ; #line 959 "translate.dats" /* tmp730 = */ aux2_81 (ats_ptrget_mac(ats_ptr_type, arg1), tmp745, tmp751) ; break ; /* branch: __ats_lab_146 */ #line 981 "translate.dats" __ats_lab_146_0: #line 981 "translate.dats" // if (((ats_sum_ptr_type)tmp731)->tag != 2) { ats_deadcode_failure_handle () ; } #line 981 "translate.dats" __ats_lab_146_1: break ; } while (0) ; return /* (tmp730) */ ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transDec1] */ /* // /cs-pub/www-dir/faculty/hwxi/academic/courses/CS525/Spring09/code/Tiger/translate.dats: 32248(line=986, offs=22) -- 33915(line=1034, offs=4) */ ATSglobaldec() ats_ptr_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__transProg1 (ats_ptr_type arg0) { /* local vardec */ ATSlocal (ats_ptr_type, tmp758) ; ATSlocal (ats_ptr_type, tmp759) ; ATSlocal (ats_ptr_type, tmp760) ; ATSlocal (ats_ptr_type, tmp761) ; ATSlocal (ats_ptr_type, tmp762) ; ATSlocal (ats_ptr_type, tmp763) ; ATSlocal (ats_ptr_type, tmp764) ; ATSlocal (ats_ptr_type, tmp765) ; ATSlocal (ats_ptr_type, tmp766) ; ATSlocal (ats_ptr_type, tmp767) ; ATSlocal (ats_ptr_type, tmp768) ; ATSlocal (ats_ptr_type, tmp769) ; ATSlocal (ats_ptr_type, tmp770) ; ATSlocal (ats_ptr_type, tmp771) ; ATSlocal (ats_ptr_type, tmp772) ; ATSlocal (ats_ptr_type, tmp773) ; ATSlocal (ats_ptr_type, tmp774) ; ATSlocal (ats_ptr_type, tmp775) ; ATSlocal (ats_ptr_type, tmp776) ; ATSlocal (ats_ptr_type, tmp777) ; ATSlocal (ats_ptr_type, tmp778) ; ATSlocal (ats_ptr_type, tmp779) ; ATSlocal (ats_ptr_type, tmp780) ; ATSlocal (ats_ptr_type, tmp781) ; ATSlocal (ats_ptr_type, tmp782) ; ATSlocal (anairiats_rec_15, tmp783) ; ATSlocal (ats_ptr_type, tmp784) ; ATSlocal (ats_ptr_type, tmp785) ; ATSlocal (ats_ptr_type, tmp786) ; ATSlocal (ats_ptr_type, tmp787) ; ATSlocal (ats_ptr_type, tmp788) ; ATSlocal (ats_ptr_type, tmp789) ; ATSlocal (ats_ptr_type, tmp790) ; ATSlocal (ats_ptr_type, tmp791) ; ATSlocal (ats_ptr_type, tmp792) ; ATSlocal (ats_ptr_type, tmp793) ; ATSlocal (ats_ptr_type, tmp794) ; ATSlocal (ats_ptr_type, tmp795) ; __ats_lab__2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__transProg1: #line 988 "translate.dats" tmp759 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp759)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp759, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theTopFrame) ; #line 988 "translate.dats" tmp760 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_empty () ; #line 990 "translate.dats" tmp761 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp761)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp761, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_chr) ; ats_selptrset_mac(anairiats_sum_1, tmp761, atslab_1, tmp759) ; #line 991 "translate.dats" tmp762 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp760, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_CHR, tmp761) ; #line 993 "translate.dats" tmp763 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp763)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp763, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_flush) ; ats_selptrset_mac(anairiats_sum_1, tmp763, atslab_1, tmp759) ; #line 994 "translate.dats" tmp764 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp762, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_FLUSH, tmp763) ; #line 996 "translate.dats" tmp765 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp765)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp765, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_getchar) ; ats_selptrset_mac(anairiats_sum_1, tmp765, atslab_1, tmp759) ; #line 997 "translate.dats" tmp766 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp764, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_GETCHAR, tmp765) ; #line 999 "translate.dats" tmp767 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp767)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp767, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_ord) ; ats_selptrset_mac(anairiats_sum_1, tmp767, atslab_1, tmp759) ; #line 1000 "translate.dats" tmp768 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp766, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_ORD, tmp767) ; #line 1002 "translate.dats" tmp769 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp769)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp769, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_print) ; ats_selptrset_mac(anairiats_sum_1, tmp769, atslab_1, tmp759) ; #line 1003 "translate.dats" tmp770 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp768, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_PRINT, tmp769) ; #line 1005 "translate.dats" tmp771 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp771)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp771, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_print_int) ; ats_selptrset_mac(anairiats_sum_1, tmp771, atslab_1, tmp759) ; #line 1006 "translate.dats" tmp772 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp770, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_PRINT_INT, tmp771) ; #line 1008 "translate.dats" tmp773 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp773)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp773, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_size) ; ats_selptrset_mac(anairiats_sum_1, tmp773, atslab_1, tmp759) ; #line 1009 "translate.dats" tmp774 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp772, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_SIZE, tmp773) ; #line 1011 "translate.dats" tmp775 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp775)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp775, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_substring) ; ats_selptrset_mac(anairiats_sum_1, tmp775, atslab_1, tmp759) ; #line 1012 "translate.dats" tmp776 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp774, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_SUBSTRING, tmp775) ; #line 1014 "translate.dats" tmp777 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp777)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp777, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_concat) ; ats_selptrset_mac(anairiats_sum_1, tmp777, atslab_1, tmp759) ; #line 1015 "translate.dats" tmp778 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp776, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_CONCAT, tmp777) ; #line 1017 "translate.dats" tmp779 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp779)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp779, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_not) ; ats_selptrset_mac(anairiats_sum_1, tmp779, atslab_1, tmp759) ; #line 1018 "translate.dats" tmp780 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp778, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_NOT, tmp779) ; #line 1020 "translate.dats" tmp781 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp781)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp781, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__tiger_exit) ; ats_selptrset_mac(anairiats_sum_1, tmp781, atslab_1, tmp759) ; #line 1021 "translate.dats" tmp782 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__env_insert (tmp780, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__symbol_EXIT, tmp781) ; #line 1023 "translate.dats" tmp783 = calleesaved_save_69 () ; #line 1024 "translate.dats" tmp784 = ats_select_mac(tmp783, atslab_0) ; #line 1025 "translate.dats" tmp786 = ats_select_mac(tmp783, atslab_1) ; #line 1025 "translate.dats" tmp785 = calleesaved_restore_71 (tmp786) ; #line 1026 "translate.dats" tmp788 = (ats_sum_ptr_type)0 ; #line 1026 "translate.dats" tmp787 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp787)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp787, atslab_0, tmp788) ; ats_selptrset_mac(anairiats_sum_1, tmp787, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__theCallersavedReglst) ; #line 1027 "translate.dats" tmp789 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__transExp1 (tmp759, tmp782, arg0) ; #line 1028 "translate.dats" tmp791 = _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__unEx (tmp789) ; #line 1028 "translate.dats" tmp790 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp790)->tag = 0 ; ats_selptrset_mac(anairiats_sum_1, tmp790, atslab_0, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_RV) ; ats_selptrset_mac(anairiats_sum_1, tmp790, atslab_1, tmp791) ; #line 1029 "translate.dats" tmp792 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp792)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp792, atslab_0, tmp790) ; ats_selptrset_mac(anairiats_sum_1, tmp792, atslab_1, tmp785) ; #line 1030 "translate.dats" tmp793 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp793)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp793, atslab_0, tmp787) ; ats_selptrset_mac(anairiats_sum_1, tmp793, atslab_1, tmp792) ; #line 1031 "translate.dats" tmp794 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp794)->tag = 4 ; ats_selptrset_mac(anairiats_sum_1, tmp794, atslab_0, tmp784) ; ats_selptrset_mac(anairiats_sum_1, tmp794, atslab_1, tmp793) ; #line 1033 "translate.dats" tmp795 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ((ats_sum_ptr_type)tmp795)->tag = 6 ; ats_selptrset_mac(anairiats_sum_1, tmp795, atslab_0, tmp794) ; ats_selptrset_mac(anairiats_sum_1, tmp795, atslab_1, _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__exp_RV) ; #line 1033 "translate.dats" tmp758 = ATS_MALLOC(sizeof(anairiats_sum_0)) ; ((ats_sum_ptr_type)tmp758)->tag = 0 ; ats_selptrset_mac(anairiats_sum_0, tmp758, atslab_0, tmp795) ; return (tmp758) ; } /* end of [_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__transProg1] */ /* static load function */ extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__staload (void) ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats__staload (void) ; extern ats_void_type ATS_2d0_2e2_2e6_2prelude_2DATS_2reference_2edats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__staload (void) ; extern ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2LIB_2funmap_avltree_2edats__staload (void) ; ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__staload () { static int _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__staload_flag = 0 ; if (_2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__staload_flag) return ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__staload_flag = 1 ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2templab_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2irtree_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2esats__staload () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats__staload () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2reference_2edats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2stamp_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2frame_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2types_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2absyn_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2symbol_2esats__staload () ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2LIB_2funmap_avltree_2edats__staload () ; // _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELtop.tag = 0 ; // _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__LEVELsub.tag = 1 ; // _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTfun.tag = 0 ; // _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__VFENTvar.tag = 1 ; return ; } /* staload function */ /* dynamic load function */ // dynload flag declaration extern ats_int_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__dynload_flag ; ats_void_type _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__dynload () { _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__dynload_flag = 1 ; _2cs_2dpub_2www_2ddir_2faculty_2hwxi_2academic_2courses_2CS525_2Spring09_2code_2Tiger_2translate_2edats__staload () ; #ifdef _ATS_PROOFCHECK ATS_2d0_2e2_2e6_2prelude_2SATS_2list_2esats__list_length_is_nonnegative_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; ATS_2d0_2e2_2e6_2prelude_2DATS_2list_2edats____assert_prfck () ; #endif /* _ATS_PROOFCHECK */ /* marking static variables for GC */ ATS_GC_MARKROOT(&statmp56, sizeof(ats_ptr_type)) ; ATS_GC_MARKROOT(&statmp241, sizeof(ats_ptr_type)) ; ATS_GC_MARKROOT(&statmp245, sizeof(ats_ptr_type)) ; ATS_GC_MARKROOT(&statmp246, sizeof(ats_ptr_type)) ; ATS_GC_MARKROOT(&statmp247, sizeof(ats_ptr_type)) ; /* marking external values for GC */ /* code for dynamic loading */ #line 133 "translate.dats" statmp56 = __ats_fun_11_closure_make () ; #line 359 "translate.dats" statmp245 = (ats_sum_ptr_type)0 ; #line 359 "translate.dats" statmp241 = ref_make_elt_01024_ats_ptr_type (statmp245) ; #line 360 "translate.dats" statmp247 = (ats_sum_ptr_type)0 ; #line 360 "translate.dats" statmp246 = ref_make_elt_01024_ats_ptr_type (statmp247) ; return ; } /* end of [dynload function] */ /* external codes at mid */ /* external codes at bot */ /* ****** ****** */ /* end of [translate_dats.c] */