Esempi in C++ (Cpp) per c_rt_lib0copy

Esempio n. 1

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0insert(ImmT * ___ref___0,ImmT ___nl__1,ImmT ___nl__2) {
c_rt_lib0arg_val(___nl__1);
c_rt_lib0arg_val(___nl__2);
ImmT ___nl__3 = NULL;
ImmT ___nl__4 = NULL;
ImmT ___nl__5 = NULL;
ImmT ___nl__6 = NULL;
#line 40
c_rt_lib0move(&___nl__4,___get_global_const(0));
#line 40
c_rt_lib0move(&___nl__3, array0subarray(*___ref___0, ___nl__4, ___nl__1));
#line 40
c_rt_lib0clear(&___nl__4);
#line 41
c_rt_lib0delete(array0push(&___nl__3, ___nl__2));
#line 42
c_rt_lib0copy(&___nl__4, ___nl__1);
#line 42
label_5:
#line 42
c_rt_lib0move(&___nl__5, array0len(*___ref___0));
#line 42
c_rt_lib0move(&___nl__5, c_rt_lib0lt(___nl__4, ___nl__5));
#line 42
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 42
if(c_rt_lib0check_true_native(___nl__5)){ goto label_17;}
#line 43
c_rt_lib0move(&___nl__6, c_rt_lib0array_get(*___ref___0, ___nl__4));
#line 43
c_rt_lib0delete(array0push(&___nl__3, ___nl__6));
#line 43
c_rt_lib0clear(&___nl__6);
#line 42
c_rt_lib0move(&___nl__6,___get_global_const(1));
#line 42
c_rt_lib0move(&___nl__4, c_rt_lib0add_mod(___nl__4, ___nl__6));
#line 42
c_rt_lib0clear(&___nl__6);
#line 44
goto label_5;
#line 44
label_17:
#line 44
c_rt_lib0clear(&___nl__4);
#line 44
c_rt_lib0clear(&___nl__5);
#line 45
c_rt_lib0copy(___ref___0, ___nl__3);
#line 45
c_rt_lib0clear(&___nl__3);
#line 45
c_rt_lib0clear(&___nl__1);
#line 45
c_rt_lib0clear(&___nl__2);
#line 45
return NULL;
}

Esempio n. 2

0

Mostra file

File: csv.c Progetto: mcFrax/nl

ImmT csv_priv0get_char(ImmT ___nl__0,ImmT * ___ref___1) {
c_rt_lib0arg_val(___nl__0);
csv_priv0__const__init();
ImmT ___nl__2 = NULL;
ImmT ___nl__3 = NULL;
ImmT ___nl__4 = NULL;
#line 34
c_rt_lib0copy(&___nl__3, *___ref___1);
#line 34
c_rt_lib0move(&___nl__4,___get_global_const(2));
#line 34
c_rt_lib0move(___ref___1, c_rt_lib0add_mod(*___ref___1, ___nl__4));
#line 34
c_rt_lib0clear(&___nl__4);
#line 34
c_rt_lib0move(&___nl__4,___get_global_const(2));
#line 34
c_rt_lib0move(&___nl__2, string0substr(___nl__0, ___nl__3, ___nl__4));
#line 34
c_rt_lib0clear(&___nl__4);
#line 34
c_rt_lib0clear(&___nl__3);
#line 34
c_rt_lib0clear(&___nl__0);
#line 34
return ___nl__2;
#line 34
c_rt_lib0clear(&___nl__2);
#line 34
c_rt_lib0clear(&___nl__0);
#line 34
return NULL;
}

Esempio n. 3

0

Mostra file

File: tct.c Progetto: nianiolang/nl

ImmT tct_priv0__const__sing(int __nr) {
if(___const__[__nr+0]==NULL) {
switch(__nr){
case 0:
	___const__[0] = tct0sim0cal();
	break;
case 1:
	___const__[1] = tct0none0cal();
	break;
case 2:
	___const__[2] = tct0void0cal();
	break;
case 3:
	___const__[3] = tct0empty0cal();
	break;
case 4:
	___const__[4] = tct0tct_im0cal();
	break;
case 5:
	___const__[5] = tct0func0cal();
	break;
case 6:
	___const__[6] = tct0meta_type0cal();
	break;
default:
	nl_die();
}}
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr+0]);
return ret;
}

Esempio n. 4

0

Mostra file

File: enum.c Progetto: nianiolang/nl

ImmT enum_priv0__const__sing(int __nr) {
if(___const__[__nr+0]==NULL) {
switch(__nr){
default:
	nl_die();
}}
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr+0]);
return ret;
}

Esempio n. 5

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0remove(ImmT * ___ref___0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__1);
ImmT ___nl__2 = NULL;
ImmT ___nl__3 = NULL;
ImmT ___nl__4 = NULL;
ImmT ___nl__5 = NULL;
#line 32
c_rt_lib0move(&___nl__3,___get_global_const(0));
#line 32
c_rt_lib0move(&___nl__2, array0subarray(*___ref___0, ___nl__3, ___nl__1));
#line 32
c_rt_lib0clear(&___nl__3);
#line 33
c_rt_lib0move(&___nl__3,___get_global_const(1));
#line 33
c_rt_lib0move(&___nl__3, c_rt_lib0add(___nl__1, ___nl__3));
#line 33
label_5:
#line 33
c_rt_lib0move(&___nl__4, array0len(*___ref___0));
#line 33
c_rt_lib0move(&___nl__4, c_rt_lib0lt(___nl__3, ___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_17;}
#line 34
c_rt_lib0move(&___nl__5, c_rt_lib0array_get(*___ref___0, ___nl__3));
#line 34
c_rt_lib0delete(array0push(&___nl__2, ___nl__5));
#line 34
c_rt_lib0clear(&___nl__5);
#line 33
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 33
c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__5));
#line 33
c_rt_lib0clear(&___nl__5);
#line 35
goto label_5;
#line 35
label_17:
#line 35
c_rt_lib0clear(&___nl__3);
#line 35
c_rt_lib0clear(&___nl__4);
#line 36
c_rt_lib0copy(___ref___0, ___nl__2);
#line 36
c_rt_lib0clear(&___nl__2);
#line 36
c_rt_lib0clear(&___nl__1);
#line 36
return NULL;
}

Esempio n. 6

0

Mostra file

File: boolean_t.c Progetto: agsamek/nl

ImmT boolean_t_priv0__const__sing(int __nr) {
if(___const__[__nr+0]==NULL) {
switch(__nr){
case 0:
	___const__[0] = boolean_t0type0cal();
	break;
default:
	nl_die();
}}
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr+0]);
return ret;
}

Esempio n. 7

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0unshift(ImmT * ___ref___0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__1);
ImmT ___nl__2 = NULL;
#line 59
c_rt_lib0move(&___nl__2, c_rt_lib0array_mk(1, ___nl__1));
#line 60
c_rt_lib0delete(array0append(&___nl__2, *___ref___0));
#line 61
c_rt_lib0copy(___ref___0, ___nl__2);
#line 61
c_rt_lib0clear(&___nl__2);
#line 61
c_rt_lib0clear(&___nl__1);
#line 61
return NULL;
}

Esempio n. 8

0

Mostra file

File: array.c Progetto: agsamek/nl

ImmT array0sort(ImmT * ___ref___0) {
array_priv0__const__init();
ImmT ___nl__1 = NULL;
ImmT ___nl__2 = NULL;
#line 44
c_rt_lib0move(&___nl__2, c_rt_lib0func_new(array0cmp0ptr, ___get_global_const(3), ___get_global_const(4)));
#line 44
c_rt_lib0move(&___nl__2, c_rt_lib0ov_mk_arg(___get_global_const(5), ___nl__2));
#line 44
c_rt_lib0move(&___nl__1, c_std_lib0array_sort(*___ref___0, ___nl__2));
#line 44
c_rt_lib0clear(&___nl__2);
#line 44
c_rt_lib0copy(___ref___0, ___nl__1);
#line 44
c_rt_lib0clear(&___nl__1);
#line 44
return NULL;
}

Esempio n. 9

0

Mostra file

File: csv.c Progetto: mcFrax/nl

ImmT csv_priv0end(ImmT * ___ref___0,ImmT * ___ref___1,ImmT ___nl__2) {
c_rt_lib0arg_val(___nl__2);
csv_priv0__const__init();
ImmT ___nl__3 = NULL;
#line 38
c_rt_lib0delete(array0push(___ref___1, ___nl__2));
#line 39
c_rt_lib0delete(array0push(___ref___0, *___ref___1));
#line 40
c_rt_lib0copy(&___nl__3, *___ref___0);
#line 40
c_rt_lib0clear(&___nl__2);
#line 40
return ___nl__3;
#line 40
c_rt_lib0clear(&___nl__3);
#line 40
c_rt_lib0clear(&___nl__2);
#line 40
return NULL;
}

Esempio n. 10

0

Mostra file

File: string.c Progetto: agsamek/nl

ImmT string_priv0__const__sing(int __nr) {
if(___const__[__nr+0]==NULL) {
switch(__nr){
case 0:
	___const__[0] = string0lf0cal();
	break;
case 1:
	___const__[1] = string0tab0cal();
	break;
case 2:
	___const__[2] = string0r0cal();
	break;
case 3:
	___const__[3] = string0f0cal();
	break;
default:
	nl_die();
}}
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr+0]);
return ret;
}

Esempio n. 11

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0join_arr(ImmT ___nl__0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__0);
c_rt_lib0arg_val(___nl__1);
ImmT ___nl__2 = NULL;
#line 83
c_rt_lib0copy(&___nl__2, ___nl__0);
#line 84
c_rt_lib0delete(array0append(&___nl__2, ___nl__1));
#line 85
c_rt_lib0clear(&___nl__0);
#line 85
c_rt_lib0clear(&___nl__1);
#line 85
return ___nl__2;
#line 85
c_rt_lib0clear(&___nl__2);
#line 85
c_rt_lib0clear(&___nl__0);
#line 85
c_rt_lib0clear(&___nl__1);
#line 85
return NULL;
}

