Beispiel #1
0
N_NIMCALL(NimStringDesc*, renderplainsymbolname_0mm4u02iK86TVZPOApjzQA)(Tnode_bROa11lyF5vxEN9aYNbHmhw* n0) {
	NimStringDesc* result0;
	result0 = (NimStringDesc*)0;
	result0 = copyString(((NimStringDesc*) &T_SgHDIVcSir4dkKoe0Xsi0A_2));
	switch ((*n0).kind) {
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 31):
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 53):
	{
		NI LOC2;
		Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC3;
		LOC2 = (NI)0;
		LOC2 = len_CdME9baJhvveuPEDZE9bXoxAlambdalifting(n0);
		LOC3 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
		LOC3 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, (LOC2 - 1));
		result0 = renderplainsymbolname_0mm4u02iK86TVZPOApjzQA(LOC3);
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 2):
	{
		result0 = copyString((*(*n0).kindU.S5.ident).s);
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 3):
	{
		result0 = renderdefinitionname_htfLIUnR3bbLycMPnQGh9aA((*n0).kindU.S4.sym, NIM_TRUE);
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 43):
	{
		Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC7;
		LOC7 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
		LOC7 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, ((NI) 0));
		result0 = renderplainsymbolname_0mm4u02iK86TVZPOApjzQA(LOC7);
	}
	break;
	default:
	{
		NimStringDesc* LOC9;
		LOC9 = (NimStringDesc*)0;
		LOC9 = rawNewString(reprEnum((NI)(*n0).kind, (&NTI_G4E4Gxe7oI2Cm03rkiOzQw))->Sup.len + 29);
appendString(LOC9, ((NimStringDesc*) &T_SgHDIVcSir4dkKoe0Xsi0A_3));
appendString(LOC9, reprEnum((NI)(*n0).kind, (&NTI_G4E4Gxe7oI2Cm03rkiOzQw)));
		internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*n0).info, LOC9);
	}
	break;
	}
	return result0;
}
Beispiel #2
0
N_NIMCALL(Tnode_bROa11lyF5vxEN9aYNbHmhw*, semnodekindconstraints_oHADKQ703A40xFUb2Or4EQ)(Tnode_bROa11lyF5vxEN9aYNbHmhw* p0) {
	Tnode_bROa11lyF5vxEN9aYNbHmhw* result0;
	result0 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
	result0 = newnodei_PIqgSH9b0m7nFpOyXf9cpz5w(((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 20), (*p0).info);
	asgnRefNoCycle((void**) (&(*result0).kindU.S3.strval), rawNewString(((NI) 10)));
	(*result0).kindU.S3.strval = addChar((*result0).kindU.S3.strval, 1);
	{
		NI LOC3;
		LOC3 = (NI)0;
		LOC3 = len_CdME9baJhvveuPEDZE9bXoxAlambdalifting(p0);
		if (!(((NI) 2) <= LOC3)) goto LA4;
		{
			NI i_dXblwP9c0fT57IJBT9cidd0w;
			NI HEX3Atmp_iqP0XjvVfdwlykC4jWWcWQ;
			NI LOC7;
			NI res_tvTr9cfrvhfw6gavuvsPeCg;
			i_dXblwP9c0fT57IJBT9cidd0w = (NI)0;
			HEX3Atmp_iqP0XjvVfdwlykC4jWWcWQ = (NI)0;
			LOC7 = (NI)0;
			LOC7 = len_CdME9baJhvveuPEDZE9bXoxAlambdalifting(p0);
			HEX3Atmp_iqP0XjvVfdwlykC4jWWcWQ = (LOC7 - 1);
			res_tvTr9cfrvhfw6gavuvsPeCg = ((NI) 1);
			{
				while (1) {
					if (!(res_tvTr9cfrvhfw6gavuvsPeCg <= HEX3Atmp_iqP0XjvVfdwlykC4jWWcWQ)) goto LA9;
					i_dXblwP9c0fT57IJBT9cidd0w = res_tvTr9cfrvhfw6gavuvsPeCg;
					compileconstraints_9bwUcgT2L3sSIVcH2QkZg2A((*p0).kindU.S6.sons->data[i_dXblwP9c0fT57IJBT9cidd0w], (&(*result0).kindU.S3.strval));
					res_tvTr9cfrvhfw6gavuvsPeCg += ((NI) 1);
				} LA9: ;
			}
		}
		{
			if (!(((NI) 63) < ((*result0).kindU.S3.strval ? (*result0).kindU.S3.strval->Sup.len : 0))) goto LA12;
			internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*p0).info, ((NimStringDesc*) &T_kdeXVhLeMhTeIyOxnAjnxA_19));
		}
		LA12: ;
	}
	goto LA1;
	LA4: ;
	{
		patternerror_WCa9bfuEYPAnEySVcJ29aYHw(p0);
	}
	LA1: ;
	add_9b9cetGbqmZ2rntk8RrPpv0gparampatterns((&(*result0).kindU.S3.strval), ((Topcode_cKhgukabZvDBOVLlPOrptA) 1));
	return result0;
}
Beispiel #3
0
N_NIMCALL(void, renderparamtypes_nsr8uxcmlhx5QS6xeTtlLA)(TY_sM4lkSb7zS6F7OVMvW9cffQ** found0, Tnode_bROa11lyF5vxEN9aYNbHmhw* n0) {
{	switch ((*n0).kind) {
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 76):
	{
		{
			NI i_0rMGonPChOwGyGaqScGiOg;
			NI HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ;
			NI LOC3;
			NI res_cPxH9ccENVRiMXrscMrDyAw;
			i_0rMGonPChOwGyGaqScGiOg = (NI)0;
			HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ = (NI)0;
			LOC3 = (NI)0;
			LOC3 = len_CdME9baJhvveuPEDZE9bXoxAlambdalifting(n0);
			HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ = (LOC3 - 1);
			res_cPxH9ccENVRiMXrscMrDyAw = ((NI) 1);
			{
				while (1) {
					Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC6;
					if (!(res_cPxH9ccENVRiMXrscMrDyAw <= HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ)) goto LA5;
					i_0rMGonPChOwGyGaqScGiOg = res_cPxH9ccENVRiMXrscMrDyAw;
					LOC6 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
					LOC6 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, i_0rMGonPChOwGyGaqScGiOg);
					renderparamtypes_nsr8uxcmlhx5QS6xeTtlLA(found0, LOC6);
					res_cPxH9ccENVRiMXrscMrDyAw += ((NI) 1);
				} LA5: ;
			}
		}
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 35):
	{
		NI typepos0;
		NI LOC8;
		NimStringDesc* typestr0;
		Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC9;
		LOC8 = (NI)0;
		LOC8 = len_CdME9baJhvveuPEDZE9bXoxAlambdalifting(n0);
		typepos0 = (NI)(LOC8 - ((NI) 2));
		LOC9 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
		LOC9 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, typepos0);
		typestr0 = rendertype_0mm4u02iK86TVZPOApjzQA_2(LOC9);
		{
			NIM_BOOL LOC12;
			Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC14;
			Ttype_LTUWCZolpovw9cWE3JBWSUw* typ0;
			Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC17;
			LOC12 = (NIM_BOOL)0;
			LOC12 = ((typestr0 ? typestr0->Sup.len : 0) < ((NI) 1));
			if (!(LOC12)) goto LA13;
			LOC14 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
			LOC14 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, (NI)(typepos0 + ((NI) 1)));
			LOC12 = !(((*LOC14).kind == ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 1)));
			LA13: ;
			if (!LOC12) goto LA15;
			LOC17 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
			LOC17 = HEX5BHEX5D_4mGh5VHoHoaSkXDYdG6pyAitersgen(n0, (NI)(typepos0 + ((NI) 1)));
			typ0 = (*LOC17).typ;
			{
				if (!!((typ0 == 0))) goto LA20;
				typestr0 = typetostring_iUZlBdvGqNPVN17wd9aVBNw(typ0, ((Tprefereddesc_tnd4qt9c4xddV8oKV5zyusw) 2));
			}
			LA20: ;
			{
				if (!((typestr0 ? typestr0->Sup.len : 0) < ((NI) 1))) goto LA24;
				goto BeforeRet;
			}
			LA24: ;
		}
		LA15: ;
		{
			NI i_0rMGonPChOwGyGaqScGiOg_2;
			NI HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ_2;
			NI res_cPxH9ccENVRiMXrscMrDyAw_2;
			i_0rMGonPChOwGyGaqScGiOg_2 = (NI)0;
			HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ_2 = (NI)0;
			HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ_2 = (typepos0 - 1);
			res_cPxH9ccENVRiMXrscMrDyAw_2 = ((NI) 0);
			{
				while (1) {
					NimStringDesc* LOC29;
					if (!(res_cPxH9ccENVRiMXrscMrDyAw_2 <= HEX3Atmp_8b0gUyUsj3vT9aTxmyLN5TQ_2)) goto LA28;
					i_0rMGonPChOwGyGaqScGiOg_2 = res_cPxH9ccENVRiMXrscMrDyAw_2;
					(*found0) = (TY_sM4lkSb7zS6F7OVMvW9cffQ*) incrSeqV2(&((*found0))->Sup, sizeof(NimStringDesc*));
					LOC29 = (NimStringDesc*)0;
					LOC29 = (*found0)->data[(*found0)->Sup.len]; (*found0)->data[(*found0)->Sup.len] = copyStringRC1(typestr0);
					if (LOC29) nimGCunrefNoCycle(LOC29);
					++(*found0)->Sup.len;
					res_cPxH9ccENVRiMXrscMrDyAw_2 += ((NI) 1);
				} LA28: ;
			}
		}
	}
	break;
	default:
	{
		NimStringDesc* LOC31;
		LOC31 = (NimStringDesc*)0;
		LOC31 = rawNewString(reprEnum((NI)(*n0).kind, (&NTI_G4E4Gxe7oI2Cm03rkiOzQw))->Sup.len + 31);
appendString(LOC31, ((NimStringDesc*) &T_SgHDIVcSir4dkKoe0Xsi0A_11));
appendString(LOC31, reprEnum((NI)(*n0).kind, (&NTI_G4E4Gxe7oI2Cm03rkiOzQw)));
		internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*n0).info, LOC31);
	}
	break;
	}
	}BeforeRet: ;
}
Beispiel #4
0
N_NIMCALL(Tsym_AXG7xcvKqaxY6koRX1xkCw*, ithfield_dVbj6zm1IqxrJtEDcHXhiQ)(Tnode_bROa11lyF5vxEN9aYNbHmhw* n0, NI* field0) {
	Tsym_AXG7xcvKqaxY6koRX1xkCw* result0;
{	result0 = (Tsym_AXG7xcvKqaxY6koRX1xkCw*)0;
	result0 = NIM_NIL;
	switch ((*n0).kind) {
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 138):
	{
		{
			NI i_5M1Q39a38XnDTLT39bx5Of2g;
			NI HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w;
			NI LOC3;
			NI res_wmHNF0yxZFOhJROjDAEFrQ;
			i_5M1Q39a38XnDTLT39bx5Of2g = (NI)0;
			HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w = (NI)0;
			LOC3 = (NI)0;
			LOC3 = sonslen_qPWPHw7WgJeEVYUdcaRIig(n0);
			HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w = (NI)(LOC3 - ((NI) 1));
			res_wmHNF0yxZFOhJROjDAEFrQ = ((NI) 0);
			{
				while (1) {
					if (!(res_wmHNF0yxZFOhJROjDAEFrQ <= HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w)) goto LA5;
					i_5M1Q39a38XnDTLT39bx5Of2g = res_wmHNF0yxZFOhJROjDAEFrQ;
					result0 = ithfield_dVbj6zm1IqxrJtEDcHXhiQ((*n0).kindU.S6.sons->data[i_5M1Q39a38XnDTLT39bx5Of2g], field0);
					{
						if (!!((result0 == NIM_NIL))) goto LA8;
						goto BeforeRet;
					}
					LA8: ;
					res_wmHNF0yxZFOhJROjDAEFrQ += ((NI) 1);
				} LA5: ;
			}
		}
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 139):
	{
		{
			if (!!(((*(*n0).kindU.S6.sons->data[((NI) 0)]).kind == ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 3)))) goto LA13;
			internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*n0).info, ((NimStringDesc*) &T_gkmEeaIyT0wHpJzs9ciIEJg_2));
		}
		LA13: ;
		result0 = ithfield_dVbj6zm1IqxrJtEDcHXhiQ((*n0).kindU.S6.sons->data[((NI) 0)], field0);
		{
			if (!!((result0 == NIM_NIL))) goto LA17;
			goto BeforeRet;
		}
		LA17: ;
		{
			NI i_5M1Q39a38XnDTLT39bx5Of2g_2;
			NI HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w_2;
			NI LOC20;
			NI res_wmHNF0yxZFOhJROjDAEFrQ_2;
			i_5M1Q39a38XnDTLT39bx5Of2g_2 = (NI)0;
			HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w_2 = (NI)0;
			LOC20 = (NI)0;
			LOC20 = sonslen_qPWPHw7WgJeEVYUdcaRIig(n0);
			HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w_2 = (NI)(LOC20 - ((NI) 1));
			res_wmHNF0yxZFOhJROjDAEFrQ_2 = ((NI) 1);
			{
				while (1) {
					if (!(res_wmHNF0yxZFOhJROjDAEFrQ_2 <= HEX3Atmp_Pdi9b8enJ39a4BPR69buMUH8w_2)) goto LA22;
					i_5M1Q39a38XnDTLT39bx5Of2g_2 = res_wmHNF0yxZFOhJROjDAEFrQ_2;
					switch ((*(*n0).kindU.S6.sons->data[i_5M1Q39a38XnDTLT39bx5Of2g_2]).kind) {
					case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 85):
					case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 88):
					{
						Tnode_bROa11lyF5vxEN9aYNbHmhw* LOC24;
						LOC24 = (Tnode_bROa11lyF5vxEN9aYNbHmhw*)0;
						LOC24 = lastson_esDJA7239bJDiq4UrX9aHCjg((*n0).kindU.S6.sons->data[i_5M1Q39a38XnDTLT39bx5Of2g_2]);
						result0 = ithfield_dVbj6zm1IqxrJtEDcHXhiQ(LOC24, field0);
						{
							if (!!((result0 == NIM_NIL))) goto LA27;
							goto BeforeRet;
						}
						LA27: ;
					}
					break;
					default:
					{
						internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*n0).info, ((NimStringDesc*) &T_gkmEeaIyT0wHpJzs9ciIEJg_3));
					}
					break;
					}
					res_wmHNF0yxZFOhJROjDAEFrQ_2 += ((NI) 1);
				} LA22: ;
			}
		}
	}
	break;
	case ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 3):
	{
		{
			if (!((*field0) == ((NI) 0))) goto LA33;
			result0 = (*n0).kindU.S4.sym;
		}
		goto LA31;
		LA33: ;
		{
			(*field0) -= ((NI) 1);
		}
		LA31: ;
	}
	break;
	default:
	{
	}
	break;
	}
	}BeforeRet: ;
	return result0;
}
Beispiel #5
0
N_NIMCALL(NIM_BOOL, inset_b4nxsJCvqXRlyalSWskgNA)(Tnode_bROa11lyF5vxEN9aYNbHmhw* s0, Tnode_bROa11lyF5vxEN9aYNbHmhw* elem0) {
	NIM_BOOL result0;
{	result0 = (NIM_BOOL)0;
	{
		if (!!(((*s0).kind == ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 39)))) goto LA3;
		internalerror_MXmtqrCmYwtOPkDCFgUWKQ((*s0).info, ((NimStringDesc*) &T_RCpa9aHGGIKsR9cKRKvszwow_2));
		result0 = NIM_FALSE;
		goto BeforeRet;
	}
	LA3: ;
	{
		NI i_gjmi9a3etTejC7wy08kXMyA;
		NI HEX3Atmp_K0yYuybb2qf8A4rUaUfrQg;
		NI LOC6;
		NI res_R62rbGcY3852wb5Sd9apOsw;
		i_gjmi9a3etTejC7wy08kXMyA = (NI)0;
		HEX3Atmp_K0yYuybb2qf8A4rUaUfrQg = (NI)0;
		LOC6 = (NI)0;
		LOC6 = sonslen_qPWPHw7WgJeEVYUdcaRIig(s0);
		HEX3Atmp_K0yYuybb2qf8A4rUaUfrQg = (NI)(LOC6 - ((NI) 1));
		res_R62rbGcY3852wb5Sd9apOsw = ((NI) 0);
		{
			while (1) {
				if (!(res_R62rbGcY3852wb5Sd9apOsw <= HEX3Atmp_K0yYuybb2qf8A4rUaUfrQg)) goto LA8;
				i_gjmi9a3etTejC7wy08kXMyA = res_R62rbGcY3852wb5Sd9apOsw;
				{
					if (!((*(*s0).kindU.S6.sons->data[i_gjmi9a3etTejC7wy08kXMyA]).kind == ((Tnodekind_G4E4Gxe7oI2Cm03rkiOzQw) 44))) goto LA11;
					{
						NIM_BOOL LOC15;
						LOC15 = (NIM_BOOL)0;
						LOC15 = levalue_1Qdwg1ZguEjbL3mmgPJD3w_2((*(*s0).kindU.S6.sons->data[i_gjmi9a3etTejC7wy08kXMyA]).kindU.S6.sons->data[((NI) 0)], elem0);
						if (!(LOC15)) goto LA16;
						LOC15 = levalue_1Qdwg1ZguEjbL3mmgPJD3w_2(elem0, (*(*s0).kindU.S6.sons->data[i_gjmi9a3etTejC7wy08kXMyA]).kindU.S6.sons->data[((NI) 1)]);
						LA16: ;
						if (!LOC15) goto LA17;
						result0 = NIM_TRUE;
						goto BeforeRet;
					}
					LA17: ;
				}
				goto LA9;
				LA11: ;
				{
					{
						NIM_BOOL LOC22;
						LOC22 = (NIM_BOOL)0;
						LOC22 = samevalue_1Qdwg1ZguEjbL3mmgPJD3w((*s0).kindU.S6.sons->data[i_gjmi9a3etTejC7wy08kXMyA], elem0);
						if (!LOC22) goto LA23;
						result0 = NIM_TRUE;
						goto BeforeRet;
					}
					LA23: ;
				}
				LA9: ;
				res_R62rbGcY3852wb5Sd9apOsw += ((NI) 1);
			} LA8: ;
		}
	}
	result0 = NIM_FALSE;
	}BeforeRet: ;
	return result0;
}