ats_int_type _2home_2hwxi_2research_2Postiats_2git_2src_2pats_fixity_2esats__prec_make_int (ats_int_type arg0) { /* local vardec */ ATSlocal (ats_int_type, tmp9) ; ATSlocal (ats_bool_type, tmp10) ; ATSlocal (ats_bool_type, tmp11) ; __ats_lab__2home_2hwxi_2research_2Postiats_2git_2src_2pats_fixity_2esats__prec_make_int: do { /* branch: __ats_lab_3 */ __ats_lab_3_0: __ats_lab_3_1: tmp10 = atspre_lte_int_int (arg0, -1000000) ; if (!tmp10) { goto __ats_lab_4_1 ; } tmp9 = -1000000 ; break ; /* branch: __ats_lab_4 */ __ats_lab_4_0: __ats_lab_4_1: tmp11 = atspre_gte_int_int (arg0, 1000000) ; if (!tmp11) { goto __ats_lab_5_1 ; } tmp9 = 1000000 ; break ; /* branch: __ats_lab_5 */ __ats_lab_5_0: __ats_lab_5_1: tmp9 = arg0 ; break ; } while (0) ; return (tmp9) ; } /* end of [_2home_2hwxi_2research_2Postiats_2git_2src_2pats_fixity_2esats__prec_make_int] */
ats_void_type _2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__fprint_line_pragma (ats_ptr_type arg0, ats_ptr_type arg1) { /* local vardec */ // ATSlocal_void (tmp137) ; ATSlocal (ats_int_type, tmp138) ; ATSlocal (ats_bool_type, tmp139) ; // ATSlocal_void (tmp140) ; // ATSlocal_void (tmp141) ; ATSlocal (ats_int_type, tmp142) ; // ATSlocal_void (tmp143) ; // ATSlocal_void (tmp144) ; ATSlocal (ats_ptr_type, tmp145) ; __ats_lab__2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__fprint_line_pragma: tmp138 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_0, arg1), atslab_beg_nrow) ; tmp139 = atspre_gte_int_int (tmp138, 0) ; if (tmp139) { /* tmp140 = */ atspre_fprint_string (arg0, ATSstrcst("#line ")) ; tmp142 = atspre_add_int_int (tmp138, 1) ; /* tmp141 = */ atspre_fprint_int (arg0, tmp142) ; /* tmp143 = */ atspre_fprint_string (arg0, ATSstrcst(" \"")) ; tmp145 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_0, arg1), atslab_filename) ; /* tmp144 = */ _2home_2hwxi_2research_2Postiats_2git_2src_2pats_filename_2esats__fprint_filename_full (arg0, tmp145) ; /* tmp137 = */ atspre_fprint_string (arg0, ATSstrcst("\"\n")) ; } else { /* empty */ } /* end of [if] */ return /* (tmp137) */ ; } /* end of [_2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__fprint_line_pragma] */
ats_bool_type _2home_2hwxi_2research_2Postiats_2git_2src_2pats_counter_2esats__gte_count_count (ats_int_type arg0, ats_int_type arg1) { /* local vardec */ ATSlocal (ats_bool_type, tmp4) ; __ats_lab__2home_2hwxi_2research_2Postiats_2git_2src_2pats_counter_2esats__gte_count_count: tmp4 = atspre_gte_int_int (arg0, arg1) ; return (tmp4) ; } /* end of [_2home_2hwxi_2research_2Postiats_2git_2src_2pats_counter_2esats__gte_count_count] */
ats_void_type _2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__position_incby_char (ats_ref_type arg0, ats_int_type arg1) { /* local vardec */ // ATSlocal_void (tmp16) ; ATSlocal (ats_bool_type, tmp17) ; ATSlocal (ats_lint_type, tmp18) ; ATSlocal (ats_lint_type, tmp19) ; ATSlocal (ats_bool_type, tmp20) ; ATSlocal (ats_int_type, tmp21) ; ATSlocal (ats_int_type, tmp22) ; ATSlocal (ats_int_type, tmp23) ; ATSlocal (ats_int_type, tmp24) ; ATSlocal (ats_int_type, tmp25) ; __ats_lab__2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__position_incby_char: tmp17 = atspre_gte_int_int (arg1, 0) ; if (tmp17) { tmp19 = ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), ntot) ; tmp18 = atspre_add_lint_lint (tmp19, 1L) ; ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), ntot) = tmp18 ; tmp21 = atspre_int_of_char ('\n') ; tmp20 = atspre_eq_int_int (arg1, tmp21) ; if (tmp20) { tmp23 = ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), nrow) ; tmp22 = atspre_add_int_int (tmp23, 1) ; ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), nrow) = tmp22 ; ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), ncol) = 0 ; } else { tmp25 = ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), ncol) ; tmp24 = atspre_add_int_int (tmp25, 1) ; ats_select_mac(ats_ptrget_mac(pats_position_struct, arg0), ncol) = tmp24 ; } /* end of [if] */ } else { /* empty */ } /* end of [if] */ return /* (tmp16) */ ; } /* end of [_2home_2hwxi_2research_2Postiats_2git_2src_2pats_location_2esats__position_incby_char] */
ats_void_type loop_14 (ats_ref_type arg0, ats_ref_type arg1, ats_ref_type arg2, ats_ref_type arg3, ats_ref_type arg4, ats_ptr_type arg5) { /* local vardec */ // ATSlocal_void (tmp28) ; ATSlocal (ats_ptr_type, tmp29) ; ATSlocal (ats_ptr_type, tmp30) ; // ATSlocal_void (tmp31) ; ATSlocal (ats_ptr_type, tmp32) ; ATSlocal (ats_ptr_type, tmp33) ; ATSlocal (ats_ptr_type, tmp34) ; ATSlocal (ats_int_type, tmp35) ; ATSlocal (ats_bool_type, tmp37) ; ATSlocal (ats_bool_type, tmp38) ; ATSlocal (ats_int_type, tmp39) ; ATSlocal (ats_ptr_type, tmp40) ; ATSlocal (ats_bool_type, tmp41) ; ATSlocal (ats_bool_type, tmp42) ; ATSlocal (ats_int_type, tmp43) ; ATSlocal (ats_ptr_type, tmp44) ; ATSlocal (ats_bool_type, tmp45) ; ATSlocal (ats_bool_type, tmp46) ; ATSlocal (ats_int_type, tmp47) ; ATSlocal (ats_ptr_type, tmp48) ; ATSlocal (ats_bool_type, tmp49) ; ATSlocal (ats_bool_type, tmp51) ; ATSlocal (ats_uint_type, tmp52) ; ATSlocal (ats_bool_type, tmp53) ; ATSlocal (ats_uint_type, tmp54) ; ATSlocal (ats_int_type, tmp55) ; ATSlocal (ats_ptr_type, tmp56) ; ATSlocal (ats_bool_type, tmp57) ; ATSlocal (ats_bool_type, tmp59) ; ATSlocal (ats_uint_type, tmp60) ; ATSlocal (ats_bool_type, tmp61) ; ATSlocal (ats_uint_type, tmp62) ; ATSlocal (ats_bool_type, tmp63) ; ATSlocal (ats_bool_type, tmp65) ; ATSlocal (ats_uint_type, tmp66) ; ATSlocal (ats_bool_type, tmp67) ; ATSlocal (ats_uint_type, tmp68) ; ATSlocal (ats_bool_type, tmp69) ; ATSlocal (ats_bool_type, tmp71) ; ATSlocal (ats_uint_type, tmp72) ; ATSlocal (ats_bool_type, tmp73) ; ATSlocal (ats_uint_type, tmp74) ; ATSlocal (ats_bool_type, tmp75) ; ATSlocal (ats_bool_type, tmp77) ; ATSlocal (ats_uint_type, tmp78) ; ATSlocal (ats_bool_type, tmp79) ; ATSlocal (ats_uint_type, tmp80) ; ATSlocal (ats_bool_type, tmp81) ; ATSlocal (ats_bool_type, tmp83) ; ATSlocal (ats_uint_type, tmp84) ; ATSlocal (ats_uint_type, tmp85) ; ATSlocal (ats_bool_type, tmp86) ; ATSlocal (ats_uint_type, tmp87) ; ATSlocal (ats_uint_type, tmp88) ; ATSlocal (ats_bool_type, tmp89) ; ATSlocal (ats_bool_type, tmp91) ; ATSlocal (ats_uint_type, tmp92) ; ATSlocal (ats_uint_type, tmp93) ; ATSlocal (ats_bool_type, tmp94) ; ATSlocal (ats_uint_type, tmp95) ; ATSlocal (ats_uint_type, tmp96) ; ATSlocal (ats_bool_type, tmp97) ; ATSlocal (ats_bool_type, tmp99) ; ATSlocal (ats_uint_type, tmp100) ; ATSlocal (ats_uint_type, tmp101) ; ATSlocal (ats_uint_type, tmp102) ; ATSlocal (ats_bool_type, tmp103) ; ATSlocal (ats_uint_type, tmp104) ; ATSlocal (ats_uint_type, tmp105) ; ATSlocal (ats_uint_type, tmp106) ; ATSlocal (ats_bool_type, tmp107) ; ATSlocal (ats_bool_type, tmp109) ; ATSlocal (ats_uint_type, tmp110) ; ATSlocal (ats_uint_type, tmp111) ; ATSlocal (ats_bool_type, tmp112) ; ATSlocal (ats_uint_type, tmp113) ; ATSlocal (ats_uint_type, tmp114) ; ATSlocal (ats_int_type, tmp115) ; ATSlocal (ats_bool_type, tmp116) ; ATSlocal (ats_int_type, tmp117) ; ATSlocal (ats_int_type, tmp118) ; ATSlocal (ats_bool_type, tmp120) ; ATSlocal (ats_ptr_type, tmp121) ; ATSlocal (ats_ptr_type, tmp122) ; ATSlocal (ats_bool_type, tmp123) ; ATSlocal (ats_int_type, tmp124) ; ATSlocal (ats_int_type, tmp125) ; ATSlocal (ats_int_type, tmp126) ; ATSlocal (ats_bool_type, tmp128) ; ATSlocal (ats_ptr_type, tmp129) ; ATSlocal (ats_ptr_type, tmp130) ; ATSlocal (ats_bool_type, tmp131) ; __ats_lab_loop_14: do { /* branch: __ats_lab_0 */ __ats_lab_0_0: if (arg5 == (ats_sum_ptr_type)0) { goto __ats_lab_20_0 ; } __ats_lab_0_1: tmp29 = ats_caselptrlab_mac(anairiats_sum_1, arg5, atslab_0) ; tmp30 = ats_caselptrlab_mac(anairiats_sum_1, arg5, atslab_1) ; tmp32 = ats_selbox_mac(ats_castptr_mac(anairiats_rec_0, tmp29), atslab_e0fftag_node) ; do { /* branch: __ats_lab_1 */ __ats_lab_1_0: if (((ats_sum_ptr_type)tmp32)->tag != 2) { goto __ats_lab_2_0 ; } __ats_lab_1_1: tmp33 = ats_caselptrlab_mac(anairiats_sum_2, tmp32, atslab_0) ; tmp34 = ATS_MALLOC(sizeof(anairiats_sum_1)) ; ats_selptrset_mac(anairiats_sum_1, tmp34, atslab_0, tmp33) ; ats_selptrset_mac(anairiats_sum_1, tmp34, atslab_1, ats_ptrget_mac(ats_ptr_type, arg4)) ; ats_ptrget_mac(ats_ptr_type, arg4) = tmp34 ; break ; /* branch: __ats_lab_2 */ __ats_lab_2_0: if (((ats_sum_ptr_type)tmp32)->tag != 0) { goto __ats_lab_3_0 ; } __ats_lab_2_1: tmp35 = ats_caselptrlab_mac(anairiats_sum_3, tmp32, atslab_0) ; ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; tmp37 = atspre_eq_int_int (tmp35, 0) ; if (tmp37) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_nil ; } else { /* empty */ } /* end of [if] */ tmp38 = atspre_eq_int_int (tmp35, 1) ; if (tmp38) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_3 */ __ats_lab_3_0: if (((ats_sum_ptr_type)tmp32)->tag != 1) { goto __ats_lab_4_0 ; } __ats_lab_3_1: tmp39 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_0) ; tmp40 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_1) ; tmp41 = name_is_all_2 (tmp40) ; if (!tmp41) { goto __ats_lab_4_1 ; } ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; tmp42 = atspre_gt_int_int (tmp39, 0) ; if (tmp42) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_nil ; } else { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; } /* end of [if] */ break ; /* branch: __ats_lab_4 */ __ats_lab_4_0: if (((ats_sum_ptr_type)tmp32)->tag != 1) { goto __ats_lab_5_0 ; } __ats_lab_4_1: tmp43 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_0) ; tmp44 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_1) ; tmp45 = name_is_nil_1 (tmp44) ; if (!tmp45) { goto __ats_lab_5_1 ; } ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; tmp46 = atspre_gt_int_int (tmp43, 0) ; if (tmp46) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; } else { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_nil ; } /* end of [if] */ break ; /* branch: __ats_lab_5 */ __ats_lab_5_0: if (((ats_sum_ptr_type)tmp32)->tag != 1) { goto __ats_lab_6_0 ; } __ats_lab_5_1: tmp47 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_0) ; tmp48 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_1) ; tmp49 = name_is_lazy_11 (tmp48) ; if (!tmp49) { goto __ats_lab_6_1 ; } ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; tmp51 = atspre_gt_int_int (tmp47, 0) ; if (tmp51) { tmp52 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (_2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_nil, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp52 ; } else { /* empty */ } /* end of [if] */ tmp53 = atspre_eq_int_int (tmp47, 0) ; if (tmp53) { tmp54 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (_2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp54 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_6 */ __ats_lab_6_0: if (((ats_sum_ptr_type)tmp32)->tag != 1) { goto __ats_lab_16_0 ; } __ats_lab_6_1: tmp55 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_0) ; tmp56 = ats_caselptrlab_mac(anairiats_sum_4, tmp32, atslab_1) ; do { /* branch: __ats_lab_7 */ __ats_lab_7_0: __ats_lab_7_1: tmp57 = name_is_ntm_3 (tmp56) ; if (!tmp57) { goto __ats_lab_8_1 ; } tmp59 = atspre_gt_int_int (tmp55, 0) ; if (tmp59) { tmp60 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ntm) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp60 ; } else { /* empty */ } /* end of [if] */ tmp61 = atspre_eq_int_int (tmp55, 0) ; if (tmp61) { tmp62 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ntm) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp62 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_8 */ __ats_lab_8_0: __ats_lab_8_1: tmp63 = name_is_exn_4 (tmp56) ; if (!tmp63) { goto __ats_lab_9_1 ; } tmp65 = atspre_gt_int_int (tmp55, 0) ; if (tmp65) { tmp66 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp66 ; } else { /* empty */ } /* end of [if] */ tmp67 = atspre_eq_int_int (tmp55, 0) ; if (tmp67) { tmp68 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp68 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_9 */ __ats_lab_9_0: __ats_lab_9_1: tmp69 = name_is_ref_5 (tmp56) ; if (!tmp69) { goto __ats_lab_10_1 ; } tmp71 = atspre_gt_int_int (tmp55, 0) ; if (tmp71) { tmp72 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp72 ; } else { /* empty */ } /* end of [if] */ tmp73 = atspre_eq_int_int (tmp55, 0) ; if (tmp73) { tmp74 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp74 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_10 */ __ats_lab_10_0: __ats_lab_10_1: tmp75 = name_is_wrt_6 (tmp56) ; if (!tmp75) { goto __ats_lab_11_1 ; } tmp77 = atspre_gt_int_int (tmp55, 0) ; if (tmp77) { tmp78 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp78 ; } else { /* empty */ } /* end of [if] */ tmp79 = atspre_eq_int_int (tmp55, 0) ; if (tmp79) { tmp80 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp80 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_11 */ __ats_lab_11_0: __ats_lab_11_1: tmp81 = name_is_exnref_7 (tmp56) ; if (!tmp81) { goto __ats_lab_12_1 ; } tmp83 = atspre_gt_int_int (tmp55, 0) ; if (tmp83) { tmp85 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp84 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (tmp85, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp84 ; } else { /* empty */ } /* end of [if] */ tmp86 = atspre_eq_int_int (tmp55, 0) ; if (tmp86) { tmp88 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp87 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (tmp88, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp87 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_12 */ __ats_lab_12_0: __ats_lab_12_1: tmp89 = name_is_exnwrt_8 (tmp56) ; if (!tmp89) { goto __ats_lab_13_1 ; } tmp91 = atspre_gt_int_int (tmp55, 0) ; if (tmp91) { tmp93 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp92 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (tmp93, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp92 ; } else { /* empty */ } /* end of [if] */ tmp94 = atspre_eq_int_int (tmp55, 0) ; if (tmp94) { tmp96 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp95 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (tmp96, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp95 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_13 */ __ats_lab_13_0: __ats_lab_13_1: tmp97 = name_is_exnrefwrt_9 (tmp56) ; if (!tmp97) { goto __ats_lab_14_1 ; } tmp99 = atspre_gt_int_int (tmp55, 0) ; if (tmp99) { tmp102 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp101 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (tmp102, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; tmp100 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (tmp101, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp100 ; } else { /* empty */ } /* end of [if] */ tmp103 = atspre_eq_int_int (tmp55, 0) ; if (tmp103) { tmp106 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_exn) ; tmp105 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (tmp106, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; tmp104 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (tmp105, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp104 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_14 */ __ats_lab_14_0: __ats_lab_14_1: tmp107 = name_is_refwrt_10 (tmp56) ; if (!tmp107) { goto __ats_lab_15_1 ; } tmp109 = atspre_gt_int_int (tmp55, 0) ; if (tmp109) { tmp111 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; tmp110 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_del (tmp111, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp110 ; } else { /* empty */ } /* end of [if] */ tmp112 = atspre_eq_int_int (tmp55, 0) ; if (tmp112) { tmp114 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (ats_ptrget_mac(ats_uint_type, arg3), _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_ref) ; tmp113 = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_add (tmp114, _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effect_wrt) ; ats_ptrget_mac(ats_uint_type, arg3) = tmp113 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_15 */ __ats_lab_15_0: __ats_lab_15_1: /* tmp31 = */ loop_err_12 (tmp29, tmp56) ; break ; } while (0) ; break ; /* branch: __ats_lab_16 */ __ats_lab_16_0: if (((ats_sum_ptr_type)tmp32)->tag != 3) { goto __ats_lab_17_0 ; } __ats_lab_16_1: ats_ptrget_mac(ats_int_type, arg2) = 1 ; break ; /* branch: __ats_lab_17 */ __ats_lab_17_0: if (((ats_sum_ptr_type)tmp32)->tag != 4) { goto __ats_lab_18_0 ; } __ats_lab_17_1: tmp115 = ats_caselptrlab_mac(anairiats_sum_3, tmp32, atslab_0) ; ats_ptrget_mac(ats_int_type, arg1) = 1 ; tmp116 = atspre_gt_int_int (tmp115, 0) ; if (tmp116) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_18 */ __ats_lab_18_0: if (((ats_sum_ptr_type)tmp32)->tag != 5) { goto __ats_lab_19_0 ; } __ats_lab_18_1: tmp117 = ats_caselptrlab_mac(anairiats_sum_5, tmp32, atslab_0) ; tmp118 = ats_caselptrlab_mac(anairiats_sum_5, tmp32, atslab_1) ; tmp120 = atspre_gte_int_int (tmp117, 0) ; if (tmp120) { ats_ptrget_mac(ats_int_type, arg1) = tmp117 ; } else { /* empty */ } /* end of [if] */ tmp122 = (ats_sum_ptr_type)0 ; tmp121 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ats_selptrset_mac(anairiats_sum_6, tmp121, atslab_0, tmp122) ; ats_ptrget_mac(ats_ptr_type, arg0) = tmp121 ; tmp123 = atspre_gt_int_int (tmp118, 0) ; if (tmp123) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; } else { /* empty */ } /* end of [if] */ break ; /* branch: __ats_lab_19 */ __ats_lab_19_0: // if (((ats_sum_ptr_type)tmp32)->tag != 6) { ats_deadcode_failure_handle () ; } __ats_lab_19_1: tmp124 = ats_caselptrlab_mac(anairiats_sum_7, tmp32, atslab_0) ; tmp125 = ats_caselptrlab_mac(anairiats_sum_7, tmp32, atslab_1) ; tmp126 = ats_caselptrlab_mac(anairiats_sum_7, tmp32, atslab_2) ; tmp128 = atspre_gte_int_int (tmp124, 0) ; if (tmp128) { ats_ptrget_mac(ats_int_type, arg1) = tmp124 ; } else { /* empty */ } /* end of [if] */ tmp130 = ATS_MALLOC(sizeof(anairiats_sum_8)) ; ats_selptrset_mac(anairiats_sum_8, tmp130, atslab_0, tmp125) ; tmp129 = ATS_MALLOC(sizeof(anairiats_sum_6)) ; ats_selptrset_mac(anairiats_sum_6, tmp129, atslab_0, tmp130) ; ats_ptrget_mac(ats_ptr_type, arg0) = tmp129 ; tmp131 = atspre_gt_int_int (tmp126, 0) ; if (tmp131) { ats_ptrget_mac(ats_uint_type, arg3) = _2home_2hwxi_2Research_2ATS_2dPostiats_2src_2pats_effect_2esats__effset_all ; ats_ptrget_mac(ats_ptr_type, arg4) = statmp18 ; } else { /* empty */ } /* end of [if] */ break ; } while (0) ; arg0 = arg0 ; arg1 = arg1 ; arg2 = arg2 ; arg3 = arg3 ; arg4 = arg4 ; arg5 = tmp30 ; goto __ats_lab_loop_14 ; // tail call break ; /* branch: __ats_lab_20 */ __ats_lab_20_0: // if (arg5 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; } __ats_lab_20_1: break ; } while (0) ; return /* (tmp28) */ ; } /* end of [loop_14] */