Esempio n. 12

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0add(ImmT ___nl__0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__0);
c_rt_lib0arg_val(___nl__1);
ImmT ___nl__2 = NULL;
#line 53
c_rt_lib0copy(&___nl__2, ___nl__0);
#line 54
c_rt_lib0delete(array0push(&___nl__2, ___nl__1));
#line 55
c_rt_lib0clear(&___nl__0);
#line 55
c_rt_lib0clear(&___nl__1);
#line 55
return ___nl__2;
#line 55
c_rt_lib0clear(&___nl__2);
#line 55
c_rt_lib0clear(&___nl__0);
#line 55
c_rt_lib0clear(&___nl__1);
#line 55
return NULL;
}

Esempio n. 13

0

Mostra file

File: tct.c Progetto: nianiolang/nl

ImmT tct0var(ImmT ___nl__0) {
c_rt_lib0arg_val(___nl__0);
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;
#line 54
c_rt_lib0move(&___nl__1, c_rt_lib0hash_mk(0));
#line 55
c_rt_lib0move(&___nl__4, c_rt_lib0init_iter(___nl__0));
#line 55
label_2:
#line 55
c_rt_lib0move(&___nl__2, c_rt_lib0is_end_hash(___nl__4));
#line 55
if(c_rt_lib0check_true_native(___nl__2)){ goto label_30;}
#line 55
c_rt_lib0move(&___nl__2, c_rt_lib0get_key_iter(___nl__4));
#line 55
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value(___nl__0, ___nl__2));
#line 57
c_rt_lib0copy(&___nl__6, ___nl__3);
#line 57
c_rt_lib0move(&___nl__6, c_rt_lib0priv_is(___nl__6, ___get_global_const(1146)));
#line 57
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 57
if(c_rt_lib0check_true_native(___nl__6)){ goto label_15;}
#line 58
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_none(___get_global_const(809)));
#line 58
c_rt_lib0copy(&___nl__5, ___nl__7);
#line 58
c_rt_lib0clear(&___nl__7);
#line 59
goto label_24;
#line 59
label_15:
#line 60
c_rt_lib0move(&___nl__8, c_rt_lib0func_new(tct0meta_type0ptr, ___get_global_const(1134), ___get_global_const(678)));
#line 60
c_rt_lib0move(&___nl__8, c_rt_lib0ov_mk_arg(___get_global_const(5), ___nl__8));
#line 60
c_rt_lib0move(&___nl__7, ptd0ensure(___nl__8, ___nl__3));
#line 60
c_rt_lib0clear(&___nl__8);
#line 60
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(810), ___nl__7));
#line 60
c_rt_lib0copy(&___nl__5, ___nl__7);
#line 60
c_rt_lib0clear(&___nl__7);
#line 61
goto label_24;
#line 61
label_24:
#line 61
c_rt_lib0clear(&___nl__6);
#line 62
c_rt_lib0delete(hash0set_value(&___nl__1, ___nl__2, ___nl__5));
#line 62
c_rt_lib0clear(&___nl__5);
#line 63
c_rt_lib0move(&___nl__4, c_rt_lib0next_iter(___nl__4));
#line 63
goto label_2;
#line 63
label_30:
#line 63
c_rt_lib0clear(&___nl__2);
#line 63
c_rt_lib0clear(&___nl__3);
#line 63
c_rt_lib0clear(&___nl__4);
#line 64
c_rt_lib0move(&___nl__2, c_rt_lib0ov_mk_arg(___get_global_const(805), ___nl__1));
#line 64
c_rt_lib0clear(&___nl__0);
#line 64
c_rt_lib0clear(&___nl__1);
#line 64
return ___nl__2;
#line 64
c_rt_lib0clear(&___nl__2);
#line 64
c_rt_lib0clear(&___nl__1);
#line 64
c_rt_lib0clear(&___nl__0);
#line 64
return NULL;
}

Esempio n. 14

0

Mostra file

File: ptd_parser.c Progetto: mcFrax/nl

ImmT ptd_parser_priv0parse_hash(ImmT ___nl__0) {
c_rt_lib0arg_val(___nl__0);
ptd_parser_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;
#line 79
c_rt_lib0copy(&___nl__1, ___nl__0);
#line 79
c_rt_lib0move(&___nl__1, c_rt_lib0priv_as(___nl__1, ___get_global_const(220)));
#line 80
c_rt_lib0move(&___nl__2, c_rt_lib0hash_mk(0));
#line 81
c_rt_lib0move(&___nl__4,___get_global_const(1));
#line 81
c_rt_lib0move(&___nl__5,___get_global_const(2));
#line 81
c_rt_lib0move(&___nl__6, c_rt_lib0array_len(___nl__1));
#line 81
label_3:
#line 81
c_rt_lib0move(&___nl__7, c_rt_lib0ge(___nl__4, ___nl__6));
#line 81
if(c_rt_lib0check_true_native(___nl__7)){ goto label_1;}
#line 81
c_rt_lib0move(&___nl__3, c_rt_lib0array_get(___nl__1, ___nl__4));
#line 82
c_rt_lib0move(&___nl__11, c_rt_lib0hash_get_value_dec(___nl__3, ___get_global_const(238)));
#line 82
c_rt_lib0move(&___nl__10, ptd_parser0try_value_to_ptd(___nl__11));
#line 82
c_rt_lib0clear(&___nl__11);
#line 82
c_rt_lib0move(&___nl__9, c_rt_lib0priv_is(___nl__10, ___get_global_const(45)));
#line 82
if(c_rt_lib0check_true_native(___nl__9)){ goto label_4;}
#line 82
c_rt_lib0clear(&___nl__0);
#line 82
c_rt_lib0clear(&___nl__1);
#line 82
c_rt_lib0clear(&___nl__2);
#line 82
c_rt_lib0clear(&___nl__3);
#line 82
c_rt_lib0clear(&___nl__4);
#line 82
c_rt_lib0clear(&___nl__5);
#line 82
c_rt_lib0clear(&___nl__6);
#line 82
c_rt_lib0clear(&___nl__7);
#line 82
c_rt_lib0clear(&___nl__8);
#line 82
c_rt_lib0clear(&___nl__9);
#line 82
return ___nl__10;
#line 82
label_4:
#line 82
c_rt_lib0move(&___nl__8, c_rt_lib0priv_as(___nl__10, ___get_global_const(45)));
#line 82
c_rt_lib0clear(&___nl__9);
#line 82
c_rt_lib0clear(&___nl__10);
#line 83
c_rt_lib0move(&___nl__9, c_rt_lib0hash_get_value_dec(___nl__3, ___get_global_const(283)));
#line 83
c_rt_lib0move(&___nl__9, c_rt_lib0priv_as(___nl__9, ___get_global_const(802)));
#line 83
c_rt_lib0delete(hash0set_value(&___nl__2, ___nl__9, ___nl__8));
#line 83
c_rt_lib0clear(&___nl__9);
#line 83
c_rt_lib0clear(&___nl__8);
#line 84
c_rt_lib0move(&___nl__4, c_rt_lib0add_mod(___nl__4, ___nl__5));
#line 84
goto label_3;
#line 84
label_1:
#line 84
c_rt_lib0clear(&___nl__3);
#line 84
c_rt_lib0clear(&___nl__4);
#line 84
c_rt_lib0clear(&___nl__5);
#line 84
c_rt_lib0clear(&___nl__6);
#line 84
c_rt_lib0clear(&___nl__7);
#line 85
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__2));
#line 85
c_rt_lib0clear(&___nl__0);
#line 85
c_rt_lib0clear(&___nl__1);
#line 85
c_rt_lib0clear(&___nl__2);
#line 85
return ___nl__3;
#line 85
c_rt_lib0clear(&___nl__3);
#line 85
c_rt_lib0clear(&___nl__1);
#line 85
c_rt_lib0clear(&___nl__2);
#line 85
c_rt_lib0clear(&___nl__0);
#line 85
return NULL;
}

Esempio n. 15

0

Mostra file

File: csv.c Progetto: mcFrax/nl

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;
}

Esempio n. 16

0

Mostra file

File: csv.c Progetto: mcFrax/nl

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;
}

Esempio n. 17

0

Mostra file

File: ptd_parser.c Progetto: mcFrax/nl

