ImmT string0substr2(ImmT ___nl__0,ImmT ___nl__1) { c_rt_lib0arg_val(___nl__0); c_rt_lib0arg_val(___nl__1); string_priv0__const__init(); ImmT ___nl__2 = NULL; ImmT ___nl__3 = NULL; #line 44 c_rt_lib0move(&___nl__3, string0length(___nl__0)); #line 44 c_rt_lib0move(&___nl__3, c_rt_lib0sub_mod(___nl__3, ___nl__1)); #line 44 c_rt_lib0move(&___nl__2, c_std_lib0string_sub(___nl__0, ___nl__1, ___nl__3)); #line 44 c_rt_lib0clear(&___nl__3); #line 44 c_rt_lib0move(&___nl__3,___get_global_const(0)); #line 44 c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__3)); #line 44 c_rt_lib0clear(&___nl__3); #line 44 c_rt_lib0clear(&___nl__0); #line 44 c_rt_lib0clear(&___nl__1); #line 44 return ___nl__2; #line 44 c_rt_lib0clear(&___nl__2); #line 44 c_rt_lib0clear(&___nl__0); #line 44 c_rt_lib0clear(&___nl__1); #line 44 return NULL; }
ImmT csv0load(ImmT ___nl__0) { c_rt_lib0arg_val(___nl__0); csv_priv0__const__init(); ImmT ___nl__1 = NULL; ImmT ___nl__2 = NULL; ImmT ___nl__3 = NULL; ImmT ___nl__4 = NULL; ImmT ___nl__5 = NULL; ImmT ___nl__6 = NULL; ImmT ___nl__7 = NULL; ImmT ___nl__8 = NULL; ImmT ___nl__9 = NULL; ImmT ___nl__10 = NULL; ImmT ___nl__11 = NULL; ImmT ___nl__12 = NULL; ImmT ___nl__13 = NULL; ImmT ___nl__14 = NULL; ImmT ___nl__15 = NULL; #line 44 c_rt_lib0move(&___nl__1,___get_global_const(155)); #line 45 c_rt_lib0move(&___nl__2, string0tab()); #line 46 c_rt_lib0move(&___nl__3, string0ord(___nl__2)); #line 47 c_rt_lib0move(&___nl__4, c_rt_lib0array_mk(0)); #line 48 c_rt_lib0move(&___nl__5, c_rt_lib0array_mk(0)); #line 49 c_rt_lib0move(&___nl__6, string0length(___nl__0)); #line 50 c_rt_lib0move(&___nl__7,___get_global_const(1)); #line 50 c_rt_lib0move(&___nl__7, c_rt_lib0num_eq(___nl__6, ___nl__7)); #line 50 c_rt_lib0move(&___nl__7, c_rt_lib0not(___nl__7)); #line 50 if(c_rt_lib0check_true_native(___nl__7)){ goto label_2;} #line 50 c_rt_lib0clear(&___nl__0); #line 50 c_rt_lib0clear(&___nl__1); #line 50 c_rt_lib0clear(&___nl__2); #line 50 c_rt_lib0clear(&___nl__3); #line 50 c_rt_lib0clear(&___nl__5); #line 50 c_rt_lib0clear(&___nl__6); #line 50 c_rt_lib0clear(&___nl__7); #line 50 return ___nl__4; #line 50 goto label_2; #line 50 label_2: #line 50 c_rt_lib0clear(&___nl__7); #line 51 c_rt_lib0move(&___nl__9,___get_global_const(2)); #line 51 c_rt_lib0move(&___nl__9, c_rt_lib0sub(___nl__6, ___nl__9)); #line 51 c_rt_lib0move(&___nl__10,___get_global_const(2)); #line 51 c_rt_lib0move(&___nl__8, string0substr(___nl__0, ___nl__9, ___nl__10)); #line 51 c_rt_lib0clear(&___nl__10); #line 51 c_rt_lib0clear(&___nl__9); #line 51 c_rt_lib0move(&___nl__7, string0ord(___nl__8)); #line 51 c_rt_lib0clear(&___nl__8); #line 51 c_rt_lib0move(&___nl__8,___get_global_const(157)); #line 51 c_rt_lib0move(&___nl__7, c_rt_lib0num_eq(___nl__7, ___nl__8)); #line 51 c_rt_lib0clear(&___nl__8); #line 51 c_rt_lib0move(&___nl__7, c_rt_lib0not(___nl__7)); #line 51 if(c_rt_lib0check_true_native(___nl__7)){ goto label_4;} #line 52 c_rt_lib0move(&___nl__8,___get_global_const(2)); #line 52 c_rt_lib0move(&___nl__6, c_rt_lib0sub_mod(___nl__6, ___nl__8)); #line 52 c_rt_lib0clear(&___nl__8); #line 53 c_rt_lib0move(&___nl__10,___get_global_const(2)); #line 53 c_rt_lib0move(&___nl__10, c_rt_lib0sub(___nl__6, ___nl__10)); #line 53 c_rt_lib0move(&___nl__11,___get_global_const(2)); #line 53 c_rt_lib0move(&___nl__9, string0substr(___nl__0, ___nl__10, ___nl__11)); #line 53 c_rt_lib0clear(&___nl__11); #line 53 c_rt_lib0clear(&___nl__10); #line 53 c_rt_lib0move(&___nl__8, string0ord(___nl__9)); #line 53 c_rt_lib0clear(&___nl__9); #line 53 c_rt_lib0move(&___nl__9,___get_global_const(158)); #line 53 c_rt_lib0move(&___nl__8, c_rt_lib0num_eq(___nl__8, ___nl__9)); #line 53 c_rt_lib0clear(&___nl__9); #line 53 c_rt_lib0move(&___nl__8, c_rt_lib0not(___nl__8)); #line 53 if(c_rt_lib0check_true_native(___nl__8)){ goto label_6;} #line 53 c_rt_lib0move(&___nl__9,___get_global_const(2)); #line 53 c_rt_lib0move(&___nl__6, c_rt_lib0sub_mod(___nl__6, ___nl__9)); #line 53 c_rt_lib0clear(&___nl__9); #line 53 goto label_6; #line 53 label_6: #line 53 c_rt_lib0clear(&___nl__8); #line 54 goto label_4; #line 54 label_4: #line 54 c_rt_lib0clear(&___nl__7); #line 55 c_rt_lib0move(&___nl__7,___get_global_const(0)); #line 56 c_rt_lib0move(&___nl__8,___get_global_const(1)); #line 57 label_8: #line 57 c_rt_lib0move(&___nl__9, c_rt_lib0lt(___nl__8, ___nl__6)); #line 57 c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9)); #line 57 if(c_rt_lib0check_true_native(___nl__9)){ goto label_7;} #line 58 c_rt_lib0move(&___nl__10, csv_priv0get_char(___nl__0, &___nl__8)); #line 59 c_rt_lib0move(&___nl__11, c_rt_lib0eq(___nl__10, ___nl__1)); #line 59 c_rt_lib0move(&___nl__11, c_rt_lib0not(___nl__11)); #line 59 if(c_rt_lib0check_true_native(___nl__11)){ goto label_10;} #line 60 label_12: #line 61 c_rt_lib0move(&___nl__12, c_rt_lib0ge(___nl__8, ___nl__6)); #line 61 c_rt_lib0move(&___nl__12, c_rt_lib0not(___nl__12)); #line 61 if(c_rt_lib0check_true_native(___nl__12)){ goto label_14;} #line 61 c_rt_lib0move(&___nl__13, csv_priv0end(&___nl__4, &___nl__5, ___nl__7)); #line 61 c_rt_lib0clear(&___nl__0); #line 61 c_rt_lib0clear(&___nl__1); #line 61 c_rt_lib0clear(&___nl__2); #line 61 c_rt_lib0clear(&___nl__3); #line 61 c_rt_lib0clear(&___nl__4); #line 61 c_rt_lib0clear(&___nl__5); #line 61 c_rt_lib0clear(&___nl__6); #line 61 c_rt_lib0clear(&___nl__7); #line 61 c_rt_lib0clear(&___nl__8); #line 61 c_rt_lib0clear(&___nl__9); #line 61 c_rt_lib0clear(&___nl__10); #line 61 c_rt_lib0clear(&___nl__11); #line 61 c_rt_lib0clear(&___nl__12); #line 61 return ___nl__13; #line 61 c_rt_lib0clear(&___nl__13); #line 61 goto label_14; #line 61 label_14: #line 61 c_rt_lib0clear(&___nl__12); #line 62 c_rt_lib0move(&___nl__12, csv_priv0get_char(___nl__0, &___nl__8)); #line 62 c_rt_lib0copy(&___nl__10, ___nl__12); #line 62 c_rt_lib0clear(&___nl__12); #line 63 c_rt_lib0move(&___nl__12, c_rt_lib0eq(___nl__10, ___nl__1)); #line 63 c_rt_lib0move(&___nl__12, c_rt_lib0not(___nl__12)); #line 63 if(c_rt_lib0check_true_native(___nl__12)){ goto label_16;} #line 64 c_rt_lib0move(&___nl__13, c_rt_lib0ge(___nl__8, ___nl__6)); #line 64 c_rt_lib0move(&___nl__13, c_rt_lib0not(___nl__13)); #line 64 if(c_rt_lib0check_true_native(___nl__13)){ goto label_18;} #line 64 c_rt_lib0move(&___nl__14, csv_priv0end(&___nl__4, &___nl__5, ___nl__7)); #line 64 c_rt_lib0clear(&___nl__0); #line 64 c_rt_lib0clear(&___nl__1); #line 64 c_rt_lib0clear(&___nl__2); #line 64 c_rt_lib0clear(&___nl__3); #line 64 c_rt_lib0clear(&___nl__4); #line 64 c_rt_lib0clear(&___nl__5); #line 64 c_rt_lib0clear(&___nl__6); #line 64 c_rt_lib0clear(&___nl__7); #line 64 c_rt_lib0clear(&___nl__8); #line 64 c_rt_lib0clear(&___nl__9); #line 64 c_rt_lib0clear(&___nl__10); #line 64 c_rt_lib0clear(&___nl__11); #line 64 c_rt_lib0clear(&___nl__12); #line 64 c_rt_lib0clear(&___nl__13); #line 64 return ___nl__14; #line 64 c_rt_lib0clear(&___nl__14); #line 64 goto label_18; #line 64 label_18: #line 64 c_rt_lib0clear(&___nl__13); #line 65 c_rt_lib0move(&___nl__13, csv_priv0get_char(___nl__0, &___nl__8)); #line 65 c_rt_lib0copy(&___nl__10, ___nl__13); #line 65 c_rt_lib0clear(&___nl__13); #line 66 c_rt_lib0move(&___nl__13, c_rt_lib0ne(___nl__10, ___nl__1)); #line 66 c_rt_lib0move(&___nl__13, c_rt_lib0not(___nl__13)); #line 66 if(c_rt_lib0check_true_native(___nl__13)){ goto label_20;} #line 66 c_rt_lib0clear(&___nl__12); #line 66 c_rt_lib0clear(&___nl__13); #line 66 goto label_11; #line 66 goto label_20; #line 66 label_20: #line 66 c_rt_lib0clear(&___nl__13); #line 67 goto label_16; #line 67 label_16: #line 67 c_rt_lib0clear(&___nl__12); #line 68 c_rt_lib0move(&___nl__7, c_rt_lib0concat_add(___nl__7, ___nl__10)); #line 60 goto label_12; #line 60 label_11: #line 70 goto label_9; #line 70 label_10: #line 71 c_rt_lib0move(&___nl__12, string0ord(___nl__10)); #line 72 label_22: #line 72 c_rt_lib0move(&___nl__13, c_rt_lib0num_ne(___nl__12, ___nl__3)); #line 72 c_rt_lib0move(&___nl__15, c_rt_lib0not(___nl__13)); #line 72 if(c_rt_lib0check_true_native(___nl__15)){ goto label_24;} #line 72 c_rt_lib0move(&___nl__13,___get_global_const(157)); #line 72 c_rt_lib0move(&___nl__13, c_rt_lib0num_ne(___nl__12, ___nl__13)); #line 72 label_24: #line 72 c_rt_lib0clear(&___nl__15); #line 72 c_rt_lib0move(&___nl__14, c_rt_lib0not(___nl__13)); #line 72 if(c_rt_lib0check_true_native(___nl__14)){ goto label_23;} #line 72 c_rt_lib0move(&___nl__13,___get_global_const(158)); #line 72 c_rt_lib0move(&___nl__13, c_rt_lib0num_ne(___nl__12, ___nl__13)); #line 72 label_23: #line 72 c_rt_lib0clear(&___nl__14); #line 72 c_rt_lib0move(&___nl__13, c_rt_lib0not(___nl__13)); #line 72 if(c_rt_lib0check_true_native(___nl__13)){ goto label_21;} #line 73 c_rt_lib0move(&___nl__7, c_rt_lib0concat_add(___nl__7, ___nl__10)); #line 74 c_rt_lib0move(&___nl__14, c_rt_lib0ge(___nl__8, ___nl__6)); #line 74 c_rt_lib0move(&___nl__14, c_rt_lib0not(___nl__14)); #line 74 if(c_rt_lib0check_true_native(___nl__14)){ goto label_26;} #line 74 c_rt_lib0move(&___nl__15, csv_priv0end(&___nl__4, &___nl__5, ___nl__7)); #line 74 c_rt_lib0clear(&___nl__0); #line 74 c_rt_lib0clear(&___nl__1); #line 74 c_rt_lib0clear(&___nl__2); #line 74 c_rt_lib0clear(&___nl__3); #line 74 c_rt_lib0clear(&___nl__4); #line 74 c_rt_lib0clear(&___nl__5); #line 74 c_rt_lib0clear(&___nl__6); #line 74 c_rt_lib0clear(&___nl__7); #line 74 c_rt_lib0clear(&___nl__8); #line 74 c_rt_lib0clear(&___nl__9); #line 74 c_rt_lib0clear(&___nl__10); #line 74 c_rt_lib0clear(&___nl__11); #line 74 c_rt_lib0clear(&___nl__12); #line 74 c_rt_lib0clear(&___nl__13); #line 74 c_rt_lib0clear(&___nl__14); #line 74 return ___nl__15; #line 74 c_rt_lib0clear(&___nl__15); #line 74 goto label_26; #line 74 label_26: #line 74 c_rt_lib0clear(&___nl__14); #line 75 c_rt_lib0move(&___nl__14, csv_priv0get_char(___nl__0, &___nl__8)); #line 75 c_rt_lib0copy(&___nl__10, ___nl__14); #line 75 c_rt_lib0clear(&___nl__14); #line 76 c_rt_lib0move(&___nl__14, string0ord(___nl__10)); #line 76 c_rt_lib0copy(&___nl__12, ___nl__14); #line 76 c_rt_lib0clear(&___nl__14); #line 77 goto label_22; #line 77 label_21: #line 77 c_rt_lib0clear(&___nl__13); #line 77 c_rt_lib0clear(&___nl__12); #line 78 goto label_9; #line 78 label_9: #line 78 c_rt_lib0clear(&___nl__11); #line 79 c_rt_lib0delete(array0push(&___nl__5, ___nl__7)); #line 80 c_rt_lib0move(&___nl__11,___get_global_const(0)); #line 80 c_rt_lib0copy(&___nl__7, ___nl__11); #line 80 c_rt_lib0clear(&___nl__11); #line 81 c_rt_lib0move(&___nl__11, string0ord(___nl__10)); #line 82 c_rt_lib0move(&___nl__12, c_rt_lib0num_eq(___nl__11, ___nl__3)); #line 82 c_rt_lib0move(&___nl__12, c_rt_lib0not(___nl__12)); #line 82 if(c_rt_lib0check_true_native(___nl__12)){ goto label_28;} #line 82 c_rt_lib0clear(&___nl__10); #line 82 c_rt_lib0clear(&___nl__11); #line 82 c_rt_lib0clear(&___nl__12); #line 82 goto label_8; #line 82 goto label_28; #line 82 label_28: #line 82 c_rt_lib0clear(&___nl__12); #line 83 c_rt_lib0move(&___nl__12,___get_global_const(158)); #line 83 c_rt_lib0move(&___nl__12, c_rt_lib0num_eq(___nl__11, ___nl__12)); #line 83 c_rt_lib0move(&___nl__12, c_rt_lib0not(___nl__12)); #line 83 if(c_rt_lib0check_true_native(___nl__12)){ goto label_30;} #line 84 c_rt_lib0move(&___nl__13, csv_priv0get_char(___nl__0, &___nl__8)); #line 84 c_rt_lib0copy(&___nl__10, ___nl__13); #line 84 c_rt_lib0clear(&___nl__13); #line 85 c_rt_lib0move(&___nl__13, string0ord(___nl__10)); #line 85 c_rt_lib0copy(&___nl__11, ___nl__13); #line 85 c_rt_lib0clear(&___nl__13); #line 86 goto label_30; #line 86 label_30: #line 86 c_rt_lib0clear(&___nl__12); #line 87 c_rt_lib0move(&___nl__12,___get_global_const(157)); #line 87 c_rt_lib0move(&___nl__12, c_rt_lib0num_eq(___nl__11, ___nl__12)); #line 87 c_rt_lib0move(&___nl__12, c_rt_lib0not(___nl__12)); #line 87 if(c_rt_lib0check_true_native(___nl__12)){ goto label_32;} #line 88 c_rt_lib0delete(array0push(&___nl__4, ___nl__5)); #line 89 c_rt_lib0move(&___nl__13, c_rt_lib0array_mk(0)); #line 89 c_rt_lib0copy(&___nl__5, ___nl__13); #line 89 c_rt_lib0clear(&___nl__13); #line 90 c_rt_lib0clear(&___nl__10); #line 90 c_rt_lib0clear(&___nl__11); #line 90 c_rt_lib0clear(&___nl__12); #line 90 goto label_8; #line 91 goto label_32; #line 91 label_32: #line 91 c_rt_lib0clear(&___nl__12); #line 91 c_rt_lib0clear(&___nl__10); #line 91 c_rt_lib0clear(&___nl__11); #line 92 goto label_8; #line 92 label_7: #line 92 c_rt_lib0clear(&___nl__9); #line 93 c_rt_lib0move(&___nl__9, csv_priv0end(&___nl__4, &___nl__5, ___nl__7)); #line 93 c_rt_lib0clear(&___nl__0); #line 93 c_rt_lib0clear(&___nl__1); #line 93 c_rt_lib0clear(&___nl__2); #line 93 c_rt_lib0clear(&___nl__3); #line 93 c_rt_lib0clear(&___nl__4); #line 93 c_rt_lib0clear(&___nl__5); #line 93 c_rt_lib0clear(&___nl__6); #line 93 c_rt_lib0clear(&___nl__7); #line 93 c_rt_lib0clear(&___nl__8); #line 93 return ___nl__9; #line 93 c_rt_lib0clear(&___nl__9); #line 93 c_rt_lib0clear(&___nl__1); #line 93 c_rt_lib0clear(&___nl__2); #line 93 c_rt_lib0clear(&___nl__3); #line 93 c_rt_lib0clear(&___nl__4); #line 93 c_rt_lib0clear(&___nl__5); #line 93 c_rt_lib0clear(&___nl__6); #line 93 c_rt_lib0clear(&___nl__7); #line 93 c_rt_lib0clear(&___nl__8); #line 93 c_rt_lib0clear(&___nl__0); #line 93 return NULL; }
ImmT csv0save(ImmT ___nl__0) { c_rt_lib0arg_val(___nl__0); csv_priv0__const__init(); ImmT ___nl__1 = NULL; ImmT ___nl__2 = NULL; ImmT ___nl__3 = NULL; ImmT ___nl__4 = NULL; ImmT ___nl__5 = NULL; ImmT ___nl__6 = NULL; ImmT ___nl__7 = NULL; ImmT ___nl__8 = NULL; ImmT ___nl__9 = NULL; ImmT ___nl__10 = NULL; ImmT ___nl__11 = NULL; ImmT ___nl__12 = NULL; ImmT ___nl__13 = NULL; ImmT ___nl__14 = NULL; ImmT ___nl__15 = NULL; ImmT ___nl__16 = NULL; ImmT ___nl__17 = NULL; ImmT ___nl__18 = NULL; ImmT ___nl__19 = NULL; ImmT ___nl__20 = NULL; ImmT ___nl__21 = NULL; ImmT ___nl__22 = NULL; #line 10 c_rt_lib0move(&___nl__1,___get_global_const(155)); #line 11 c_rt_lib0move(&___nl__2, string0tab()); #line 12 c_rt_lib0move(&___nl__3, c_rt_lib0concat_new(___nl__1, ___nl__1)); #line 13 c_rt_lib0move(&___nl__4,___get_global_const(0)); #line 14 c_rt_lib0move(&___nl__6,___get_global_const(1)); #line 14 c_rt_lib0move(&___nl__7,___get_global_const(2)); #line 14 c_rt_lib0move(&___nl__8, c_rt_lib0array_len(___nl__0)); #line 14 label_3: #line 14 c_rt_lib0move(&___nl__9, c_rt_lib0ge(___nl__6, ___nl__8)); #line 14 if(c_rt_lib0check_true_native(___nl__9)){ goto label_1;} #line 14 c_rt_lib0move(&___nl__5, c_rt_lib0array_get(___nl__0, ___nl__6)); #line 15 c_rt_lib0move(&___nl__10, array0len(___nl__5)); #line 16 c_rt_lib0move(&___nl__11,___get_global_const(1)); #line 16 c_rt_lib0move(&___nl__12,___get_global_const(2)); #line 16 label_6: #line 16 c_rt_lib0move(&___nl__13, c_rt_lib0ge(___nl__11, ___nl__10)); #line 16 if(c_rt_lib0check_true_native(___nl__13)){ goto label_4;} #line 17 c_rt_lib0move(&___nl__14, c_rt_lib0array_get(___nl__5, ___nl__11)); #line 18 c_rt_lib0move(&___nl__15, string0length(___nl__14)); #line 19 c_rt_lib0move(&___nl__16, c_rt_lib0get_false()); #line 20 c_rt_lib0move(&___nl__17,___get_global_const(1)); #line 20 c_rt_lib0move(&___nl__18,___get_global_const(2)); #line 20 label_9: #line 20 c_rt_lib0move(&___nl__19, c_rt_lib0ge(___nl__17, ___nl__15)); #line 20 if(c_rt_lib0check_true_native(___nl__19)){ goto label_7;} #line 21 c_rt_lib0move(&___nl__21,___get_global_const(2)); #line 21 c_rt_lib0move(&___nl__20, string0substr(___nl__14, ___nl__17, ___nl__21)); #line 21 c_rt_lib0clear(&___nl__21); #line 22 c_rt_lib0move(&___nl__21, string0ord(___nl__20)); #line 22 c_rt_lib0move(&___nl__22,___get_global_const(156)); #line 22 c_rt_lib0move(&___nl__21, c_rt_lib0lt(___nl__21, ___nl__22)); #line 22 c_rt_lib0clear(&___nl__22); #line 22 if(c_rt_lib0check_true_native(___nl__21)){ goto label_12;} #line 22 c_rt_lib0move(&___nl__21, c_rt_lib0eq(___nl__20, ___nl__1)); #line 22 label_12: #line 22 c_rt_lib0move(&___nl__21, c_rt_lib0not(___nl__21)); #line 22 if(c_rt_lib0check_true_native(___nl__21)){ goto label_11;} #line 22 c_rt_lib0move(&___nl__22, c_rt_lib0get_true()); #line 22 c_rt_lib0copy(&___nl__16, ___nl__22); #line 22 c_rt_lib0clear(&___nl__22); #line 22 goto label_11; #line 22 label_11: #line 22 c_rt_lib0clear(&___nl__21); #line 22 c_rt_lib0clear(&___nl__20); #line 23 c_rt_lib0move(&___nl__17, c_rt_lib0add_mod(___nl__17, ___nl__18)); #line 23 goto label_9; #line 23 label_7: #line 23 c_rt_lib0clear(&___nl__17); #line 23 c_rt_lib0clear(&___nl__18); #line 23 c_rt_lib0clear(&___nl__19); #line 24 c_rt_lib0copy(&___nl__17, ___nl__16); #line 24 c_rt_lib0move(&___nl__17, c_rt_lib0not(___nl__17)); #line 24 if(c_rt_lib0check_true_native(___nl__17)){ goto label_14;} #line 24 c_rt_lib0move(&___nl__18, string0replace(___nl__14, ___nl__1, ___nl__3)); #line 24 c_rt_lib0move(&___nl__18, c_rt_lib0concat_new(___nl__1, ___nl__18)); #line 24 c_rt_lib0move(&___nl__18, c_rt_lib0concat_add(___nl__18, ___nl__1)); #line 24 c_rt_lib0copy(&___nl__14, ___nl__18); #line 24 c_rt_lib0clear(&___nl__18); #line 24 goto label_14; #line 24 label_14: #line 24 c_rt_lib0clear(&___nl__17); #line 25 c_rt_lib0move(&___nl__4, c_rt_lib0concat_add(___nl__4, ___nl__14)); #line 26 c_rt_lib0move(&___nl__17,___get_global_const(2)); #line 26 c_rt_lib0move(&___nl__17, c_rt_lib0sub(___nl__10, ___nl__17)); #line 26 c_rt_lib0move(&___nl__17, c_rt_lib0num_eq(___nl__11, ___nl__17)); #line 26 c_rt_lib0move(&___nl__17, c_rt_lib0not(___nl__17)); #line 26 c_rt_lib0move(&___nl__17, c_rt_lib0not(___nl__17)); #line 26 if(c_rt_lib0check_true_native(___nl__17)){ goto label_16;} #line 26 c_rt_lib0move(&___nl__4, c_rt_lib0concat_add(___nl__4, ___nl__2)); #line 26 goto label_16; #line 26 label_16: #line 26 c_rt_lib0clear(&___nl__17); #line 26 c_rt_lib0clear(&___nl__14); #line 26 c_rt_lib0clear(&___nl__15); #line 26 c_rt_lib0clear(&___nl__16); #line 27 c_rt_lib0move(&___nl__11, c_rt_lib0add_mod(___nl__11, ___nl__12)); #line 27 goto label_6; #line 27 label_4: #line 27 c_rt_lib0clear(&___nl__11); #line 27 c_rt_lib0clear(&___nl__12); #line 27 c_rt_lib0clear(&___nl__13); #line 28 c_rt_lib0move(&___nl__11, string0lf()); #line 28 c_rt_lib0move(&___nl__4, c_rt_lib0concat_add(___nl__4, ___nl__11)); #line 28 c_rt_lib0clear(&___nl__11); #line 28 c_rt_lib0clear(&___nl__10); #line 29 c_rt_lib0move(&___nl__6, c_rt_lib0add_mod(___nl__6, ___nl__7)); #line 29 goto label_3; #line 29 label_1: #line 29 c_rt_lib0clear(&___nl__5); #line 29 c_rt_lib0clear(&___nl__6); #line 29 c_rt_lib0clear(&___nl__7); #line 29 c_rt_lib0clear(&___nl__8); #line 29 c_rt_lib0clear(&___nl__9); #line 30 c_rt_lib0clear(&___nl__0); #line 30 c_rt_lib0clear(&___nl__1); #line 30 c_rt_lib0clear(&___nl__2); #line 30 c_rt_lib0clear(&___nl__3); #line 30 return ___nl__4; #line 30 c_rt_lib0clear(&___nl__1); #line 30 c_rt_lib0clear(&___nl__2); #line 30 c_rt_lib0clear(&___nl__3); #line 30 c_rt_lib0clear(&___nl__4); #line 30 c_rt_lib0clear(&___nl__0); #line 30 return NULL; }
ImmT string_utils0is_float(ImmT ___nl__0) { c_rt_lib0arg_val(___nl__0); string_utils_priv0__const__init(); ImmT ___nl__1 = NULL; ImmT ___nl__2 = NULL; ImmT ___nl__3 = NULL; ImmT ___nl__4 = NULL; ImmT ___nl__5 = NULL; ImmT ___nl__6 = NULL; ImmT ___nl__7 = NULL; #line 24 c_rt_lib0move(&___nl__1,___get_global_const(0)); #line 24 c_rt_lib0move(&___nl__1, c_rt_lib0concat_new(___nl__0, ___nl__1)); #line 25 c_rt_lib0move(&___nl__2, string0length(___nl__1)); #line 26 c_rt_lib0move(&___nl__3,___get_global_const(941)); #line 26 c_rt_lib0move(&___nl__3, c_rt_lib0lt(___nl__2, ___nl__3)); #line 26 c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3)); #line 26 if(c_rt_lib0check_true_native(___nl__3)){ goto label_2;} #line 26 c_rt_lib0move(&___nl__4, c_rt_lib0get_false()); #line 26 c_rt_lib0clear(&___nl__0); #line 26 c_rt_lib0clear(&___nl__1); #line 26 c_rt_lib0clear(&___nl__2); #line 26 c_rt_lib0clear(&___nl__3); #line 26 return ___nl__4; #line 26 c_rt_lib0clear(&___nl__4); #line 26 goto label_2; #line 26 label_2: #line 26 c_rt_lib0clear(&___nl__3); #line 27 c_rt_lib0move(&___nl__3,___get_global_const(1)); #line 28 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 28 c_rt_lib0move(&___nl__4, string0substr(___nl__1, ___nl__3, ___nl__5)); #line 28 c_rt_lib0clear(&___nl__5); #line 28 c_rt_lib0move(&___nl__5,___get_global_const(245)); #line 28 c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__4, ___nl__5)); #line 28 c_rt_lib0clear(&___nl__5); #line 28 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 28 if(c_rt_lib0check_true_native(___nl__4)){ goto label_4;} #line 28 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 28 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5)); #line 28 c_rt_lib0clear(&___nl__5); #line 28 goto label_4; #line 28 label_4: #line 28 c_rt_lib0clear(&___nl__4); #line 29 c_rt_lib0copy(&___nl__3, ___nl__3); #line 29 label_6: #line 29 c_rt_lib0move(&___nl__4, c_rt_lib0lt(___nl__3, ___nl__2)); #line 29 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 29 if(c_rt_lib0check_true_native(___nl__4)){ goto label_5;} #line 30 c_rt_lib0move(&___nl__7,___get_global_const(2)); #line 30 c_rt_lib0move(&___nl__6, string0substr(___nl__1, ___nl__3, ___nl__7)); #line 30 c_rt_lib0clear(&___nl__7); #line 30 c_rt_lib0move(&___nl__5, string0is_digit(___nl__6)); #line 30 c_rt_lib0clear(&___nl__6); #line 30 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 30 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 30 if(c_rt_lib0check_true_native(___nl__5)){ goto label_9;} #line 30 c_rt_lib0clear(&___nl__5); #line 30 goto label_5; #line 30 goto label_9; #line 30 label_9: #line 30 c_rt_lib0clear(&___nl__5); #line 30 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 30 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5)); #line 30 c_rt_lib0clear(&___nl__5); #line 31 goto label_6; #line 31 label_5: #line 31 c_rt_lib0clear(&___nl__4); #line 32 c_rt_lib0move(&___nl__4,___get_global_const(2)); #line 32 c_rt_lib0move(&___nl__4, c_rt_lib0lt(___nl__3, ___nl__4)); #line 32 if(c_rt_lib0check_true_native(___nl__4)){ goto label_12;} #line 32 c_rt_lib0move(&___nl__4,___get_global_const(137)); #line 32 c_rt_lib0move(&___nl__4, c_rt_lib0add(___nl__3, ___nl__4)); #line 32 c_rt_lib0move(&___nl__4, c_rt_lib0gt(___nl__4, ___nl__2)); #line 32 label_12: #line 32 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 32 if(c_rt_lib0check_true_native(___nl__4)){ goto label_11;} #line 32 c_rt_lib0move(&___nl__5, c_rt_lib0get_false()); #line 32 c_rt_lib0clear(&___nl__0); #line 32 c_rt_lib0clear(&___nl__1); #line 32 c_rt_lib0clear(&___nl__2); #line 32 c_rt_lib0clear(&___nl__3); #line 32 c_rt_lib0clear(&___nl__4); #line 32 return ___nl__5; #line 32 c_rt_lib0clear(&___nl__5); #line 32 goto label_11; #line 32 label_11: #line 32 c_rt_lib0clear(&___nl__4); #line 33 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 33 c_rt_lib0move(&___nl__4, string0substr(___nl__1, ___nl__3, ___nl__5)); #line 33 c_rt_lib0clear(&___nl__5); #line 33 c_rt_lib0move(&___nl__5,___get_global_const(81)); #line 33 c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__4, ___nl__5)); #line 33 c_rt_lib0clear(&___nl__5); #line 33 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 33 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 33 if(c_rt_lib0check_true_native(___nl__4)){ goto label_14;} #line 33 c_rt_lib0move(&___nl__5, c_rt_lib0get_false()); #line 33 c_rt_lib0clear(&___nl__0); #line 33 c_rt_lib0clear(&___nl__1); #line 33 c_rt_lib0clear(&___nl__2); #line 33 c_rt_lib0clear(&___nl__3); #line 33 c_rt_lib0clear(&___nl__4); #line 33 return ___nl__5; #line 33 c_rt_lib0clear(&___nl__5); #line 33 goto label_14; #line 33 label_14: #line 33 c_rt_lib0clear(&___nl__4); #line 34 c_rt_lib0move(&___nl__4,___get_global_const(2)); #line 34 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__4)); #line 34 c_rt_lib0clear(&___nl__4); #line 34 label_16: #line 34 c_rt_lib0move(&___nl__4, c_rt_lib0lt(___nl__3, ___nl__2)); #line 34 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 34 if(c_rt_lib0check_true_native(___nl__4)){ goto label_15;} #line 35 c_rt_lib0move(&___nl__7,___get_global_const(2)); #line 35 c_rt_lib0move(&___nl__6, string0substr(___nl__1, ___nl__3, ___nl__7)); #line 35 c_rt_lib0clear(&___nl__7); #line 35 c_rt_lib0move(&___nl__5, string0is_digit(___nl__6)); #line 35 c_rt_lib0clear(&___nl__6); #line 35 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 35 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 35 if(c_rt_lib0check_true_native(___nl__5)){ goto label_19;} #line 35 c_rt_lib0move(&___nl__6, c_rt_lib0get_false()); #line 35 c_rt_lib0clear(&___nl__0); #line 35 c_rt_lib0clear(&___nl__1); #line 35 c_rt_lib0clear(&___nl__2); #line 35 c_rt_lib0clear(&___nl__3); #line 35 c_rt_lib0clear(&___nl__4); #line 35 c_rt_lib0clear(&___nl__5); #line 35 return ___nl__6; #line 35 c_rt_lib0clear(&___nl__6); #line 35 goto label_19; #line 35 label_19: #line 35 c_rt_lib0clear(&___nl__5); #line 35 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 35 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5)); #line 35 c_rt_lib0clear(&___nl__5); #line 36 goto label_16; #line 36 label_15: #line 36 c_rt_lib0clear(&___nl__4); #line 37 c_rt_lib0move(&___nl__4, c_rt_lib0get_true()); #line 37 c_rt_lib0clear(&___nl__0); #line 37 c_rt_lib0clear(&___nl__1); #line 37 c_rt_lib0clear(&___nl__2); #line 37 c_rt_lib0clear(&___nl__3); #line 37 return ___nl__4; #line 37 c_rt_lib0clear(&___nl__4); #line 37 c_rt_lib0clear(&___nl__1); #line 37 c_rt_lib0clear(&___nl__2); #line 37 c_rt_lib0clear(&___nl__3); #line 37 c_rt_lib0clear(&___nl__0); #line 37 return NULL; }
ImmT string_utils0is_integer(ImmT ___nl__0) { c_rt_lib0arg_val(___nl__0); string_utils_priv0__const__init(); ImmT ___nl__1 = NULL; ImmT ___nl__2 = NULL; ImmT ___nl__3 = NULL; ImmT ___nl__4 = NULL; ImmT ___nl__5 = NULL; ImmT ___nl__6 = NULL; ImmT ___nl__7 = NULL; #line 10 c_rt_lib0move(&___nl__1,___get_global_const(0)); #line 10 c_rt_lib0move(&___nl__1, c_rt_lib0concat_new(___nl__0, ___nl__1)); #line 11 c_rt_lib0move(&___nl__2, string0length(___nl__1)); #line 12 c_rt_lib0move(&___nl__3,___get_global_const(1)); #line 12 c_rt_lib0move(&___nl__3, c_rt_lib0eq(___nl__1, ___nl__3)); #line 12 c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3)); #line 12 if(c_rt_lib0check_true_native(___nl__3)){ goto label_2;} #line 12 c_rt_lib0move(&___nl__4, c_rt_lib0get_true()); #line 12 c_rt_lib0clear(&___nl__0); #line 12 c_rt_lib0clear(&___nl__1); #line 12 c_rt_lib0clear(&___nl__2); #line 12 c_rt_lib0clear(&___nl__3); #line 12 return ___nl__4; #line 12 c_rt_lib0clear(&___nl__4); #line 12 goto label_2; #line 12 label_2: #line 12 c_rt_lib0clear(&___nl__3); #line 13 c_rt_lib0move(&___nl__3,___get_global_const(1)); #line 14 c_rt_lib0move(&___nl__4,___get_global_const(1)); #line 14 c_rt_lib0move(&___nl__4, c_rt_lib0num_eq(___nl__2, ___nl__4)); #line 14 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 14 if(c_rt_lib0check_true_native(___nl__4)){ goto label_4;} #line 14 c_rt_lib0move(&___nl__5, c_rt_lib0get_false()); #line 14 c_rt_lib0clear(&___nl__0); #line 14 c_rt_lib0clear(&___nl__1); #line 14 c_rt_lib0clear(&___nl__2); #line 14 c_rt_lib0clear(&___nl__3); #line 14 c_rt_lib0clear(&___nl__4); #line 14 return ___nl__5; #line 14 c_rt_lib0clear(&___nl__5); #line 14 goto label_4; #line 14 label_4: #line 14 c_rt_lib0clear(&___nl__4); #line 15 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 15 c_rt_lib0move(&___nl__4, string0substr(___nl__1, ___nl__3, ___nl__5)); #line 15 c_rt_lib0clear(&___nl__5); #line 15 c_rt_lib0move(&___nl__5,___get_global_const(245)); #line 15 c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__4, ___nl__5)); #line 15 c_rt_lib0clear(&___nl__5); #line 15 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 15 if(c_rt_lib0check_true_native(___nl__4)){ goto label_6;} #line 15 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 15 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5)); #line 15 c_rt_lib0clear(&___nl__5); #line 15 goto label_6; #line 15 label_6: #line 15 c_rt_lib0clear(&___nl__4); #line 16 c_rt_lib0move(&___nl__4, c_rt_lib0num_eq(___nl__3, ___nl__2)); #line 16 if(c_rt_lib0check_true_native(___nl__4)){ goto label_9;} #line 16 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 16 c_rt_lib0move(&___nl__4, string0substr(___nl__1, ___nl__3, ___nl__5)); #line 16 c_rt_lib0clear(&___nl__5); #line 16 c_rt_lib0move(&___nl__5,___get_global_const(1)); #line 16 c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__4, ___nl__5)); #line 16 c_rt_lib0clear(&___nl__5); #line 16 label_9: #line 16 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 16 if(c_rt_lib0check_true_native(___nl__4)){ goto label_8;} #line 16 c_rt_lib0move(&___nl__5, c_rt_lib0get_false()); #line 16 c_rt_lib0clear(&___nl__0); #line 16 c_rt_lib0clear(&___nl__1); #line 16 c_rt_lib0clear(&___nl__2); #line 16 c_rt_lib0clear(&___nl__3); #line 16 c_rt_lib0clear(&___nl__4); #line 16 return ___nl__5; #line 16 c_rt_lib0clear(&___nl__5); #line 16 goto label_8; #line 16 label_8: #line 16 c_rt_lib0clear(&___nl__4); #line 17 c_rt_lib0copy(&___nl__3, ___nl__3); #line 17 label_11: #line 17 c_rt_lib0move(&___nl__4, c_rt_lib0lt(___nl__3, ___nl__2)); #line 17 c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4)); #line 17 if(c_rt_lib0check_true_native(___nl__4)){ goto label_10;} #line 18 c_rt_lib0move(&___nl__7,___get_global_const(2)); #line 18 c_rt_lib0move(&___nl__6, string0substr(___nl__1, ___nl__3, ___nl__7)); #line 18 c_rt_lib0clear(&___nl__7); #line 18 c_rt_lib0move(&___nl__5, string0is_digit(___nl__6)); #line 18 c_rt_lib0clear(&___nl__6); #line 18 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 18 c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5)); #line 18 if(c_rt_lib0check_true_native(___nl__5)){ goto label_14;} #line 18 c_rt_lib0move(&___nl__6, c_rt_lib0get_false()); #line 18 c_rt_lib0clear(&___nl__0); #line 18 c_rt_lib0clear(&___nl__1); #line 18 c_rt_lib0clear(&___nl__2); #line 18 c_rt_lib0clear(&___nl__3); #line 18 c_rt_lib0clear(&___nl__4); #line 18 c_rt_lib0clear(&___nl__5); #line 18 return ___nl__6; #line 18 c_rt_lib0clear(&___nl__6); #line 18 goto label_14; #line 18 label_14: #line 18 c_rt_lib0clear(&___nl__5); #line 18 c_rt_lib0move(&___nl__5,___get_global_const(2)); #line 18 c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5)); #line 18 c_rt_lib0clear(&___nl__5); #line 19 goto label_11; #line 19 label_10: #line 19 c_rt_lib0clear(&___nl__4); #line 20 c_rt_lib0move(&___nl__4, c_rt_lib0get_true()); #line 20 c_rt_lib0clear(&___nl__0); #line 20 c_rt_lib0clear(&___nl__1); #line 20 c_rt_lib0clear(&___nl__2); #line 20 c_rt_lib0clear(&___nl__3); #line 20 return ___nl__4; #line 20 c_rt_lib0clear(&___nl__4); #line 20 c_rt_lib0clear(&___nl__1); #line 20 c_rt_lib0clear(&___nl__2); #line 20 c_rt_lib0clear(&___nl__3); #line 20 c_rt_lib0clear(&___nl__0); #line 20 return NULL; }
ImmT string0length0ptr(int _num, ImmT *_tab){ c_rt_lib0func_num_args(_num, 1, "string0length"); return string0length(_tab[0]);}