ats_bool_type
name_is_ref_5 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp9) ;
ATSlocal (ats_bool_type, tmp10) ;
__ats_lab_name_is_ref_5:
tmp10 = atspre_eq_string_string (arg0, ATSstrcst("ref")) ;
if (tmp10) {
tmp9 = ats_true_bool ;
} else {
tmp9 = atspre_eq_string_string (arg0, ATSstrcst("reference")) ;
} /* end of [if] */
return (tmp9) ;
} /* end of [name_is_ref_5] */
ats_bool_type
name_is_wrt_6 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp11) ;
ATSlocal (ats_bool_type, tmp12) ;
__ats_lab_name_is_wrt_6:
tmp12 = atspre_eq_string_string (arg0, ATSstrcst("wrt")) ;
if (tmp12) {
tmp11 = ats_true_bool ;
} else {
tmp11 = atspre_eq_string_string (arg0, ATSstrcst("write")) ;
} /* end of [if] */
return (tmp11) ;
} /* end of [name_is_wrt_6] */
ats_bool_type
name_is_exn_4 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp7) ;
ATSlocal (ats_bool_type, tmp8) ;
__ats_lab_name_is_exn_4:
tmp8 = atspre_eq_string_string (arg0, ATSstrcst("exn")) ;
if (tmp8) {
tmp7 = ats_true_bool ;
} else {
tmp7 = atspre_eq_string_string (arg0, ATSstrcst("exception")) ;
} /* end of [if] */
return (tmp7) ;
} /* end of [name_is_exn_4] */
ats_bool_type
name_is_ntm_3 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp5) ;
ATSlocal (ats_bool_type, tmp6) ;
__ats_lab_name_is_ntm_3:
tmp6 = atspre_eq_string_string (arg0, ATSstrcst("ntm")) ;
if (tmp6) {
tmp5 = ats_true_bool ;
} else {
tmp5 = atspre_eq_string_string (arg0, ATSstrcst("nonterm")) ;
} /* end of [if] */
return (tmp5) ;
} /* end of [name_is_ntm_3] */
ats_bool_type
name_is_all_2 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp3) ;
ATSlocal (ats_bool_type, tmp4) ;
__ats_lab_name_is_all_2:
tmp4 = atspre_eq_string_string (arg0, ATSstrcst("1")) ;
if (tmp4) {
tmp3 = ats_true_bool ;
} else {
tmp3 = atspre_eq_string_string (arg0, ATSstrcst("all")) ;
} /* end of [if] */
return (tmp3) ;
} /* end of [name_is_all_2] */
ats_bool_type
name_is_nil_1 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp1) ;
ATSlocal (ats_bool_type, tmp2) ;
__ats_lab_name_is_nil_1:
tmp2 = atspre_eq_string_string (arg0, ATSstrcst("0")) ;
if (tmp2) {
tmp1 = ats_true_bool ;
} else {
tmp1 = atspre_eq_string_string (arg0, ATSstrcst("nil")) ;
} /* end of [if] */
return (tmp1) ;
} /* end of [name_is_nil_1] */
ats_bool_type
name_is_lazy_11 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp17) ;
__ats_lab_name_is_lazy_11:
tmp17 = atspre_eq_string_string (arg0, ATSstrcst("laz")) ;
return (tmp17) ;
} /* end of [name_is_lazy_11] */
ats_bool_type
name_is_refwrt_10 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp16) ;
__ats_lab_name_is_refwrt_10:
tmp16 = atspre_eq_string_string (arg0, ATSstrcst("refwrt")) ;
return (tmp16) ;
} /* end of [name_is_refwrt_10] */
ats_bool_type
name_is_exnrefwrt_9 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp15) ;
__ats_lab_name_is_exnrefwrt_9:
tmp15 = atspre_eq_string_string (arg0, ATSstrcst("exnrefwrt")) ;
return (tmp15) ;
} /* end of [name_is_exnrefwrt_9] */
ats_bool_type
name_is_exnref_7 (ats_ptr_type arg0) {
/* local vardec */
ATSlocal (ats_bool_type, tmp13) ;
__ats_lab_name_is_exnref_7:
tmp13 = atspre_eq_string_string (arg0, ATSstrcst("exnref")) ;
return (tmp13) ;
} /* end of [name_is_exnref_7] */
ats_ptr_type
symtbl_search_probe_3 (ats_ptr_type arg0, ats_int_type arg1, ats_int_type arg2, ats_ptr_type arg3) {
/* local vardec */
ATSlocal (ats_ptr_type, tmp15) ;
ATSlocal (ats_ptr_type, tmp16) ;
ATSlocal (ats_ptr_type, tmp17) ;
ATSlocal (ats_bool_type, tmp18) ;
ATSlocal (ats_ptr_type, tmp19) ;
ATSlocal (ats_int_type, tmp20) ;
ATSlocal (ats_int_type, tmp21) ;
ATSlocal (ats_bool_type, tmp22) ;
__ats_lab_symtbl_search_probe_3:
tmp16 = ats_caselptrind_mac(ats_ptr_type, arg0, [arg2]) ;
do {
/* branch: __ats_lab_0 */
__ats_lab_0_0:
if (tmp16 == (ats_sum_ptr_type)0) { goto __ats_lab_1_0 ; }
__ats_lab_0_1:
tmp17 = ats_caselptrlab_mac(anairiats_sum_1, tmp16, atslab_0) ;
tmp19 = _2opt_2ats_2d0_2e2_2e9_2src_2ats_symbol_2esats__symbol_name (tmp17) ;
tmp18 = atspre_eq_string_string (tmp19, arg3) ;
if (tmp18) {
tmp15 = tmp16 ;
} else {
tmp20 = atspre_iadd (arg2, 1) ;
tmp22 = atspre_ilt (tmp20, arg1) ;
if (tmp22) {
tmp21 = tmp20 ;
} else {
tmp21 = 0 ;
} /* end of [if] */
arg0 = arg0 ;
arg1 = arg1 ;
arg2 = tmp21 ;
arg3 = arg3 ;
goto __ats_lab_symtbl_search_probe_3 ; // tail call
} /* end of [if] */
break ;
/* branch: __ats_lab_1 */
__ats_lab_1_0:
// if (tmp16 != (ats_sum_ptr_type)0) { ats_deadcode_failure_handle () ; }
__ats_lab_1_1:
tmp15 = (ats_sum_ptr_type)0 ;
break ;
} while (0) ;
return (tmp15) ;
} /* end of [symtbl_search_probe_3] */