ImmT ptd_parser0try_value_to_ptd(ImmT ___nl__0) {
c_rt_lib0arg_val(___nl__0);
ptd_parser_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;
#line 21
c_rt_lib0copy(&___nl__1, ___nl__0);
#line 21
c_rt_lib0move(&___nl__1, c_rt_lib0priv_is(___nl__1, ___get_global_const(804)));
#line 21
c_rt_lib0move(&___nl__1, c_rt_lib0not(___nl__1));
#line 21
if(c_rt_lib0check_true_native(___nl__1)){ goto label_2;}
#line 22
c_rt_lib0copy(&___nl__2, ___nl__0);
#line 22
c_rt_lib0move(&___nl__2, c_rt_lib0priv_as(___nl__2, ___get_global_const(804)));
#line 23
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value_dec(___nl__2, ___get_global_const(405)));
#line 23
c_rt_lib0move(&___nl__4,___get_global_const(189));
#line 23
c_rt_lib0move(&___nl__3, c_rt_lib0eq(___nl__3, ___nl__4));
#line 23
c_rt_lib0clear(&___nl__4);
#line 23
c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3));
#line 23
c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3));
#line 23
if(c_rt_lib0check_true_native(___nl__3)){ goto label_4;}
#line 23
c_rt_lib0move(&___nl__4,___get_global_const(1005));
#line 23
c_rt_lib0move(&___nl__5, c_rt_lib0hash_get_value_dec(___nl__2, ___get_global_const(405)));
#line 23
c_rt_lib0move(&___nl__4, c_rt_lib0concat_add(___nl__4, ___nl__5));
#line 23
c_rt_lib0clear(&___nl__5);
#line 23
c_rt_lib0move(&___nl__4, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__4));
#line 23
c_rt_lib0clear(&___nl__0);
#line 23
c_rt_lib0clear(&___nl__1);
#line 23
c_rt_lib0clear(&___nl__2);
#line 23
c_rt_lib0clear(&___nl__3);
#line 23
return ___nl__4;
#line 23
c_rt_lib0clear(&___nl__4);
#line 23
goto label_4;
#line 23
label_4:
#line 23
c_rt_lib0clear(&___nl__3);
#line 25
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value_dec(___nl__2, ___get_global_const(238)));
#line 25
c_rt_lib0move(&___nl__3, c_rt_lib0priv_as(___nl__3, ___get_global_const(805)));
#line 26
c_rt_lib0move(&___nl__5, c_rt_lib0hash_get_value_dec(___nl__3, ___get_global_const(111)));
#line 26
c_rt_lib0move(&___nl__6,___get_global_const(583));
#line 26
c_rt_lib0move(&___nl__5, c_rt_lib0concat_add(___nl__5, ___nl__6));
#line 26
c_rt_lib0clear(&___nl__6);
#line 26
c_rt_lib0move(&___nl__6, c_rt_lib0hash_get_value_dec(___nl__3, ___get_global_const(78)));
#line 26
c_rt_lib0move(&___nl__5, c_rt_lib0concat_add(___nl__5, ___nl__6));
#line 26
c_rt_lib0clear(&___nl__6);
#line 26
c_rt_lib0move(&___nl__4, tct0ref(___nl__5));
#line 26
c_rt_lib0clear(&___nl__5);
#line 26
c_rt_lib0move(&___nl__4, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__4));
#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
c_rt_lib0clear(&___nl__2);
#line 26
c_rt_lib0clear(&___nl__3);
#line 27
goto label_2;
#line 27
label_2:
#line 27
c_rt_lib0clear(&___nl__1);
#line 28
c_rt_lib0copy(&___nl__1, ___nl__0);
#line 28
c_rt_lib0move(&___nl__1, c_rt_lib0priv_is(___nl__1, ___get_global_const(759)));
#line 28
c_rt_lib0move(&___nl__1, c_rt_lib0not(___nl__1));
#line 28
c_rt_lib0move(&___nl__1, c_rt_lib0not(___nl__1));
#line 28
if(c_rt_lib0check_true_native(___nl__1)){ goto label_6;}
#line 28
c_rt_lib0move(&___nl__2,___get_global_const(1006));
#line 28
c_rt_lib0move(&___nl__3, ov0get_element(___nl__0));
#line 28
c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__3));
#line 28
c_rt_lib0clear(&___nl__3);
#line 28
c_rt_lib0move(&___nl__2, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__2));
#line 28
c_rt_lib0clear(&___nl__0);
#line 28
c_rt_lib0clear(&___nl__1);
#line 28
return ___nl__2;
#line 28
c_rt_lib0clear(&___nl__2);
#line 28
goto label_6;
#line 28
label_6:
#line 28
c_rt_lib0clear(&___nl__1);
#line 29
c_rt_lib0copy(&___nl__1, ___nl__0);
#line 29
c_rt_lib0move(&___nl__1, c_rt_lib0priv_as(___nl__1, ___get_global_const(759)));
#line 30
c_rt_lib0move(&___nl__2, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(111)));
#line 30
c_rt_lib0move(&___nl__3,___get_global_const(625));
#line 30
c_rt_lib0move(&___nl__2, c_rt_lib0eq(___nl__2, ___nl__3));
#line 30
c_rt_lib0clear(&___nl__3);
#line 30
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 30
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 30
if(c_rt_lib0check_true_native(___nl__2)){ goto label_8;}
#line 30
c_rt_lib0move(&___nl__3,___get_global_const(1007));
#line 30
c_rt_lib0move(&___nl__4, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(111)));
#line 30
c_rt_lib0move(&___nl__3, c_rt_lib0concat_add(___nl__3, ___nl__4));
#line 30
c_rt_lib0clear(&___nl__4);
#line 30
c_rt_lib0move(&___nl__4,___get_global_const(583));
#line 30
c_rt_lib0move(&___nl__3, c_rt_lib0concat_add(___nl__3, ___nl__4));
#line 30
c_rt_lib0clear(&___nl__4);
#line 30
c_rt_lib0move(&___nl__4, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(78)));
#line 30
c_rt_lib0move(&___nl__3, c_rt_lib0concat_add(___nl__3, ___nl__4));
#line 30
c_rt_lib0clear(&___nl__4);
#line 30
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__3));
#line 30
c_rt_lib0clear(&___nl__0);
#line 30
c_rt_lib0clear(&___nl__1);
#line 30
c_rt_lib0clear(&___nl__2);
#line 30
return ___nl__3;
#line 30
c_rt_lib0clear(&___nl__3);
#line 30
goto label_8;
#line 30
label_8:
#line 30
c_rt_lib0clear(&___nl__2);
#line 32
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(74)));
#line 32
c_rt_lib0move(&___nl__2, array0len(___nl__3));
#line 32
c_rt_lib0clear(&___nl__3);
#line 33
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(78)));
#line 34
c_rt_lib0move(&___nl__4,___get_global_const(291));
#line 34
c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__3, ___nl__4));
#line 34
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 34
if(c_rt_lib0check_true_native(___nl__4)){ goto label_10;}
#line 35
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 35
c_rt_lib0move(&___nl__5, c_rt_lib0num_eq(___nl__2, ___nl__5));
#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_12;}
#line 35
c_rt_lib0move(&___nl__6,___get_global_const(1008));
#line 35
c_rt_lib0move(&___nl__6, c_rt_lib0concat_add(___nl__6, ___nl__2));
#line 35
c_rt_lib0move(&___nl__6, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__6));
#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_12;
#line 35
label_12:
#line 35
c_rt_lib0clear(&___nl__5);
#line 36
c_rt_lib0move(&___nl__5, tct0sim());
#line 36
c_rt_lib0move(&___nl__5, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__5));
#line 36
c_rt_lib0clear(&___nl__0);
#line 36
c_rt_lib0clear(&___nl__1);
#line 36
c_rt_lib0clear(&___nl__2);
#line 36
c_rt_lib0clear(&___nl__3);
#line 36
c_rt_lib0clear(&___nl__4);
#line 36
return ___nl__5;
#line 36
c_rt_lib0clear(&___nl__5);
#line 37
goto label_16;
#line 37
label_10:
#line 37
c_rt_lib0move(&___nl__4,___get_global_const(971));
#line 37
c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__3, ___nl__4));
#line 37
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 37
if(c_rt_lib0check_true_native(___nl__4)){ goto label_13;}
#line 38
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 38
c_rt_lib0move(&___nl__5, c_rt_lib0num_eq(___nl__2, ___nl__5));
#line 38
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 38
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 38
if(c_rt_lib0check_true_native(___nl__5)){ goto label_15;}
#line 38
c_rt_lib0move(&___nl__6,___get_global_const(1009));
#line 38
c_rt_lib0move(&___nl__6, c_rt_lib0concat_add(___nl__6, ___nl__2));
#line 38
c_rt_lib0move(&___nl__6, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__6));
#line 38
c_rt_lib0clear(&___nl__0);
#line 38
c_rt_lib0clear(&___nl__1);
#line 38
c_rt_lib0clear(&___nl__2);
#line 38
c_rt_lib0clear(&___nl__3);
#line 38
c_rt_lib0clear(&___nl__4);
#line 38
c_rt_lib0clear(&___nl__5);
#line 38
return ___nl__6;
#line 38
c_rt_lib0clear(&___nl__6);
#line 38
goto label_15;
#line 38
label_15:
#line 38
c_rt_lib0clear(&___nl__5);
#line 39
c_rt_lib0move(&___nl__5, tct0tct_im());
#line 39
c_rt_lib0move(&___nl__5, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__5));
#line 39
c_rt_lib0clear(&___nl__0);
#line 39
c_rt_lib0clear(&___nl__1);
#line 39
c_rt_lib0clear(&___nl__2);
#line 39
c_rt_lib0clear(&___nl__3);
#line 39
c_rt_lib0clear(&___nl__4);
#line 39
return ___nl__5;
#line 39
c_rt_lib0clear(&___nl__5);
#line 40
goto label_16;
#line 40
label_13:
#line 40
c_rt_lib0move(&___nl__4,___get_global_const(724));
#line 40
c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__3, ___nl__4));
#line 40
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 40
if(c_rt_lib0check_true_native(___nl__4)){ goto label_16;}
#line 41
c_rt_lib0move(&___nl__5,___get_global_const(1010));
#line 41
c_rt_lib0move(&___nl__5, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__5));
#line 41
c_rt_lib0clear(&___nl__0);
#line 41
c_rt_lib0clear(&___nl__1);
#line 41
c_rt_lib0clear(&___nl__2);
#line 41
c_rt_lib0clear(&___nl__3);
#line 41
c_rt_lib0clear(&___nl__4);
#line 41
return ___nl__5;
#line 41
c_rt_lib0clear(&___nl__5);
#line 42
goto label_16;
#line 42
label_16:
#line 42
c_rt_lib0clear(&___nl__4);
#line 43
c_rt_lib0move(&___nl__4,___get_global_const(38));
#line 43
c_rt_lib0move(&___nl__4, c_rt_lib0eq(___nl__3, ___nl__4));
#line 43
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 43
if(c_rt_lib0check_true_native(___nl__4)){ goto label_18;}
#line 43
c_rt_lib0move(&___nl__5,___get_global_const(1011));
#line 43
c_rt_lib0move(&___nl__5, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__5));
#line 43
c_rt_lib0clear(&___nl__0);
#line 43
c_rt_lib0clear(&___nl__1);
#line 43
c_rt_lib0clear(&___nl__2);
#line 43
c_rt_lib0clear(&___nl__3);
#line 43
c_rt_lib0clear(&___nl__4);
#line 43
return ___nl__5;
#line 43
c_rt_lib0clear(&___nl__5);
#line 43
goto label_18;
#line 43
label_18:
#line 43
c_rt_lib0clear(&___nl__4);
#line 44
c_rt_lib0move(&___nl__5, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(74)));
#line 44
c_rt_lib0move(&___nl__4, array0len(___nl__5));
#line 44
c_rt_lib0clear(&___nl__5);
#line 44
c_rt_lib0move(&___nl__5,___get_global_const(2));
#line 44
c_rt_lib0move(&___nl__4, c_rt_lib0num_eq(___nl__4, ___nl__5));
#line 44
c_rt_lib0clear(&___nl__5);
#line 44
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 44
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 44
if(c_rt_lib0check_true_native(___nl__4)){ goto label_20;}
#line 44
c_rt_lib0move(&___nl__5,___get_global_const(1012));
#line 44
c_rt_lib0move(&___nl__5, c_rt_lib0concat_add(___nl__5, ___nl__3));
#line 44
c_rt_lib0move(&___nl__6,___get_global_const(1013));
#line 44
c_rt_lib0move(&___nl__5, c_rt_lib0concat_add(___nl__5, ___nl__6));
#line 44
c_rt_lib0clear(&___nl__6);
#line 44
c_rt_lib0move(&___nl__5, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__5));
#line 44
c_rt_lib0clear(&___nl__0);
#line 44
c_rt_lib0clear(&___nl__1);
#line 44
c_rt_lib0clear(&___nl__2);
#line 44
c_rt_lib0clear(&___nl__3);
#line 44
c_rt_lib0clear(&___nl__4);
#line 44
return ___nl__5;
#line 44
c_rt_lib0clear(&___nl__5);
#line 44
goto label_20;
#line 44
label_20:
#line 44
c_rt_lib0clear(&___nl__4);
#line 45
c_rt_lib0move(&___nl__4, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(74)));
#line 45
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 45
c_rt_lib0move(&___nl__4, c_rt_lib0array_get(___nl__4, ___nl__5));
#line 45
c_rt_lib0clear(&___nl__5);
#line 45
c_rt_lib0move(&___nl__4, c_rt_lib0hash_get_value_dec(___nl__4, ___get_global_const(238)));
#line 46
c_rt_lib0move(&___nl__5,___get_global_const(1014));
#line 46
c_rt_lib0move(&___nl__5, c_rt_lib0eq(___nl__3, ___nl__5));
#line 46
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 46
if(c_rt_lib0check_true_native(___nl__5)){ goto label_22;}
#line 47
c_rt_lib0copy(&___nl__6, ___nl__4);
#line 47
c_rt_lib0move(&___nl__6, c_rt_lib0priv_is(___nl__6, ___get_global_const(220)));
#line 47
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 47
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 47
if(c_rt_lib0check_true_native(___nl__6)){ goto label_24;}
#line 47
c_rt_lib0move(&___nl__7,___get_global_const(1015));
#line 47
c_rt_lib0move(&___nl__8, ov0get_element(___nl__4));
#line 47
c_rt_lib0move(&___nl__7, c_rt_lib0concat_add(___nl__7, ___nl__8));
#line 47
c_rt_lib0clear(&___nl__8);
#line 47
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__7));
#line 47
c_rt_lib0clear(&___nl__0);
#line 47
c_rt_lib0clear(&___nl__1);
#line 47
c_rt_lib0clear(&___nl__2);
#line 47
c_rt_lib0clear(&___nl__3);
#line 47
c_rt_lib0clear(&___nl__4);
#line 47
c_rt_lib0clear(&___nl__5);
#line 47
c_rt_lib0clear(&___nl__6);
#line 47
return ___nl__7;
#line 47
c_rt_lib0clear(&___nl__7);
#line 47
goto label_24;
#line 47
label_24:
#line 47
c_rt_lib0clear(&___nl__6);
#line 48
c_rt_lib0move(&___nl__8, ptd_parser_priv0parse_hash(___nl__4));
#line 48
c_rt_lib0move(&___nl__7, c_rt_lib0priv_is(___nl__8, ___get_global_const(45)));
#line 48
if(c_rt_lib0check_true_native(___nl__7)){ goto label_25;}
#line 48
c_rt_lib0clear(&___nl__0);
#line 48
c_rt_lib0clear(&___nl__1);
#line 48
c_rt_lib0clear(&___nl__2);
#line 48
c_rt_lib0clear(&___nl__3);
#line 48
c_rt_lib0clear(&___nl__4);
#line 48
c_rt_lib0clear(&___nl__5);
#line 48
c_rt_lib0clear(&___nl__6);
#line 48
c_rt_lib0clear(&___nl__7);
#line 48
return ___nl__8;
#line 48
label_25:
#line 48
c_rt_lib0move(&___nl__6, c_rt_lib0priv_as(___nl__8, ___get_global_const(45)));
#line 48
c_rt_lib0clear(&___nl__7);
#line 48
c_rt_lib0clear(&___nl__8);
#line 49
c_rt_lib0move(&___nl__7, tct0rec(___nl__6));
#line 49
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__7));
#line 49
c_rt_lib0clear(&___nl__0);
#line 49
c_rt_lib0clear(&___nl__1);
#line 49
c_rt_lib0clear(&___nl__2);
#line 49
c_rt_lib0clear(&___nl__3);
#line 49
c_rt_lib0clear(&___nl__4);
#line 49
c_rt_lib0clear(&___nl__5);
#line 49
c_rt_lib0clear(&___nl__6);
#line 49
return ___nl__7;
#line 49
c_rt_lib0clear(&___nl__7);
#line 49
c_rt_lib0clear(&___nl__6);
#line 50
goto label_21;
#line 50
label_22:
#line 50
c_rt_lib0move(&___nl__5,___get_global_const(282));
#line 50
c_rt_lib0move(&___nl__5, c_rt_lib0eq(___nl__3, ___nl__5));
#line 50
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 50
if(c_rt_lib0check_true_native(___nl__5)){ goto label_26;}
#line 51
c_rt_lib0move(&___nl__8, ptd_parser0try_value_to_ptd(___nl__4));
#line 51
c_rt_lib0move(&___nl__7, c_rt_lib0priv_is(___nl__8, ___get_global_const(45)));
#line 51
if(c_rt_lib0check_true_native(___nl__7)){ goto label_27;}
#line 51
c_rt_lib0clear(&___nl__0);
#line 51
c_rt_lib0clear(&___nl__1);
#line 51
c_rt_lib0clear(&___nl__2);
#line 51
c_rt_lib0clear(&___nl__3);
#line 51
c_rt_lib0clear(&___nl__4);
#line 51
c_rt_lib0clear(&___nl__5);
#line 51
c_rt_lib0clear(&___nl__6);
#line 51
c_rt_lib0clear(&___nl__7);
#line 51
return ___nl__8;
#line 51
label_27:
#line 51
c_rt_lib0move(&___nl__6, c_rt_lib0priv_as(___nl__8, ___get_global_const(45)));
#line 51
c_rt_lib0clear(&___nl__7);
#line 51
c_rt_lib0clear(&___nl__8);
#line 52
c_rt_lib0move(&___nl__7, tct0hash(___nl__6));
#line 52
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__7));
#line 52
c_rt_lib0clear(&___nl__0);
#line 52
c_rt_lib0clear(&___nl__1);
#line 52
c_rt_lib0clear(&___nl__2);
#line 52
c_rt_lib0clear(&___nl__3);
#line 52
c_rt_lib0clear(&___nl__4);
#line 52
c_rt_lib0clear(&___nl__5);
#line 52
c_rt_lib0clear(&___nl__6);
#line 52
return ___nl__7;
#line 52
c_rt_lib0clear(&___nl__7);
#line 52
c_rt_lib0clear(&___nl__6);
#line 53
goto label_21;
#line 53
label_26:
#line 53
c_rt_lib0move(&___nl__5,___get_global_const(281));
#line 53
c_rt_lib0move(&___nl__5, c_rt_lib0eq(___nl__3, ___nl__5));
#line 53
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 53
if(c_rt_lib0check_true_native(___nl__5)){ goto label_28;}
#line 54
c_rt_lib0move(&___nl__8, ptd_parser0try_value_to_ptd(___nl__4));
#line 54
c_rt_lib0move(&___nl__7, c_rt_lib0priv_is(___nl__8, ___get_global_const(45)));
#line 54
if(c_rt_lib0check_true_native(___nl__7)){ goto label_29;}
#line 54
c_rt_lib0clear(&___nl__0);
#line 54
c_rt_lib0clear(&___nl__1);
#line 54
c_rt_lib0clear(&___nl__2);
#line 54
c_rt_lib0clear(&___nl__3);
#line 54
c_rt_lib0clear(&___nl__4);
#line 54
c_rt_lib0clear(&___nl__5);
#line 54
c_rt_lib0clear(&___nl__6);
#line 54
c_rt_lib0clear(&___nl__7);
#line 54
return ___nl__8;
#line 54
label_29:
#line 54
c_rt_lib0move(&___nl__6, c_rt_lib0priv_as(___nl__8, ___get_global_const(45)));
#line 54
c_rt_lib0clear(&___nl__7);
#line 54
c_rt_lib0clear(&___nl__8);
#line 55
c_rt_lib0move(&___nl__7, tct0arr(___nl__6));
#line 55
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__7));
#line 55
c_rt_lib0clear(&___nl__0);
#line 55
c_rt_lib0clear(&___nl__1);
#line 55
c_rt_lib0clear(&___nl__2);
#line 55
c_rt_lib0clear(&___nl__3);
#line 55
c_rt_lib0clear(&___nl__4);
#line 55
c_rt_lib0clear(&___nl__5);
#line 55
c_rt_lib0clear(&___nl__6);
#line 55
return ___nl__7;
#line 55
c_rt_lib0clear(&___nl__7);
#line 55
c_rt_lib0clear(&___nl__6);
#line 56
goto label_21;
#line 56
label_28:
#line 56
c_rt_lib0move(&___nl__5,___get_global_const(796));
#line 56
c_rt_lib0move(&___nl__5, c_rt_lib0eq(___nl__3, ___nl__5));
#line 56
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 56
if(c_rt_lib0check_true_native(___nl__5)){ goto label_30;}
#line 57
c_rt_lib0move(&___nl__6,___get_global_const(2));
#line 57
c_rt_lib0move(&___nl__6, c_rt_lib0num_eq(___nl__2, ___nl__6));
#line 57
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 57
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 57
if(c_rt_lib0check_true_native(___nl__6)){ goto label_32;}
#line 57
c_rt_lib0move(&___nl__7,___get_global_const(1016));
#line 57
c_rt_lib0move(&___nl__7, c_rt_lib0concat_add(___nl__7, ___nl__2));
#line 57
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__7));
#line 57
c_rt_lib0clear(&___nl__0);
#line 57
c_rt_lib0clear(&___nl__1);
#line 57
c_rt_lib0clear(&___nl__2);
#line 57
c_rt_lib0clear(&___nl__3);
#line 57
c_rt_lib0clear(&___nl__4);
#line 57
c_rt_lib0clear(&___nl__5);
#line 57
c_rt_lib0clear(&___nl__6);
#line 57
return ___nl__7;
#line 57
c_rt_lib0clear(&___nl__7);
#line 57
goto label_32;
#line 57
label_32:
#line 57
c_rt_lib0clear(&___nl__6);
#line 58
c_rt_lib0copy(&___nl__6, ___nl__4);
#line 58
c_rt_lib0move(&___nl__6, c_rt_lib0priv_is(___nl__6, ___get_global_const(220)));
#line 58
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 58
c_rt_lib0move(&___nl__6, c_rt_lib0not(___nl__6));
#line 58
if(c_rt_lib0check_true_native(___nl__6)){ goto label_34;}
#line 58
c_rt_lib0move(&___nl__7,___get_global_const(1017));
#line 58
c_rt_lib0move(&___nl__8, ov0get_element(___nl__4));
#line 58
c_rt_lib0move(&___nl__7, c_rt_lib0concat_add(___nl__7, ___nl__8));
#line 58
c_rt_lib0clear(&___nl__8);
#line 58
c_rt_lib0move(&___nl__7, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__7));
#line 58
c_rt_lib0clear(&___nl__0);
#line 58
c_rt_lib0clear(&___nl__1);
#line 58
c_rt_lib0clear(&___nl__2);
#line 58
c_rt_lib0clear(&___nl__3);
#line 58
c_rt_lib0clear(&___nl__4);
#line 58
c_rt_lib0clear(&___nl__5);
#line 58
c_rt_lib0clear(&___nl__6);
#line 58
return ___nl__7;
#line 58
c_rt_lib0clear(&___nl__7);
#line 58
goto label_34;
#line 58
label_34:
#line 58
c_rt_lib0clear(&___nl__6);
#line 59
c_rt_lib0copy(&___nl__6, ___nl__4);
#line 59
c_rt_lib0move(&___nl__6, c_rt_lib0priv_as(___nl__6, ___get_global_const(220)));
#line 60
c_rt_lib0move(&___nl__7, c_rt_lib0hash_mk(0));
#line 61
c_rt_lib0move(&___nl__9,___get_global_const(1));
#line 61
c_rt_lib0move(&___nl__10,___get_global_const(2));
#line 61
c_rt_lib0move(&___nl__11, c_rt_lib0array_len(___nl__6));
#line 61
label_37:
#line 61
c_rt_lib0move(&___nl__12, c_rt_lib0ge(___nl__9, ___nl__11));
#line 61
if(c_rt_lib0check_true_native(___nl__12)){ goto label_35;}
#line 61
c_rt_lib0move(&___nl__8, c_rt_lib0array_get(___nl__6, ___nl__9));
#line 62
c_rt_lib0move(&___nl__13, c_rt_lib0hash_get_value_dec(___nl__8, ___get_global_const(238)));
#line 62
c_rt_lib0move(&___nl__13, c_rt_lib0priv_is(___nl__13, ___get_global_const(759)));
#line 62
c_rt_lib0move(&___nl__13, c_rt_lib0not(___nl__13));
#line 62
if(c_rt_lib0check_true_native(___nl__13)){ goto label_39;}
#line 63
c_rt_lib0move(&___nl__14, c_rt_lib0hash_get_value_dec(___nl__8, ___get_global_const(238)));
#line 63
c_rt_lib0move(&___nl__14, c_rt_lib0priv_as(___nl__14, ___get_global_const(759)));
#line 63
c_rt_lib0copy(&___nl__1, ___nl__14);
#line 63
c_rt_lib0clear(&___nl__14);
#line 64
c_rt_lib0move(&___nl__14, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(111)));
#line 64
c_rt_lib0move(&___nl__16,___get_global_const(625));
#line 64
c_rt_lib0move(&___nl__14, c_rt_lib0eq(___nl__14, ___nl__16));
#line 64
c_rt_lib0clear(&___nl__16);
#line 64
c_rt_lib0move(&___nl__15, c_rt_lib0not(___nl__14));
#line 64
if(c_rt_lib0check_true_native(___nl__15)){ goto label_42;}
#line 64
c_rt_lib0move(&___nl__14, c_rt_lib0hash_get_value_dec(___nl__1, ___get_global_const(78)));
#line 64
c_rt_lib0move(&___nl__16,___get_global_const(38));
#line 64
c_rt_lib0move(&___nl__14, c_rt_lib0eq(___nl__14, ___nl__16));
#line 64
c_rt_lib0clear(&___nl__16);
#line 64
label_42:
#line 64
c_rt_lib0clear(&___nl__15);
#line 64
c_rt_lib0move(&___nl__14, c_rt_lib0not(___nl__14));
#line 64
if(c_rt_lib0check_true_native(___nl__14)){ goto label_41;}
#line 65
c_rt_lib0move(&___nl__15, c_rt_lib0hash_get_value_dec(___nl__8, ___get_global_const(283)));
#line 65
c_rt_lib0move(&___nl__15, c_rt_lib0priv_as(___nl__15, ___get_global_const(802)));
#line 65
c_rt_lib0move(&___nl__16, tct0none());
#line 65
c_rt_lib0delete(hash0set_value(&___nl__7, ___nl__15, ___nl__16));
#line 65
c_rt_lib0clear(&___nl__16);
#line 65
c_rt_lib0clear(&___nl__15);
#line 66
c_rt_lib0clear(&___nl__13);
#line 66
c_rt_lib0clear(&___nl__14);
#line 66
goto label_36;
#line 67
goto label_41;
#line 67
label_41:
#line 67
c_rt_lib0clear(&___nl__14);
#line 68
goto label_39;
#line 68
label_39:
#line 68
c_rt_lib0clear(&___nl__13);
#line 69
c_rt_lib0move(&___nl__16, c_rt_lib0hash_get_value_dec(___nl__8, ___get_global_const(238)));
#line 69
c_rt_lib0move(&___nl__15, ptd_parser0try_value_to_ptd(___nl__16));
#line 69
c_rt_lib0clear(&___nl__16);
#line 69
c_rt_lib0move(&___nl__14, c_rt_lib0priv_is(___nl__15, ___get_global_const(45)));
#line 69
if(c_rt_lib0check_true_native(___nl__14)){ goto label_43;}
#line 69
c_rt_lib0clear(&___nl__0);
#line 69
c_rt_lib0clear(&___nl__1);
#line 69
c_rt_lib0clear(&___nl__2);
#line 69
c_rt_lib0clear(&___nl__3);
#line 69
c_rt_lib0clear(&___nl__4);
#line 69
c_rt_lib0clear(&___nl__5);
#line 69
c_rt_lib0clear(&___nl__6);
#line 69
c_rt_lib0clear(&___nl__7);
#line 69
c_rt_lib0clear(&___nl__8);
#line 69
c_rt_lib0clear(&___nl__9);
#line 69
c_rt_lib0clear(&___nl__10);
#line 69
c_rt_lib0clear(&___nl__11);
#line 69
c_rt_lib0clear(&___nl__12);
#line 69
c_rt_lib0clear(&___nl__13);
#line 69
c_rt_lib0clear(&___nl__14);
#line 69
return ___nl__15;
#line 69
label_43:
#line 69
c_rt_lib0move(&___nl__13, c_rt_lib0priv_as(___nl__15, ___get_global_const(45)));
#line 69
c_rt_lib0clear(&___nl__14);
#line 69
c_rt_lib0clear(&___nl__15);
#line 70
c_rt_lib0move(&___nl__14, c_rt_lib0hash_get_value_dec(___nl__8, ___get_global_const(283)));
#line 70
c_rt_lib0move(&___nl__14, c_rt_lib0priv_as(___nl__14, ___get_global_const(802)));
#line 70
c_rt_lib0delete(hash0set_value(&___nl__7, ___nl__14, ___nl__13));
#line 70
c_rt_lib0clear(&___nl__14);
#line 70
c_rt_lib0clear(&___nl__13);
#line 70
label_36:
#line 71
c_rt_lib0move(&___nl__9, c_rt_lib0add_mod(___nl__9, ___nl__10));
#line 71
goto label_37;
#line 71
label_35:
#line 71
c_rt_lib0clear(&___nl__8);
#line 71
c_rt_lib0clear(&___nl__9);
#line 71
c_rt_lib0clear(&___nl__10);
#line 71
c_rt_lib0clear(&___nl__11);
#line 71
c_rt_lib0clear(&___nl__12);
#line 72
c_rt_lib0move(&___nl__8, tct0var(___nl__7));
#line 72
c_rt_lib0move(&___nl__8, c_rt_lib0ov_mk_arg(___get_global_const(45), ___nl__8));
#line 72
c_rt_lib0clear(&___nl__0);
#line 72
c_rt_lib0clear(&___nl__1);
#line 72
c_rt_lib0clear(&___nl__2);
#line 72
c_rt_lib0clear(&___nl__3);
#line 72
c_rt_lib0clear(&___nl__4);
#line 72
c_rt_lib0clear(&___nl__5);
#line 72
c_rt_lib0clear(&___nl__6);
#line 72
c_rt_lib0clear(&___nl__7);
#line 72
return ___nl__8;
#line 72
c_rt_lib0clear(&___nl__8);
#line 72
c_rt_lib0clear(&___nl__6);
#line 72
c_rt_lib0clear(&___nl__7);
#line 73
goto label_21;
#line 73
label_30:
#line 74
c_rt_lib0move(&___nl__6,___get_global_const(1018));
#line 74
c_rt_lib0move(&___nl__6, c_rt_lib0concat_add(___nl__6, ___nl__3));
#line 74
c_rt_lib0move(&___nl__6, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__6));
#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
return ___nl__6;
#line 74
c_rt_lib0clear(&___nl__6);
#line 75
goto label_21;
#line 75
label_21:
#line 75
c_rt_lib0clear(&___nl__5);
#line 75
c_rt_lib0clear(&___nl__1);
#line 75
c_rt_lib0clear(&___nl__2);
#line 75
c_rt_lib0clear(&___nl__3);
#line 75
c_rt_lib0clear(&___nl__4);
#line 75
c_rt_lib0clear(&___nl__0);
#line 75
return NULL;
}

Esempio n. 18

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array_priv0part_sort(ImmT * ___ref___0,ImmT ___nl__1,ImmT ___nl__2,ImmT ___nl__3) {
c_rt_lib0arg_val(___nl__1);
c_rt_lib0arg_val(___nl__2);
c_rt_lib0arg_val(___nl__3);
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;
#line 126
c_rt_lib0move(&___nl__4, c_rt_lib0sub(___nl__2, ___nl__1));
#line 126
c_rt_lib0move(&___nl__5,___get_global_const(0));
#line 126
c_rt_lib0move(&___nl__4, c_rt_lib0le(___nl__4, ___nl__5));
#line 126
c_rt_lib0clear(&___nl__5);
#line 126
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 126
if(c_rt_lib0check_true_native(___nl__4)){ goto label_12;}
#line 126
c_rt_lib0clear(&___nl__1);
#line 126
c_rt_lib0clear(&___nl__2);
#line 126
c_rt_lib0clear(&___nl__3);
#line 126
c_rt_lib0clear(&___nl__4);
#line 126
return NULL;
#line 126
goto label_12;
#line 126
label_12:
#line 126
c_rt_lib0clear(&___nl__4);
#line 127
c_rt_lib0move(&___nl__4, c_rt_lib0sub(___nl__2, ___nl__1));
#line 127
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 127
c_rt_lib0move(&___nl__4, c_rt_lib0num_eq(___nl__4, ___nl__5));
#line 127
c_rt_lib0clear(&___nl__5);
#line 127
c_rt_lib0move(&___nl__4, c_rt_lib0not(___nl__4));
#line 127
if(c_rt_lib0check_true_native(___nl__4)){ goto label_53;}
#line 128
c_rt_lib0move(&___nl__6, c_rt_lib0array_get(*___ref___0, ___nl__1));
#line 128
c_rt_lib0move(&___nl__7, c_rt_lib0array_get(*___ref___0, ___nl__2));
#line 128
c_rt_lib0move(&___nl__5, array_priv0exec(___nl__3, ___nl__6, ___nl__7));
#line 128
c_rt_lib0clear(&___nl__7);
#line 128
c_rt_lib0clear(&___nl__6);
#line 128
c_rt_lib0move(&___nl__5, c_rt_lib0not(___nl__5));
#line 128
if(c_rt_lib0check_true_native(___nl__5)){ goto label_34;}
#line 128
c_rt_lib0clear(&___nl__1);
#line 128
c_rt_lib0clear(&___nl__2);
#line 128
c_rt_lib0clear(&___nl__3);
#line 128
c_rt_lib0clear(&___nl__4);
#line 128
c_rt_lib0clear(&___nl__5);
#line 128
return NULL;
#line 128
goto label_34;
#line 128
label_34:
#line 128
c_rt_lib0clear(&___nl__5);
#line 129
c_rt_lib0move(&___nl__5, c_rt_lib0array_get(*___ref___0, ___nl__1));
#line 130
c_rt_lib0move(&___nl__6, c_rt_lib0array_get(*___ref___0, ___nl__2));
#line 130
c_rt_lib0copy(&___nl__7, ___nl__6);
#line 130
c_rt_lib0array_set(___ref___0, ___nl__1, ___nl__7);
#line 130
c_rt_lib0clear(&___nl__6);
#line 130
c_rt_lib0clear(&___nl__7);
#line 131
c_rt_lib0copy(&___nl__6, ___nl__5);
#line 131
c_rt_lib0array_set(___ref___0, ___nl__2, ___nl__6);
#line 131
c_rt_lib0clear(&___nl__6);
#line 132
c_rt_lib0clear(&___nl__1);
#line 132
c_rt_lib0clear(&___nl__2);
#line 132
c_rt_lib0clear(&___nl__3);
#line 132
c_rt_lib0clear(&___nl__4);
#line 132
c_rt_lib0clear(&___nl__5);
#line 132
return NULL;
#line 132
c_rt_lib0clear(&___nl__5);
#line 133
goto label_53;
#line 133
label_53:
#line 133
c_rt_lib0clear(&___nl__4);
#line 134
c_rt_lib0move(&___nl__4, c_rt_lib0sub(___nl__2, ___nl__1));
#line 134
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 134
c_rt_lib0move(&___nl__4, c_rt_lib0add_mod(___nl__4, ___nl__5));
#line 134
c_rt_lib0clear(&___nl__5);
#line 134
c_rt_lib0move(&___nl__5, c_rt_lib0sub(___nl__2, ___nl__1));
#line 134
c_rt_lib0move(&___nl__6,___get_global_const(1));
#line 134
c_rt_lib0move(&___nl__5, c_rt_lib0add_mod(___nl__5, ___nl__6));
#line 134
c_rt_lib0clear(&___nl__6);
#line 134
c_rt_lib0move(&___nl__6,___get_global_const(6));
#line 134
c_rt_lib0move(&___nl__5, c_rt_lib0mod_mod(___nl__5, ___nl__6));
#line 134
c_rt_lib0clear(&___nl__6);
#line 134
c_rt_lib0move(&___nl__4, c_rt_lib0sub_mod(___nl__4, ___nl__5));
#line 134
c_rt_lib0clear(&___nl__5);
#line 134
c_rt_lib0move(&___nl__5,___get_global_const(6));
#line 134
c_rt_lib0move(&___nl__4, c_rt_lib0div_mod(___nl__4, ___nl__5));
#line 134
c_rt_lib0clear(&___nl__5);
#line 134
c_rt_lib0move(&___nl__4, c_rt_lib0add(___nl__1, ___nl__4));
#line 135
c_rt_lib0delete(array_priv0part_sort(___ref___0, ___nl__1, ___nl__4, ___nl__3));
#line 136
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 136
c_rt_lib0move(&___nl__5, c_rt_lib0add(___nl__4, ___nl__5));
#line 136
c_rt_lib0delete(array_priv0part_sort(___ref___0, ___nl__5, ___nl__2, ___nl__3));
#line 136
c_rt_lib0clear(&___nl__5);
#line 137
c_rt_lib0move(&___nl__5, c_rt_lib0array_mk(0));
#line 138
c_rt_lib0copy(&___nl__6, ___nl__1);
#line 139
c_rt_lib0move(&___nl__7,___get_global_const(1));
#line 139
c_rt_lib0move(&___nl__7, c_rt_lib0add(___nl__4, ___nl__7));
#line 140
label_81:
#line 140
c_rt_lib0move(&___nl__8, c_rt_lib0le(___nl__6, ___nl__4));
#line 140
if(c_rt_lib0check_true_native(___nl__8)){ goto label_85;}
#line 140
c_rt_lib0move(&___nl__8, c_rt_lib0le(___nl__7, ___nl__2));
#line 140
label_85:
#line 140
c_rt_lib0move(&___nl__8, c_rt_lib0not(___nl__8));
#line 140
if(c_rt_lib0check_true_native(___nl__8)){ goto label_135;}
#line 141
c_rt_lib0move(&___nl__9, c_rt_lib0gt(___nl__6, ___nl__4));
#line 141
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 141
if(c_rt_lib0check_true_native(___nl__9)){ goto label_98;}
#line 142
c_rt_lib0move(&___nl__10, c_rt_lib0array_get(*___ref___0, ___nl__7));
#line 142
c_rt_lib0delete(array0push(&___nl__5, ___nl__10));
#line 142
c_rt_lib0clear(&___nl__10);
#line 143
c_rt_lib0move(&___nl__10,___get_global_const(1));
#line 143
c_rt_lib0move(&___nl__7, c_rt_lib0add_mod(___nl__7, ___nl__10));
#line 143
c_rt_lib0clear(&___nl__10);
#line 144
goto label_132;
#line 144
label_98:
#line 144
c_rt_lib0move(&___nl__9, c_rt_lib0gt(___nl__7, ___nl__2));
#line 144
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 144
if(c_rt_lib0check_true_native(___nl__9)){ goto label_109;}
#line 145
c_rt_lib0move(&___nl__10, c_rt_lib0array_get(*___ref___0, ___nl__6));
#line 145
c_rt_lib0delete(array0push(&___nl__5, ___nl__10));
#line 145
c_rt_lib0clear(&___nl__10);
#line 146
c_rt_lib0move(&___nl__10,___get_global_const(1));
#line 146
c_rt_lib0move(&___nl__6, c_rt_lib0add_mod(___nl__6, ___nl__10));
#line 146
c_rt_lib0clear(&___nl__10);
#line 147
goto label_132;
#line 147
label_109:
#line 147
c_rt_lib0move(&___nl__10, c_rt_lib0array_get(*___ref___0, ___nl__6));
#line 147
c_rt_lib0move(&___nl__11, c_rt_lib0array_get(*___ref___0, ___nl__7));
#line 147
c_rt_lib0move(&___nl__9, array_priv0exec(___nl__3, ___nl__10, ___nl__11));
#line 147
c_rt_lib0clear(&___nl__11);
#line 147
c_rt_lib0clear(&___nl__10);
#line 147
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 147
if(c_rt_lib0check_true_native(___nl__9)){ goto label_124;}
#line 148
c_rt_lib0move(&___nl__10, c_rt_lib0array_get(*___ref___0, ___nl__6));
#line 148
c_rt_lib0delete(array0push(&___nl__5, ___nl__10));
#line 148
c_rt_lib0clear(&___nl__10);
#line 149
c_rt_lib0move(&___nl__10,___get_global_const(1));
#line 149
c_rt_lib0move(&___nl__6, c_rt_lib0add_mod(___nl__6, ___nl__10));
#line 149
c_rt_lib0clear(&___nl__10);
#line 150
goto label_132;
#line 150
label_124:
#line 151
c_rt_lib0move(&___nl__10, c_rt_lib0array_get(*___ref___0, ___nl__7));
#line 151
c_rt_lib0delete(array0push(&___nl__5, ___nl__10));
#line 151
c_rt_lib0clear(&___nl__10);
#line 152
c_rt_lib0move(&___nl__10,___get_global_const(1));
#line 152
c_rt_lib0move(&___nl__7, c_rt_lib0add_mod(___nl__7, ___nl__10));
#line 152
c_rt_lib0clear(&___nl__10);
#line 153
goto label_132;
#line 153
label_132:
#line 153
c_rt_lib0clear(&___nl__9);
#line 154
goto label_81;
#line 154
label_135:
#line 154
c_rt_lib0clear(&___nl__8);
#line 155
c_rt_lib0move(&___nl__8, c_rt_lib0sub(___nl__2, ___nl__1));
#line 155
c_rt_lib0move(&___nl__9,___get_global_const(1));
#line 155
c_rt_lib0move(&___nl__8, c_rt_lib0add_mod(___nl__8, ___nl__9));
#line 155
c_rt_lib0clear(&___nl__9);
#line 155
c_rt_lib0move(&___nl__9,___get_global_const(0));
#line 155
c_rt_lib0move(&___nl__10,___get_global_const(1));
#line 155
label_143:
#line 155
c_rt_lib0move(&___nl__11, c_rt_lib0ge(___nl__9, ___nl__8));
#line 155
if(c_rt_lib0check_true_native(___nl__11)){ goto label_155;}
#line 155
c_rt_lib0move(&___nl__12, c_rt_lib0array_get(___nl__5, ___nl__9));
#line 155
c_rt_lib0move(&___nl__14, c_rt_lib0add(___nl__1, ___nl__9));
#line 155
c_rt_lib0copy(&___nl__13, ___nl__12);
#line 155
c_rt_lib0array_set(___ref___0, ___nl__14, ___nl__13);
#line 155
c_rt_lib0clear(&___nl__12);
#line 155
c_rt_lib0clear(&___nl__13);
#line 155
c_rt_lib0clear(&___nl__14);
#line 155
c_rt_lib0move(&___nl__9, c_rt_lib0add_mod(___nl__9, ___nl__10));
#line 155
goto label_143;
#line 155
label_155:
#line 155
c_rt_lib0clear(&___nl__8);
#line 155
c_rt_lib0clear(&___nl__9);
#line 155
c_rt_lib0clear(&___nl__10);
#line 155
c_rt_lib0clear(&___nl__11);
#line 155
c_rt_lib0clear(&___nl__4);
#line 155
c_rt_lib0clear(&___nl__5);
#line 155
c_rt_lib0clear(&___nl__6);
#line 155
c_rt_lib0clear(&___nl__7);
#line 155
c_rt_lib0clear(&___nl__1);
#line 155
c_rt_lib0clear(&___nl__2);
#line 155
c_rt_lib0clear(&___nl__3);
#line 155
return NULL;
}

Esempio n. 19

0

Mostra file

File: string_utils.c Progetto: agsamek/nl

ImmT string_utils_priv0__const__sim(int __nr) {
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr]);
return ret;
}

Esempio n. 20

0

Mostra file

File: tct.c Progetto: nianiolang/nl

ImmT tct0try_var_as_case(ImmT ___nl__0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__0);
c_rt_lib0arg_val(___nl__1);
ImmT ___nl__2 = NULL;
ImmT ___nl__3 = NULL;
ImmT ___nl__4 = NULL;
#line 68
c_rt_lib0copy(&___nl__2, ___nl__0);
#line 68
c_rt_lib0move(&___nl__2, c_rt_lib0priv_is(___nl__2, ___get_global_const(805)));
#line 68
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 68
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 68
if(c_rt_lib0check_true_native(___nl__2)){ goto label_13;}
#line 68
c_rt_lib0move(&___nl__3,___get_global_const(2));
#line 68
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(47), ___nl__3));
#line 68
c_rt_lib0clear(&___nl__0);
#line 68
c_rt_lib0clear(&___nl__1);
#line 68
c_rt_lib0clear(&___nl__2);
#line 68
return ___nl__3;
#line 68
c_rt_lib0clear(&___nl__3);
#line 68
goto label_13;
#line 68
label_13:
#line 68
c_rt_lib0clear(&___nl__2);
#line 69
c_rt_lib0copy(&___nl__3, ___nl__0);
#line 69
c_rt_lib0move(&___nl__3, c_rt_lib0priv_as(___nl__3, ___get_global_const(805)));
#line 69
c_rt_lib0move(&___nl__2, hash0has_key(___nl__3, ___nl__1));
#line 69
c_rt_lib0clear(&___nl__3);
#line 69
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 69
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 69
if(c_rt_lib0check_true_native(___nl__2)){ goto label_30;}
#line 69
c_rt_lib0move(&___nl__3,___get_global_const(2));
#line 69
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(47), ___nl__3));
#line 69
c_rt_lib0clear(&___nl__0);
#line 69
c_rt_lib0clear(&___nl__1);
#line 69
c_rt_lib0clear(&___nl__2);
#line 69
return ___nl__3;
#line 69
c_rt_lib0clear(&___nl__3);
#line 69
goto label_30;
#line 69
label_30:
#line 69
c_rt_lib0clear(&___nl__2);
#line 70
c_rt_lib0copy(&___nl__3, ___nl__0);
#line 70
c_rt_lib0move(&___nl__3, c_rt_lib0priv_as(___nl__3, ___get_global_const(805)));
#line 70
c_rt_lib0move(&___nl__2, hash0get_value(___nl__3, ___nl__1));
#line 70
c_rt_lib0clear(&___nl__3);
#line 71
c_rt_lib0copy(&___nl__3, ___nl__2);
#line 71
c_rt_lib0move(&___nl__3, c_rt_lib0priv_is(___nl__3, ___get_global_const(810)));
#line 71
c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3));
#line 71
c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__3));
#line 71
if(c_rt_lib0check_true_native(___nl__3)){ goto label_50;}
#line 71
c_rt_lib0move(&___nl__4,___get_global_const(2));
#line 71
c_rt_lib0move(&___nl__4, c_rt_lib0ov_mk_arg(___get_global_const(47), ___nl__4));
#line 71
c_rt_lib0clear(&___nl__0);
#line 71
c_rt_lib0clear(&___nl__1);
#line 71
c_rt_lib0clear(&___nl__2);
#line 71
c_rt_lib0clear(&___nl__3);
#line 71
return ___nl__4;
#line 71
c_rt_lib0clear(&___nl__4);
#line 71
goto label_50;
#line 71
label_50:
#line 71
c_rt_lib0clear(&___nl__3);
#line 72
c_rt_lib0copy(&___nl__3, ___nl__2);
#line 72
c_rt_lib0move(&___nl__3, c_rt_lib0priv_as(___nl__3, ___get_global_const(810)));
#line 72
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(48), ___nl__3));
#line 72
c_rt_lib0clear(&___nl__0);
#line 72
c_rt_lib0clear(&___nl__1);
#line 72
c_rt_lib0clear(&___nl__2);
#line 72
return ___nl__3;
#line 72
c_rt_lib0clear(&___nl__3);
#line 72
c_rt_lib0clear(&___nl__2);
#line 72
c_rt_lib0clear(&___nl__0);
#line 72
c_rt_lib0clear(&___nl__1);
#line 72
return NULL;
}

Esempio n. 21

0

Mostra file

File: boolean_t.c Progetto: agsamek/nl

ImmT boolean_t_priv0__const__sim(int __nr) {
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr]);
return ret;
}

Esempio n. 22

0

Mostra file

File: tc_types.c Progetto: agsamek/nl

ImmT tc_types_priv0__const__sim(int __nr) {
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr]);
return ret;
}

Esempio n. 23

0

Mostra file

File: ptd_parser.c Progetto: mcFrax/nl

ImmT ptd_parser_priv0__const__sim(int __nr) {
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr]);
return ret;
}

Esempio n. 24

0

Mostra file

File: ptd_parser.c Progetto: mcFrax/nl

ImmT ptd_parser0fun_def_to_ptd(ImmT ___nl__0) {
c_rt_lib0arg_val(___nl__0);
ptd_parser_priv0__const__init();
ImmT ___nl__1 = NULL;
ImmT ___nl__2 = NULL;
ImmT ___nl__3 = NULL;
ImmT ___nl__4 = NULL;
#line 14
c_rt_lib0move(&___nl__1, c_rt_lib0hash_get_value_dec(___nl__0, ___get_global_const(214)));
#line 15
c_rt_lib0copy(&___nl__2, ___nl__1);
#line 15
c_rt_lib0move(&___nl__2, c_rt_lib0priv_as(___nl__2, ___get_global_const(775)));
#line 15
c_rt_lib0copy(&___nl__1, ___nl__2);
#line 15
c_rt_lib0clear(&___nl__2);
#line 16
c_rt_lib0move(&___nl__2, array0len(___nl__1));
#line 16
c_rt_lib0move(&___nl__4,___get_global_const(2));
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0num_eq(___nl__2, ___nl__4));
#line 16
c_rt_lib0clear(&___nl__4);
#line 16
c_rt_lib0move(&___nl__3, c_rt_lib0not(___nl__2));
#line 16
if(c_rt_lib0check_true_native(___nl__3)){ goto label_3;}
#line 16
c_rt_lib0move(&___nl__4,___get_global_const(1));
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0array_get(___nl__1, ___nl__4));
#line 16
c_rt_lib0clear(&___nl__4);
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0hash_get_value_dec(___nl__2, ___get_global_const(214)));
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0priv_is(___nl__2, ___get_global_const(75)));
#line 16
label_3:
#line 16
c_rt_lib0clear(&___nl__3);
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0not(___nl__2));
#line 16
if(c_rt_lib0check_true_native(___nl__2)){ goto label_2;}
#line 16
c_rt_lib0move(&___nl__3,___get_global_const(1004));
#line 16
c_rt_lib0move(&___nl__3, c_rt_lib0ov_mk_arg(___get_global_const(44), ___nl__3));
#line 16
c_rt_lib0clear(&___nl__0);
#line 16
c_rt_lib0clear(&___nl__1);
#line 16
c_rt_lib0clear(&___nl__2);
#line 16
return ___nl__3;
#line 16
c_rt_lib0clear(&___nl__3);
#line 16
goto label_2;
#line 16
label_2:
#line 16
c_rt_lib0clear(&___nl__2);
#line 17
c_rt_lib0move(&___nl__4,___get_global_const(1));
#line 17
c_rt_lib0move(&___nl__3, c_rt_lib0array_get(___nl__1, ___nl__4));
#line 17
c_rt_lib0clear(&___nl__4);
#line 17
c_rt_lib0move(&___nl__3, c_rt_lib0hash_get_value_dec(___nl__3, ___get_global_const(214)));
#line 17
c_rt_lib0move(&___nl__3, c_rt_lib0priv_as(___nl__3, ___get_global_const(75)));
#line 17
c_rt_lib0move(&___nl__2, ptd_parser0try_value_to_ptd(___nl__3));
#line 17
c_rt_lib0clear(&___nl__3);
#line 17
c_rt_lib0clear(&___nl__0);
#line 17
c_rt_lib0clear(&___nl__1);
#line 17
return ___nl__2;
#line 17
c_rt_lib0clear(&___nl__2);
#line 17
c_rt_lib0clear(&___nl__1);
#line 17
c_rt_lib0clear(&___nl__0);
#line 17
return NULL;
}

Esempio n. 25

0

Mostra file

File: string_utils.c Progetto: agsamek/nl

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;
}

Esempio n. 26

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0reverse(ImmT * ___ref___0) {
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;
#line 13
c_rt_lib0move(&___nl__1, c_rt_lib0array_mk(0));
#line 14
c_rt_lib0move(&___nl__2, array0len(*___ref___0));
#line 14
c_rt_lib0move(&___nl__3,___get_global_const(0));
#line 14
c_rt_lib0move(&___nl__4,___get_global_const(1));
#line 14
label_4:
#line 14
c_rt_lib0move(&___nl__5, c_rt_lib0ge(___nl__3, ___nl__2));
#line 14
if(c_rt_lib0check_true_native(___nl__5)){ goto label_18;}
#line 15
c_rt_lib0move(&___nl__7, array0len(*___ref___0));
#line 15
c_rt_lib0move(&___nl__7, c_rt_lib0sub_mod(___nl__7, ___nl__3));
#line 15
c_rt_lib0move(&___nl__8,___get_global_const(1));
#line 15
c_rt_lib0move(&___nl__7, c_rt_lib0sub_mod(___nl__7, ___nl__8));
#line 15
c_rt_lib0clear(&___nl__8);
#line 15
c_rt_lib0move(&___nl__6, c_rt_lib0array_get(*___ref___0, ___nl__7));
#line 15
c_rt_lib0clear(&___nl__7);
#line 15
c_rt_lib0delete(c_rt_lib0array_push(&___nl__1, ___nl__6));
#line 15
c_rt_lib0clear(&___nl__6);
#line 16
c_rt_lib0move(&___nl__3, c_rt_lib0add_mod(___nl__3, ___nl__4));
#line 16
goto label_4;
#line 16
label_18:
#line 16
c_rt_lib0clear(&___nl__2);
#line 16
c_rt_lib0clear(&___nl__3);
#line 16
c_rt_lib0clear(&___nl__4);
#line 16
c_rt_lib0clear(&___nl__5);
#line 17
c_rt_lib0copy(___ref___0, ___nl__1);
#line 17
c_rt_lib0clear(&___nl__1);
#line 17
return NULL;
}

Esempio n. 27

0

Mostra file

File: tc_types.c Progetto: agsamek/nl

ImmT tc_types_priv0__const__sing(int __nr) {
if(___const__[__nr+0]==NULL) {
switch(__nr){
case 0:
	___const__[0] = tc_types_priv0get_binary_ops0cal();
	break;
case 1:
	___const__[1] = tc_types0errors_t0cal();
	break;
case 2:
	___const__[2] = tc_types0bin_op_type0cal();
	break;
case 3:
	___const__[3] = tc_types0defs_funs_t0cal();
	break;
case 4:
	___const__[4] = tc_types0return_t0cal();
	break;
case 5:
	___const__[5] = tc_types0modules_t0cal();
	break;
case 6:
	___const__[6] = tc_types0deref_type0cal();
	break;
case 7:
	___const__[7] = tc_types0deref_types0cal();
	break;
case 8:
	___const__[8] = tc_types0env0cal();
	break;
case 9:
	___const__[9] = tc_types0var_t0cal();
	break;
case 10:
	___const__[10] = tc_types0fun_arg_t0cal();
	break;
case 11:
	___const__[11] = tc_types0def_fun_t0cal();
	break;
case 12:
	___const__[12] = tc_types0vars_t0cal();
	break;
case 13:
	___const__[13] = tc_types0check_error_t0cal();
	break;
case 14:
	___const__[14] = tc_types0check_errors_t0cal();
	break;
case 15:
	___const__[15] = tc_types0type0cal();
	break;
case 16:
	___const__[16] = tc_types0value_src0cal();
	break;
case 17:
	___const__[17] = tc_types0lval_path0cal();
	break;
case 18:
	___const__[18] = tc_types0walk_arg0cal();
	break;
case 19:
	___const__[19] = tc_types0ref_t0cal();
	break;
case 20:
	___const__[20] = tc_types0stack_info_type0cal();
	break;
case 21:
	___const__[21] = tc_types0check_info0cal();
	break;
case 22:
	___const__[22] = tc_types0special_functions0cal();
	break;
default:
	nl_die();
}}
ImmT ret = NULL;
c_rt_lib0copy(&ret, ___const__[__nr+0]);
return ret;
}

Esempio n. 28

0

Mostra file

File: array.c Progetto: agsamek/nl

ImmT array0join(ImmT ___nl__0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__0);
c_rt_lib0arg_val(___nl__1);
array_priv0__const__init();
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;
#line 12
c_rt_lib0move(&___nl__2,___get_global_const(0));
#line 13
c_rt_lib0move(&___nl__3, c_rt_lib0get_true());
#line 14
c_rt_lib0move(&___nl__5,___get_global_const(1));
#line 14
c_rt_lib0move(&___nl__6,___get_global_const(2));
#line 14
c_rt_lib0move(&___nl__7, c_rt_lib0array_len(___nl__1));
#line 14
label_3:
#line 14
c_rt_lib0move(&___nl__8, c_rt_lib0ge(___nl__5, ___nl__7));
#line 14
if(c_rt_lib0check_true_native(___nl__8)){ goto label_1;}
#line 14
c_rt_lib0move(&___nl__4, c_rt_lib0array_get(___nl__1, ___nl__5));
#line 15
c_rt_lib0copy(&___nl__9, ___nl__3);
#line 15
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 15
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 15
if(c_rt_lib0check_true_native(___nl__9)){ goto label_5;}
#line 15
c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__0));
#line 15
goto label_5;
#line 15
label_5:
#line 15
c_rt_lib0clear(&___nl__9);
#line 16
c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__4));
#line 17
c_rt_lib0move(&___nl__9, c_rt_lib0get_false());
#line 17
c_rt_lib0copy(&___nl__3, ___nl__9);
#line 17
c_rt_lib0clear(&___nl__9);
#line 18
c_rt_lib0move(&___nl__5, c_rt_lib0add_mod(___nl__5, ___nl__6));
#line 18
goto label_3;
#line 18
label_1:
#line 18
c_rt_lib0clear(&___nl__4);
#line 18
c_rt_lib0clear(&___nl__5);
#line 18
c_rt_lib0clear(&___nl__6);
#line 18
c_rt_lib0clear(&___nl__7);
#line 18
c_rt_lib0clear(&___nl__8);
#line 19
c_rt_lib0clear(&___nl__0);
#line 19
c_rt_lib0clear(&___nl__1);
#line 19
c_rt_lib0clear(&___nl__3);
#line 19
return ___nl__2;
#line 19
c_rt_lib0clear(&___nl__2);
#line 19
c_rt_lib0clear(&___nl__3);
#line 19
c_rt_lib0clear(&___nl__0);
#line 19
c_rt_lib0clear(&___nl__1);
#line 19
return NULL;
}

Esempio n. 29

0

Mostra file

File: string_utils.c Progetto: agsamek/nl

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;
}

Esempio n. 30

0

Mostra file

File: array.c Progetto: nianiolang/nl

ImmT array0join(ImmT ___nl__0,ImmT ___nl__1) {
c_rt_lib0arg_val(___nl__0);
c_rt_lib0arg_val(___nl__1);
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;
#line 21
c_rt_lib0move(&___nl__2,___get_global_const(2));
#line 22
c_rt_lib0move(&___nl__3, c_rt_lib0get_true());
#line 23
c_rt_lib0move(&___nl__5,___get_global_const(0));
#line 23
c_rt_lib0move(&___nl__6,___get_global_const(1));
#line 23
c_rt_lib0move(&___nl__7, c_rt_lib0array_len(___nl__1));
#line 23
label_5:
#line 23
c_rt_lib0move(&___nl__8, c_rt_lib0ge(___nl__5, ___nl__7));
#line 23
if(c_rt_lib0check_true_native(___nl__8)){ goto label_23;}
#line 23
c_rt_lib0move(&___nl__4, c_rt_lib0array_get(___nl__1, ___nl__5));
#line 24
c_rt_lib0copy(&___nl__9, ___nl__3);
#line 24
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 24
c_rt_lib0move(&___nl__9, c_rt_lib0not(___nl__9));
#line 24
if(c_rt_lib0check_true_native(___nl__9)){ goto label_15;}
#line 24
c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__0));
#line 24
goto label_15;
#line 24
label_15:
#line 24
c_rt_lib0clear(&___nl__9);
#line 25
c_rt_lib0move(&___nl__2, c_rt_lib0concat_add(___nl__2, ___nl__4));
#line 26
c_rt_lib0move(&___nl__9, c_rt_lib0get_false());
#line 26
c_rt_lib0copy(&___nl__3, ___nl__9);
#line 26
c_rt_lib0clear(&___nl__9);
#line 27
c_rt_lib0move(&___nl__5, c_rt_lib0add_mod(___nl__5, ___nl__6));
#line 27
goto label_5;
#line 27
label_23:
#line 27
c_rt_lib0clear(&___nl__4);
#line 27
c_rt_lib0clear(&___nl__5);
#line 27
c_rt_lib0clear(&___nl__6);
#line 27
c_rt_lib0clear(&___nl__7);
#line 27
c_rt_lib0clear(&___nl__8);
#line 28
c_rt_lib0clear(&___nl__0);
#line 28
c_rt_lib0clear(&___nl__1);
#line 28
c_rt_lib0clear(&___nl__3);
#line 28
return ___nl__2;
#line 28
c_rt_lib0clear(&___nl__2);
#line 28
c_rt_lib0clear(&___nl__3);
#line 28
c_rt_lib0clear(&___nl__0);
#line 28
c_rt_lib0clear(&___nl__1);
#line 28
return NULL;
}