コード例 #1
0
ファイル: compiler_passes.c プロジェクト: Varriount/csources
N_NIMCALL(void, processmodule_224049)(tsym173689* module, tllstream163204* stream, trodreader213023* rd) {
	tparsers199026 p;
	tpasscontextarray224155 a;
	tllstream163204* s;
	NI32 fileidx;
	nimfr("processModule", "passes.nim")
	memset((void*)&p, 0, sizeof(p));
	objectInit(&p, (&NTI199026));
	memset((void*)a, 0, sizeof(a));
	s = 0;
	nimln(167, "passes.nim");
	fileidx = ((NI32) ((*module).Position));
	nimln(168, "passes.nim");
	{
		nimln(168, "passes.nim");
		if (!(rd == NIM_NIL)) goto LA3;
		nimln(169, "passes.nim");
		openpasses_224243(a, module);		nimln(170, "passes.nim");
		{
			NimStringDesc* filename;
			nimln(170, "passes.nim");
			if (!(stream == NIM_NIL)) goto LA7;
			nimln(171, "passes.nim");
			filename = tofullpath_138708(fileidx);
			nimln(172, "passes.nim");
			s = llstreamopen_163227(filename, ((NU8) 0));
			nimln(173, "passes.nim");
			{
				nimln(173, "passes.nim");
				if (!(s == NIM_NIL)) goto LA11;
				nimln(174, "passes.nim");
				rawmessage_139191(((NU16) 3), filename);				nimln(175, "passes.nim");
				goto BeforeRet;
			}			LA11: ;
		}		goto LA5;
		LA7: ;
		{
			nimln(177, "passes.nim");
			s = stream;
		}		LA5: ;
		nimln(178, "passes.nim");
		while (1) {
			nimln(179, "passes.nim");
			openparsers_199034(&p, fileidx, s);			nimln(181, "passes.nim");
			{
				nimln(731, "system.nim");
				nimln(731, "system.nim");
				if (!!((((*module).Flags &(1<<((((NU8) 13))&31)))!=0))) goto LA17;
				nimln(186, "passes.nim");
				processimplicits_224443(implicitimports_115242, ((NU8) 115), a);				nimln(187, "passes.nim");
				processimplicits_224443(implicitincludes_115261, ((NU8) 120), a);			}			LA17: ;
			nimln(189, "passes.nim");
			while (1) {
				tnode173659* n;
				nimln(190, "passes.nim");
				n = parsetoplevelstmt_199051(&p);
				nimln(191, "passes.nim");
				{
					nimln(191, "passes.nim");
					if (!((*n).Kind == ((NU8) 1))) goto LA22;
					nimln(191, "passes.nim");
					goto LA19;
				}				LA22: ;
				nimln(192, "passes.nim");
				{
					NIM_BOOL LOC26;
					nimln(192, "passes.nim");
					nimln(192, "passes.nim");
					LOC26 = 0;
					LOC26 = processtoplevelstmt_224341(n, a);
					if (!!(LOC26)) goto LA27;
					nimln(192, "passes.nim");
					goto LA19;
				}				LA27: ;
			} LA19: ;
			nimln(194, "passes.nim");
			closeparsers_199041(&p);			nimln(195, "passes.nim");
			{
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				if (!!(((*s).Kind == ((NU8) 3)))) goto LA31;
				nimln(195, "passes.nim");
				goto LA14;
			}			LA31: ;
		} LA14: ;
		nimln(196, "passes.nim");
		closepasses_224312(a);		nimln(198, "passes.nim");
		idsynchronizationpoint_172440(1000);	}	goto LA1;
	LA3: ;
	{
		tnode173659* n;
		NI i_224560;
		NI HEX3Atmp_224578;
		NI LOC34;
		NI TMP3129;
		NI res_224580;
		nimln(200, "passes.nim");
		openpassescached_224271(a, module, rd);		nimln(201, "passes.nim");
		n = loadinitsection_213065(rd);
		i_224560 = 0;
		HEX3Atmp_224578 = 0;
		nimln(202, "passes.nim");
		nimln(202, "passes.nim");
		nimln(202, "passes.nim");
		LOC34 = 0;
		LOC34 = sonslen_174022(n);
		TMP3129 = subInt(LOC34, 1);
		HEX3Atmp_224578 = (NI32)(TMP3129);
		nimln(1301, "system.nim");
		res_224580 = 0;
		nimln(1302, "system.nim");
		while (1) {
			nimln(1302, "system.nim");
			if (!(res_224580 <= HEX3Atmp_224578)) goto LA35;
			nimln(1301, "system.nim");
			i_224560 = res_224580;
			nimln(202, "passes.nim");
			if (((TMP3121[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3122));
			if ((NU)(i_224560) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			processtoplevelstmtcached_224379((*n).kindU.S6.Sons->data[i_224560], a);			nimln(1304, "system.nim");
			res_224580 = addInt(res_224580, 1);
		} LA35: ;
		nimln(203, "passes.nim");
		closepassescached_224408(a);	}	LA1: ;
	BeforeRet: ;	popFrame();
}N_NOINLINE(void, compilerpassesInit)(void) {
コード例 #2
0
N_NIMCALL(tsym191843*, ithfield_420007)(tnode191813* n, NI field) {
	tsym191843* result;
	nimfr("ithField", "semmacrosanity.nim")
	result = 0;
	nimln(16, "semmacrosanity.nim");
	result = NIM_NIL;
	nimln(17, "semmacrosanity.nim");
	switch ((*n).Kind) {
	case ((NU8) 136):
	{
		NI i_420024;
		NI HEX3Atmp_420182;
		NI LOC2;
		NI TMP5679;
		NI res_420184;
		i_420024 = 0;
		HEX3Atmp_420182 = 0;
		nimln(19, "semmacrosanity.nim");
		nimln(19, "semmacrosanity.nim");
		nimln(19, "semmacrosanity.nim");
		LOC2 = 0;
		LOC2 = sonslen_192191(n);
		TMP5679 = subInt(LOC2, 1);
		HEX3Atmp_420182 = (NI64)(TMP5679);
		nimln(1451, "system.nim");
		res_420184 = 0;
		nimln(1452, "system.nim");
		while (1) {
			NI TMP5680;
			nimln(1452, "system.nim");
			if (!(res_420184 <= HEX3Atmp_420182)) goto LA3;
			nimln(1451, "system.nim");
			i_420024 = res_420184;
			nimln(20, "semmacrosanity.nim");
			if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
			if ((NU)(i_420024) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			nimln(20, "semmacrosanity.nim");
			TMP5680 = subInt(field, i_420024);
			result = ithfield_420007((*n).kindU.S6.Sons->data[i_420024], (NI64)(TMP5680));
			nimln(21, "semmacrosanity.nim");
			{
				nimln(21, "semmacrosanity.nim");
				nimln(21, "semmacrosanity.nim");
				if (!!((result == NIM_NIL))) goto LA6;
				nimln(21, "semmacrosanity.nim");
				goto BeforeRet;
			}
			LA6: ;
			nimln(1454, "system.nim");
			res_420184 = addInt(res_420184, 1);
		} LA3: ;
	}
	break;
	case ((NU8) 137):
	{
		NI TMP5682;
		NI i_420122;
		NI HEX3Atmp_420186;
		NI LOC17;
		NI TMP5683;
		NI res_420188;
		nimln(23, "semmacrosanity.nim");
		{
			nimln(23, "semmacrosanity.nim");
			nimln(23, "semmacrosanity.nim");
			if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*n).kindU.S6.Sons->data[0]).Kind == ((NU8) 3)))) goto LA11;
			nimln(23, "semmacrosanity.nim");
			internalerror_168591((*n).Info, ((NimStringDesc*) &TMP5681));
		}
		LA11: ;
		nimln(24, "semmacrosanity.nim");
		if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		nimln(24, "semmacrosanity.nim");
		TMP5682 = subInt(field, 1);
		result = ithfield_420007((*n).kindU.S6.Sons->data[0], (NI64)(TMP5682));
		nimln(25, "semmacrosanity.nim");
		{
			nimln(25, "semmacrosanity.nim");
			nimln(25, "semmacrosanity.nim");
			if (!!((result == NIM_NIL))) goto LA15;
			nimln(25, "semmacrosanity.nim");
			goto BeforeRet;
		}
		LA15: ;
		i_420122 = 0;
		HEX3Atmp_420186 = 0;
		nimln(26, "semmacrosanity.nim");
		nimln(26, "semmacrosanity.nim");
		nimln(26, "semmacrosanity.nim");
		LOC17 = 0;
		LOC17 = sonslen_192191(n);
		TMP5683 = subInt(LOC17, 1);
		HEX3Atmp_420186 = (NI64)(TMP5683);
		nimln(1451, "system.nim");
		res_420188 = 1;
		nimln(1452, "system.nim");
		while (1) {
			nimln(1452, "system.nim");
			if (!(res_420188 <= HEX3Atmp_420186)) goto LA18;
			nimln(1451, "system.nim");
			i_420122 = res_420188;
			nimln(27, "semmacrosanity.nim");
			if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
			if ((NU)(i_420122) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			switch ((*(*n).kindU.S6.Sons->data[i_420122]).Kind) {
			case ((NU8) 85):
			case ((NU8) 88):
			{
				tnode191813* LOC20;
				NI TMP5685;
				nimln(29, "semmacrosanity.nim");
				nimln(29, "semmacrosanity.nim");
				if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
				if ((NU)(i_420122) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC20 = 0;
				LOC20 = lastson_192199((*n).kindU.S6.Sons->data[i_420122]);
				nimln(29, "semmacrosanity.nim");
				TMP5685 = subInt(field, 1);
				result = ithfield_420007(LOC20, (NI64)(TMP5685));
				nimln(30, "semmacrosanity.nim");
				{
					nimln(30, "semmacrosanity.nim");
					nimln(30, "semmacrosanity.nim");
					if (!!((result == NIM_NIL))) goto LA23;
					nimln(30, "semmacrosanity.nim");
					goto BeforeRet;
				}
				LA23: ;
			}
			break;
			default:
			{
				nimln(31, "semmacrosanity.nim");
				internalerror_168591((*n).Info, ((NimStringDesc*) &TMP5686));
			}
			break;
			}
			nimln(1454, "system.nim");
			res_420188 = addInt(res_420188, 1);
		} LA18: ;
	}
	break;
	case ((NU8) 3):
	{
		nimln(33, "semmacrosanity.nim");
		{
			nimln(33, "semmacrosanity.nim");
			if (!(field == 0)) goto LA29;
			nimln(33, "semmacrosanity.nim");
			if (!(((TMP5687[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5688));
			result = (*n).kindU.S4.Sym;
		}
		LA29: ;
	}
	break;
	default:
	{
	}
	break;
	}
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #3
0
ファイル: compiler_passaux.c プロジェクト: rbehrends/csources
N_NIMCALL(tnode171659*, cleanup_413046)(tpasscontext222003* c, tnode171659* n) {
	tnode171659* result;
	nimfr("cleanUp", "passaux.nim")
	result = 0;
	nimln(32, "passaux.nim");
	result = n;
	nimln(34, "passaux.nim");
	{
		NIM_BOOL LOC3;
		nimln(34, "passaux.nim");
		LOC3 = 0;
		nimln(730, "system.nim");
		LOC3 = ((gglobaloptions_114109 &(1<<((((NU8) 2))&31)))!=0);
		if (LOC3) goto LA4;
		nimln(34, "passaux.nim");
		LOC3 = (n == NIM_NIL);
		LA4: ;
		if (!LOC3) goto LA5;
		nimln(34, "passaux.nim");
		goto BeforeRet;
	}	LA5: ;
	nimln(35, "passaux.nim");
	switch ((*n).Kind) {
	case ((NU8) 114):
	{
		NI i_413082;
		NI HEX3Atmp_413157;
		NI LOC8;
		NI TMP7000;
		NI res_413159;
		i_413082 = 0;
		HEX3Atmp_413157 = 0;
		nimln(37, "passaux.nim");
		nimln(37, "passaux.nim");
		nimln(37, "passaux.nim");
		LOC8 = 0;
		LOC8 = sonslen_172022(n);
		TMP7000 = subInt(LOC8, 1);
		HEX3Atmp_413157 = (NI64)(TMP7000);
		nimln(1301, "system.nim");
		res_413159 = 0;
		nimln(1302, "system.nim");
		while (1) {
			tnode171659* LOC10;
			nimln(1302, "system.nim");
			if (!(res_413159 <= HEX3Atmp_413157)) goto LA9;
			nimln(1301, "system.nim");
			i_413082 = res_413159;
			nimln(37, "passaux.nim");
			nimln(37, "passaux.nim");
			if (((TMP6998[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP6999));
			if ((NU)(i_413082) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC10 = 0;
			LOC10 = cleanup_413046(c, (*n).kindU.S6.Sons->data[i_413082]);
			nimln(1304, "system.nim");
			res_413159 = addInt(res_413159, 1);
		} LA9: ;
	}	break;
	case ((NU8) 79):
	case ((NU8) 80):
	{
		nimln(39, "passaux.nim");
		{
			tsym171689* s;
			nimln(39, "passaux.nim");
			if (((TMP6998[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP6999));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*n).kindU.S6.Sons->data[0]).Kind == ((NU8) 3))) goto LA14;
			nimln(40, "passaux.nim");
			if (((TMP6998[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP6999));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!(((TMP7001[(*(*n).kindU.S6.Sons->data[0]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[0]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP7002));
			s = (*(*n).kindU.S6.Sons->data[0]).kindU.S4.Sym;
			nimln(41, "passaux.nim");
			{
				NIM_BOOL LOC18;
				tsym171689* LOC19;
				NIM_BOOL LOC21;
				nimln(41, "passaux.nim");
				LOC18 = 0;
				nimln(731, "system.nim");
				nimln(731, "system.nim");
				nimln(41, "passaux.nim");
				LOC19 = 0;
				LOC19 = getmodule_178187(s);
				LOC18 = !((((*LOC19).Flags &(1<<((((NU8) 25))&31)))!=0));
				if (!(LOC18)) goto LA20;
				nimln(41, "passaux.nim");
				nimln(41, "passaux.nim");
				LOC21 = 0;
				LOC21 = astneeded_222081(s);
				LOC18 = !(LOC21);
				LA20: ;
				if (!LOC18) goto LA22;
				nimln(42, "passaux.nim");
				if (((TMP6998[(*(*s).Ast).Kind/8] &(1<<((*(*s).Ast).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP6999));
				if ((NU)(6) >= (NU)((*(*s).Ast).kindU.S6.Sons->Sup.len)) raiseIndexError();
				asgnRefNoCycle((void**) &(*(*s).Ast).kindU.S6.Sons->data[6], emptynode_172505);
			}			LA22: ;
		}		LA14: ;
	}	break;
	default:
	{
	}	break;
	}
	BeforeRet: ;	popFrame();
	return result;
}N_NOINLINE(void, compilerpassauxInit)(void) {
コード例 #4
0
ファイル: nimsets.c プロジェクト: reactormonk/csources
N_NIMCALL(NIM_BOOL, someinset_243018)(tnode186813* s, tnode186813* a, tnode186813* b) {
	NIM_BOOL result;
	NI i_243368;
	NI HEX3Atmp_243532;
	NI LOC5;
	NI TMP3154;
	NI res_243534;
	nimfr("someInSet", "nimsets.nim")
	result = 0;
	nimln(63, "nimsets.nim");
	{
		nimln(63, "nimsets.nim");
		nimln(63, "nimsets.nim");
		if (!!(((*s).Kind == ((NU8) 39)))) goto LA3;
		nimln(64, "nimsets.nim");
		internalerror_164591((*s).Info, ((NimStringDesc*) &TMP3153));
		nimln(65, "nimsets.nim");
		nimln(65, "nimsets.nim");
		result = NIM_FALSE;
		goto BeforeRet;
	}
	LA3: ;
	i_243368 = 0;
	HEX3Atmp_243532 = 0;
	nimln(66, "nimsets.nim");
	nimln(66, "nimsets.nim");
	nimln(66, "nimsets.nim");
	LOC5 = 0;
	LOC5 = sonslen_187191(s);
	TMP3154 = subInt(LOC5, 1);
	HEX3Atmp_243532 = (NI64)(TMP3154);
	nimln(1450, "system.nim");
	res_243534 = 0;
	nimln(1451, "system.nim");
	while (1) {
		nimln(1451, "system.nim");
		if (!(res_243534 <= HEX3Atmp_243532)) goto LA6;
		nimln(1450, "system.nim");
		i_243368 = res_243534;
		nimln(67, "nimsets.nim");
		{
			nimln(67, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*s).kindU.S6.Sons->data[i_243368]).Kind == ((NU8) 44))) goto LA9;
			nimln(68, "nimsets.nim");
			{
				NIM_BOOL LOC13;
				NIM_BOOL LOC14;
				NIM_BOOL LOC17;
				nimln(68, "nimsets.nim");
				LOC13 = 0;
				nimln(68, "nimsets.nim");
				LOC14 = 0;
				nimln(68, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243368]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243368]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(0) >= (NU)((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC14 = levalue_195404((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->data[0], b);
				if (!(LOC14)) goto LA15;
				nimln(68, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243368]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243368]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(1) >= (NU)((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC14 = levalue_195404(b, (*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->data[1]);
				LA15: ;
				LOC13 = LOC14;
				if (LOC13) goto LA16;
				nimln(69, "nimsets.nim");
				LOC17 = 0;
				nimln(69, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243368]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243368]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(0) >= (NU)((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC17 = levalue_195404((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->data[0], a);
				if (!(LOC17)) goto LA18;
				nimln(69, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243368]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243368]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(1) >= (NU)((*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC17 = levalue_195404(a, (*(*s).kindU.S6.Sons->data[i_243368]).kindU.S6.Sons->data[1]);
				LA18: ;
				LOC13 = LOC17;
				LA16: ;
				if (!LOC13) goto LA19;
				nimln(70, "nimsets.nim");
				nimln(70, "nimsets.nim");
				result = NIM_TRUE;
				goto BeforeRet;
			}
			LA19: ;
		}
		goto LA7;
		LA9: ;
		{
			nimln(73, "nimsets.nim");
			{
				NIM_BOOL LOC24;
				nimln(73, "nimsets.nim");
				LOC24 = 0;
				nimln(73, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC24 = levalue_195404(a, (*s).kindU.S6.Sons->data[i_243368]);
				if (!(LOC24)) goto LA25;
				nimln(73, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243368) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC24 = levalue_195404((*s).kindU.S6.Sons->data[i_243368], b);
				LA25: ;
				if (!LOC24) goto LA26;
				nimln(74, "nimsets.nim");
				nimln(74, "nimsets.nim");
				result = NIM_TRUE;
				goto BeforeRet;
			}
			LA26: ;
		}
		LA7: ;
		nimln(1453, "system.nim");
		res_243534 = addInt(res_243534, 1);
	} LA6: ;
	nimln(75, "nimsets.nim");
	result = NIM_FALSE;
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #5
0
N_NIMCALL(NU8, ispartofaux_325019)(tnode171659* n, ttype171693* b, tintset168043* marker) {
	NU8 result;
	nimfr("isPartOfAux", "aliases.nim")
	result = 0;
	nimln(22, "aliases.nim");
	result = ((NU8) 0);
	nimln(23, "aliases.nim");
	switch ((*n).Kind) {
	case ((NU8) 133):
	{
		NI i_325035;
		NI HEX3Atmp_325271;
		NI LOC2;
		NI TMP5032;
		NI res_325273;
		i_325035 = 0;
		HEX3Atmp_325271 = 0;
		nimln(25, "aliases.nim");
		nimln(25, "aliases.nim");
		nimln(25, "aliases.nim");
		LOC2 = 0;
		LOC2 = sonslen_172022(n);
		TMP5032 = subInt(LOC2, 1);
		HEX3Atmp_325271 = (NI64)(TMP5032);
		nimln(1301, "system.nim");
		res_325273 = 0;
		nimln(1302, "system.nim");
		while (1) {
			nimln(1302, "system.nim");
			if (!(res_325273 <= HEX3Atmp_325271)) goto LA3;
			nimln(1301, "system.nim");
			i_325035 = res_325273;
			nimln(26, "aliases.nim");
			if (((TMP5030[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5031));
			if ((NU)(i_325035) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = ispartofaux_325019((*n).kindU.S6.Sons->data[i_325035], b, marker);
			nimln(27, "aliases.nim");
			{
				nimln(27, "aliases.nim");
				if (!(result == ((NU8) 2))) goto LA6;
				nimln(27, "aliases.nim");
				goto BeforeRet;
			}			LA6: ;
			nimln(1304, "system.nim");
			res_325273 = addInt(res_325273, 1);
		} LA3: ;
	}	break;
	case ((NU8) 134):
	{
		NI i_325229;
		NI HEX3Atmp_325275;
		NI LOC17;
		NI TMP5034;
		NI res_325277;
		nimln(29, "aliases.nim");
		{
			nimln(29, "aliases.nim");
			nimln(29, "aliases.nim");
			if (((TMP5030[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5031));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*n).kindU.S6.Sons->data[0]).Kind == ((NU8) 3)))) goto LA11;
			nimln(29, "aliases.nim");
			hiddenraiseassert_76017(((NimStringDesc*) &TMP5033));		}		LA11: ;
		nimln(30, "aliases.nim");
		if (((TMP5030[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5031));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		result = ispartofaux_325019((*n).kindU.S6.Sons->data[0], b, marker);
		nimln(31, "aliases.nim");
		{
			nimln(31, "aliases.nim");
			if (!(result == ((NU8) 2))) goto LA15;
			nimln(31, "aliases.nim");
			goto BeforeRet;
		}		LA15: ;
		i_325229 = 0;
		HEX3Atmp_325275 = 0;
		nimln(32, "aliases.nim");
		nimln(32, "aliases.nim");
		nimln(32, "aliases.nim");
		LOC17 = 0;
		LOC17 = sonslen_172022(n);
		TMP5034 = subInt(LOC17, 1);
		HEX3Atmp_325275 = (NI64)(TMP5034);
		nimln(1301, "system.nim");
		res_325277 = 1;
		nimln(1302, "system.nim");
		while (1) {
			nimln(1302, "system.nim");
			if (!(res_325277 <= HEX3Atmp_325275)) goto LA18;
			nimln(1301, "system.nim");
			i_325229 = res_325277;
			nimln(33, "aliases.nim");
			if (((TMP5030[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5031));
			if ((NU)(i_325229) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			switch ((*(*n).kindU.S6.Sons->data[i_325229]).Kind) {
			case ((NU8) 85):
			case ((NU8) 88):
			{
				tnode171659* LOC20;
				nimln(35, "aliases.nim");
				nimln(35, "aliases.nim");
				if (((TMP5030[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5031));
				if ((NU)(i_325229) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC20 = 0;
				LOC20 = lastson_172030((*n).kindU.S6.Sons->data[i_325229]);
				result = ispartofaux_325019(LOC20, b, marker);
				nimln(36, "aliases.nim");
				{
					nimln(36, "aliases.nim");
					if (!(result == ((NU8) 2))) goto LA23;
					nimln(36, "aliases.nim");
					goto BeforeRet;
				}				LA23: ;
			}			break;
			default:
			{
				nimln(37, "aliases.nim");
				internalerror_138383(((NimStringDesc*) &TMP5036));			}			break;
			}
			nimln(1304, "system.nim");
			res_325277 = addInt(res_325277, 1);
		} LA18: ;
	}	break;
	case ((NU8) 3):
	{
		nimln(39, "aliases.nim");
		if (!(((TMP5037[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
		result = ispartofaux_325012((*(*n).kindU.S4.Sym).Typ, b, marker);
	}	break;
	default:
	{
		nimln(40, "aliases.nim");
		internalerror_138369((*n).Info, ((NimStringDesc*) &TMP5039));	}	break;
	}
	BeforeRet: ;	popFrame();
	return result;
}
コード例 #6
0
ファイル: depends.c プロジェクト: Varriount/csources
N_NIMCALL(tnode191813*, adddotdependency_525031)(tpasscontext250003* c, tnode191813* n) {
	tnode191813* result;
	tgen525012* g;
	nimfr("addDotDependency", "depends.nim")
	result = 0;
	nimln(29, "depends.nim");
	result = n;
	nimln(30, "depends.nim");
	if (c) chckObj((*c).Sup.m_type, (&NTI525012));
	g = ((tgen525012*) (c));
	nimln(31, "depends.nim");
	switch ((*n).Kind) {
	case ((NU8) 115):
	{
		NI i_525049;
		NI HEX3Atmp_525107;
		NI LOC2;
		NI TMP7606;
		NI res_525109;
		i_525049 = 0;
		HEX3Atmp_525107 = 0;
		nimln(33, "depends.nim");
		nimln(33, "depends.nim");
		nimln(33, "depends.nim");
		LOC2 = 0;
		LOC2 = sonslen_192191(n);
		TMP7606 = subInt(LOC2, 1);
		HEX3Atmp_525107 = (NI64)(TMP7606);
		nimln(1451, "system.nim");
		res_525109 = 0;
		nimln(1452, "system.nim");
		while (1) {
			NimStringDesc* imported;
			nimln(1452, "system.nim");
			if (!(res_525109 <= HEX3Atmp_525107)) goto LA3;
			nimln(1451, "system.nim");
			i_525049 = res_525109;
			nimln(34, "depends.nim");
			if (((TMP7604[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7605));
			if ((NU)(i_525049) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			imported = getmodulename_259012((*n).kindU.S6.Sons->data[i_525049]);
			nimln(35, "depends.nim");
			adddependencyaux_525020((*(*(*g).Module).Name).S, imported);
			nimln(1454, "system.nim");
			res_525109 = addInt(res_525109, 1);
		} LA3: ;
	}
	break;
	case ((NU8) 119):
	case ((NU8) 116):
	{
		NimStringDesc* imported;
		nimln(37, "depends.nim");
		if (((TMP7604[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7605));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		imported = getmodulename_259012((*n).kindU.S6.Sons->data[0]);
		nimln(38, "depends.nim");
		adddependencyaux_525020((*(*(*g).Module).Name).S, imported);
	}
	break;
	case ((NU8) 114):
	case ((NU8) 111):
	case ((NU8) 125):
	case ((NU8) 126):
	{
		NI i_525092;
		NI HEX3Atmp_525111;
		NI LOC6;
		NI TMP7607;
		NI res_525113;
		i_525092 = 0;
		HEX3Atmp_525111 = 0;
		nimln(40, "depends.nim");
		nimln(40, "depends.nim");
		nimln(40, "depends.nim");
		LOC6 = 0;
		LOC6 = sonslen_192191(n);
		TMP7607 = subInt(LOC6, 1);
		HEX3Atmp_525111 = (NI64)(TMP7607);
		nimln(1451, "system.nim");
		res_525113 = 0;
		nimln(1452, "system.nim");
		while (1) {
			tnode191813* LOC8;
			nimln(1452, "system.nim");
			if (!(res_525113 <= HEX3Atmp_525111)) goto LA7;
			nimln(1451, "system.nim");
			i_525092 = res_525113;
			nimln(40, "depends.nim");
			nimln(40, "depends.nim");
			if (((TMP7604[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7605));
			if ((NU)(i_525092) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC8 = 0;
			LOC8 = adddotdependency_525031(c, (*n).kindU.S6.Sons->data[i_525092]);
			nimln(1454, "system.nim");
			res_525113 = addInt(res_525113, 1);
		} LA7: ;
	}
	break;
	default:
	{
	}
	break;
	}
	popFrame();
	return result;
}
コード例 #7
0
ファイル: nimsets.c プロジェクト: reactormonk/csources
N_NIMCALL(NIM_BOOL, inset_243013)(tnode186813* s, tnode186813* elem) {
	NIM_BOOL result;
	NI i_243094;
	NI HEX3Atmp_243188;
	NI LOC5;
	NI TMP3152;
	NI res_243190;
	nimfr("inSet", "nimsets.nim")
	result = 0;
	nimln(34, "nimsets.nim");
	{
		nimln(34, "nimsets.nim");
		nimln(34, "nimsets.nim");
		if (!!(((*s).Kind == ((NU8) 39)))) goto LA3;
		nimln(35, "nimsets.nim");
		internalerror_164591((*s).Info, ((NimStringDesc*) &TMP3149));
		nimln(36, "nimsets.nim");
		nimln(36, "nimsets.nim");
		result = NIM_FALSE;
		goto BeforeRet;
	}
	LA3: ;
	i_243094 = 0;
	HEX3Atmp_243188 = 0;
	nimln(37, "nimsets.nim");
	nimln(37, "nimsets.nim");
	nimln(37, "nimsets.nim");
	LOC5 = 0;
	LOC5 = sonslen_187191(s);
	TMP3152 = subInt(LOC5, 1);
	HEX3Atmp_243188 = (NI64)(TMP3152);
	nimln(1450, "system.nim");
	res_243190 = 0;
	nimln(1451, "system.nim");
	while (1) {
		nimln(1451, "system.nim");
		if (!(res_243190 <= HEX3Atmp_243188)) goto LA6;
		nimln(1450, "system.nim");
		i_243094 = res_243190;
		nimln(38, "nimsets.nim");
		{
			nimln(38, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243094) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*s).kindU.S6.Sons->data[i_243094]).Kind == ((NU8) 44))) goto LA9;
			nimln(39, "nimsets.nim");
			{
				NIM_BOOL LOC13;
				nimln(39, "nimsets.nim");
				LOC13 = 0;
				nimln(39, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243094) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243094]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243094]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(0) >= (NU)((*(*s).kindU.S6.Sons->data[i_243094]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC13 = levalue_195404((*(*s).kindU.S6.Sons->data[i_243094]).kindU.S6.Sons->data[0], elem);
				if (!(LOC13)) goto LA14;
				nimln(40, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243094) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243094]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243094]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(1) >= (NU)((*(*s).kindU.S6.Sons->data[i_243094]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC13 = levalue_195404(elem, (*(*s).kindU.S6.Sons->data[i_243094]).kindU.S6.Sons->data[1]);
				LA14: ;
				if (!LOC13) goto LA15;
				nimln(41, "nimsets.nim");
				nimln(41, "nimsets.nim");
				result = NIM_TRUE;
				goto BeforeRet;
			}
			LA15: ;
		}
		goto LA7;
		LA9: ;
		{
			nimln(43, "nimsets.nim");
			{
				NIM_BOOL LOC20;
				nimln(43, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243094) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC20 = 0;
				LOC20 = samevalue_195271((*s).kindU.S6.Sons->data[i_243094], elem);
				if (!LOC20) goto LA21;
				nimln(44, "nimsets.nim");
				nimln(44, "nimsets.nim");
				result = NIM_TRUE;
				goto BeforeRet;
			}
			LA21: ;
		}
		LA7: ;
		nimln(1453, "system.nim");
		res_243190 = addInt(res_243190, 1);
	} LA6: ;
	nimln(45, "nimsets.nim");
	result = NIM_FALSE;
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #8
0
ファイル: syntaxes.c プロジェクト: reactormonk/csources
N_NIMCALL(tllstream173204*, evalpipe_218461)(tparsers218029* p, tnode185813* n, NimStringDesc* filename, tllstream173204* start) {
	tllstream173204* result;
	nimfr("evalPipe", "syntaxes.nim")
	result = 0;
	nimln(149, "syntaxes.nim");
	result = start;
	nimln(150, "syntaxes.nim");
	{
		nimln(150, "syntaxes.nim");
		if (!((*n).Kind == ((NU8) 1))) goto LA3;
		nimln(150, "syntaxes.nim");
		goto BeforeRet;
	}
	LA3: ;
	nimln(151, "syntaxes.nim");
	{
		NIM_BOOL LOC7;
		NIM_BOOL LOC8;
		NI i_218550;
		NI res_218626;
		nimln(151, "syntaxes.nim");
		LOC7 = 0;
		nimln(151, "syntaxes.nim");
		LOC8 = 0;
		nimln(151, "syntaxes.nim");
		LOC8 = ((*n).Kind == ((NU8) 29));
		if (!(LOC8)) goto LA9;
		nimln(151, "syntaxes.nim");
		if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		LOC8 = ((*(*n).kindU.S6.Sons->data[0]).Kind == ((NU8) 2));
		LA9: ;
		LOC7 = LOC8;
		if (!(LOC7)) goto LA10;
		nimln(152, "syntaxes.nim");
		if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		if (!(((TMP2709[(*(*n).kindU.S6.Sons->data[0]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[0]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP2710));
		LOC7 = identeq_165469((*(*n).kindU.S6.Sons->data[0]).kindU.S5.Ident, ((NimStringDesc*) &TMP2711));
		LA10: ;
		if (!LOC7) goto LA11;
		i_218550 = 0;
		nimln(1450, "system.nim");
		res_218626 = 1;
		nimln(1451, "system.nim");
		while (1) {
			nimln(1451, "system.nim");
			if (!(res_218626 <= 2)) goto LA13;
			nimln(1450, "system.nim");
			i_218550 = res_218626;
			nimln(154, "syntaxes.nim");
			{
				nimln(154, "syntaxes.nim");
				if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
				if ((NU)(i_218550) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (!((*(*n).kindU.S6.Sons->data[i_218550]).Kind == ((NU8) 29))) goto LA16;
				nimln(155, "syntaxes.nim");
				if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
				if ((NU)(i_218550) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				result = evalpipe_218461(p, (*n).kindU.S6.Sons->data[i_218550], filename, result);
			}
			goto LA14;
			LA16: ;
			{
				nimln(157, "syntaxes.nim");
				if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
				if ((NU)(i_218550) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				result = applyfilter_218426(p, (*n).kindU.S6.Sons->data[i_218550], filename, result);
			}
			LA14: ;
			nimln(1453, "system.nim");
			res_218626 = addInt(res_218626, 1);
		} LA13: ;
	}
	goto LA5;
	LA11: ;
	{
		nimln(158, "syntaxes.nim");
		if (!((*n).Kind == ((NU8) 114))) goto LA20;
		nimln(159, "syntaxes.nim");
		if (((TMP2707[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2708));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		result = evalpipe_218461(p, (*n).kindU.S6.Sons->data[0], filename, result);
	}
	goto LA5;
	LA20: ;
	{
		nimln(161, "syntaxes.nim");
		result = applyfilter_218426(p, n, filename, result);
	}
	LA5: ;
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #9
0
ファイル: compiler_depends.c プロジェクト: rbehrends/csources
N_NIMCALL(tnode172659*, adddotdependency_415031)(tpasscontext223003* c, tnode172659* n) {
	tnode172659* result;
	tgen415011* g;
	nimfr("addDotDependency", "depends.nim")
	result = 0;
	nimln(29, "depends.nim");
	result = n;
	nimln(30, "depends.nim");
	if (c) chckObj((*c).Sup.m_type, (&NTI415011));
	g = ((tgen415011*) (c));
	nimln(31, "depends.nim");
	switch ((*n).Kind) {
	case ((NU8) 115):
	{
		NI i_415046;
		NI HEX3Atmp_415092;
		NI LOC2;
		NI TMP7012;
		NI res_415094;
		i_415046 = 0;
		HEX3Atmp_415092 = 0;
		nimln(33, "depends.nim");
		nimln(33, "depends.nim");
		nimln(33, "depends.nim");
		LOC2 = 0;
		LOC2 = sonslen_173022(n);
		TMP7012 = subInt(LOC2, 1);
		HEX3Atmp_415092 = (NI32)(TMP7012);
		nimln(1301, "system.nim");
		res_415094 = 0;
		nimln(1302, "system.nim");
		while (1) {
			NimStringDesc* imported;
			nimln(1302, "system.nim");
			if (!(res_415094 <= HEX3Atmp_415092)) goto LA3;
			nimln(1301, "system.nim");
			i_415046 = res_415094;
			nimln(34, "depends.nim");
			if (((TMP7010[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7011));
			if ((NU)(i_415046) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			imported = getmodulename_266012((*n).kindU.S6.Sons->data[i_415046]);
			nimln(35, "depends.nim");
			adddependencyaux_415019((*(*(*g).Module).Name).S, imported);			nimln(1304, "system.nim");
			res_415094 = addInt(res_415094, 1);
		} LA3: ;
	}	break;
	case ((NU8) 119):
	case ((NU8) 116):
	{
		NimStringDesc* imported;
		nimln(37, "depends.nim");
		if (((TMP7010[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7011));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		imported = getmodulename_266012((*n).kindU.S6.Sons->data[0]);
		nimln(38, "depends.nim");
		adddependencyaux_415019((*(*(*g).Module).Name).S, imported);	}	break;
	case ((NU8) 114):
	case ((NU8) 111):
	case ((NU8) 125):
	case ((NU8) 126):
	{
		NI i_415080;
		NI HEX3Atmp_415096;
		NI LOC6;
		NI TMP7013;
		NI res_415098;
		i_415080 = 0;
		HEX3Atmp_415096 = 0;
		nimln(40, "depends.nim");
		nimln(40, "depends.nim");
		nimln(40, "depends.nim");
		LOC6 = 0;
		LOC6 = sonslen_173022(n);
		TMP7013 = subInt(LOC6, 1);
		HEX3Atmp_415096 = (NI32)(TMP7013);
		nimln(1301, "system.nim");
		res_415098 = 0;
		nimln(1302, "system.nim");
		while (1) {
			tnode172659* LOC8;
			nimln(1302, "system.nim");
			if (!(res_415098 <= HEX3Atmp_415096)) goto LA7;
			nimln(1301, "system.nim");
			i_415080 = res_415098;
			nimln(40, "depends.nim");
			nimln(40, "depends.nim");
			if (((TMP7010[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7011));
			if ((NU)(i_415080) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC8 = 0;
			LOC8 = adddotdependency_415031(c, (*n).kindU.S6.Sons->data[i_415080]);
			nimln(1304, "system.nim");
			res_415098 = addInt(res_415098, 1);
		} LA7: ;
	}	break;
	default:
	{
	}	break;
	}
	popFrame();
	return result;
}
コード例 #10
0
N_NIMCALL(tsym172689*, searchforproc_270141)(tcontext263019* c, tscope172683* scope, tsym172689* fn) {
	tsym172689* result;
	tidentiter179106 it;
	nimfr("SearchForProc", "procfind.nim")
	result = 0;
	memset((void*)&it, 0, sizeof(it));
	nimln(38, "procfind.nim");
	result = initidentiter_179110(&it, (*scope).Symbols, (*fn).Name);
	nimln(39, "procfind.nim");
	{
		NIM_BOOL LOC3;
		nimln(39, "procfind.nim");
		LOC3 = 0;
		LOC3 = isgenericroutine_177791(fn);
		if (!LOC3) goto LA4;
		nimln(43, "procfind.nim");
		while (1) {
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			if (!!((result == NIM_NIL))) goto LA6;
			nimln(44, "procfind.nim");
			{
				NIM_BOOL LOC9;
				tnode172659* genr;
				tnode172659* genf;
				nimln(44, "procfind.nim");
				LOC9 = 0;
				nimln(44, "procfind.nim");
				LOC9 = ((*result).Kind == (*fn).Kind);
				if (!(LOC9)) goto LA10;
				nimln(44, "procfind.nim");
				LOC9 = isgenericroutine_177791(result);
				LA10: ;
				if (!LOC9) goto LA11;
				nimln(45, "procfind.nim");
				if (((TMP3696[(*(*result).Ast).Kind/8] &(1<<((*(*result).Ast).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
				if ((NU)(2) >= (NU)((*(*result).Ast).kindU.S6.Sons->Sup.len)) raiseIndexError();
				genr = (*(*result).Ast).kindU.S6.Sons->data[2];
				nimln(46, "procfind.nim");
				if (((TMP3696[(*(*fn).Ast).Kind/8] &(1<<((*(*fn).Ast).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
				if ((NU)(2) >= (NU)((*(*fn).Ast).kindU.S6.Sons->Sup.len)) raiseIndexError();
				genf = (*(*fn).Ast).kindU.S6.Sons->data[2];
				nimln(47, "procfind.nim");
				{
					NIM_BOOL LOC15;
					NIM_BOOL LOC16;
					nimln(49, "procfind.nim");
					LOC15 = 0;
					nimln(47, "procfind.nim");
					LOC16 = 0;
					nimln(47, "procfind.nim");
					LOC16 = exprstructuralequivalent_199122(genr, genf);
					if (!(LOC16)) goto LA17;
					nimln(48, "procfind.nim");
					if (((TMP3696[(*(*result).Ast).Kind/8] &(1<<((*(*result).Ast).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
					if ((NU)(3) >= (NU)((*(*result).Ast).kindU.S6.Sons->Sup.len)) raiseIndexError();
					if (((TMP3696[(*(*fn).Ast).Kind/8] &(1<<((*(*fn).Ast).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
					if ((NU)(3) >= (NU)((*(*fn).Ast).kindU.S6.Sons->Sup.len)) raiseIndexError();
					LOC16 = exprstructuralequivalent_199122((*(*result).Ast).kindU.S6.Sons->data[3], (*(*fn).Ast).kindU.S6.Sons->data[3]);
					LA17: ;
					LOC15 = LOC16;
					if (!(LOC15)) goto LA18;
					nimln(50, "procfind.nim");
					LOC15 = equalgenericparams_270010(genr, genf);
					LA18: ;
					if (!LOC15) goto LA19;
					nimln(51, "procfind.nim");
					goto BeforeRet;
				}				LA19: ;
			}			LA11: ;
			nimln(52, "procfind.nim");
			result = nextidentiter_179117(&it, (*scope).Symbols);
		} LA6: ;
	}	goto LA1;
	LA4: ;
	{
		nimln(54, "procfind.nim");
		while (1) {
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			if (!!((result == NIM_NIL))) goto LA22;
			nimln(55, "procfind.nim");
			{
				NIM_BOOL LOC25;
				NIM_BOOL LOC27;
				NU8 LOC30;
				nimln(55, "procfind.nim");
				LOC25 = 0;
				nimln(55, "procfind.nim");
				LOC25 = ((*result).Kind == (*fn).Kind);
				if (!(LOC25)) goto LA26;
				nimln(55, "procfind.nim");
				nimln(55, "procfind.nim");
				LOC27 = 0;
				LOC27 = isgenericroutine_177791(result);
				LOC25 = !(LOC27);
				LA26: ;
				if (!LOC25) goto LA28;
				nimln(56, "procfind.nim");
				nimln(56, "procfind.nim");
				LOC30 = 0;
				LOC30 = equalparams_201066((*(*result).Typ).N, (*(*fn).Typ).N);
				switch (LOC30) {
				case ((NU8) 1):
				{
					nimln(58, "procfind.nim");
					goto BeforeRet;
				}				break;
				case ((NU8) 2):
				{
					nimln(60, "procfind.nim");
					localerror_139349((*fn).Info, ((NU16) 66), (*(*fn).Name).S);					nimln(61, "procfind.nim");
					goto BeforeRet;
				}				break;
				case ((NU8) 0):
				{
				}				break;
				}
			}			LA28: ;
			nimln(64, "procfind.nim");
			result = nextidentiter_179117(&it, (*scope).Symbols);
		} LA22: ;
	}	LA1: ;
	BeforeRet: ;	popFrame();
	return result;
}N_NOINLINE(void, compilerprocfindInit)(void) {
コード例 #11
0
ファイル: filters.c プロジェクト: reactormonk/csources
N_NIMCALL(tnode186813*, getarg_217042)(tnode186813* n, NimStringDesc* name, NI pos) {
	tnode186813* result;
	NI i_217074;
	NI HEX3Atmp_217219;
	NI LOC5;
	NI TMP2646;
	NI res_217221;
	nimfr("getArg", "filters.nim")
	result = 0;
	nimln(28, "filters.nim");
	result = NIM_NIL;
	nimln(29, "filters.nim");
	{
		nimln(29, "filters.nim");
		if (!((*n).Kind >= ((NU8) 1) && (*n).Kind <= ((NU8) 23))) goto LA3;
		nimln(29, "filters.nim");
		goto BeforeRet;
	}
	LA3: ;
	i_217074 = 0;
	HEX3Atmp_217219 = 0;
	nimln(30, "filters.nim");
	nimln(30, "filters.nim");
	nimln(30, "filters.nim");
	LOC5 = 0;
	LOC5 = sonslen_187191(n);
	TMP2646 = subInt(LOC5, 1);
	HEX3Atmp_217219 = (NI32)(TMP2646);
	nimln(1450, "system.nim");
	res_217221 = 1;
	nimln(1451, "system.nim");
	while (1) {
		nimln(1451, "system.nim");
		if (!(res_217221 <= HEX3Atmp_217219)) goto LA6;
		nimln(1450, "system.nim");
		i_217074 = res_217221;
		nimln(31, "filters.nim");
		{
			nimln(31, "filters.nim");
			if (((TMP2644[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
			if ((NU)(i_217074) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*n).kindU.S6.Sons->data[i_217074]).Kind == ((NU8) 33))) goto LA9;
			nimln(32, "filters.nim");
			{
				nimln(32, "filters.nim");
				nimln(32, "filters.nim");
				if (((TMP2644[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(i_217074) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP2644[(*(*n).kindU.S6.Sons->data[i_217074]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[i_217074]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(0) >= (NU)((*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (!!(((*(*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->data[0]).Kind == ((NU8) 2)))) goto LA13;
				nimln(32, "filters.nim");
				invalidpragma_217036(n);
			}
			LA13: ;
			nimln(33, "filters.nim");
			{
				NIM_BOOL LOC17;
				nimln(33, "filters.nim");
				if (((TMP2644[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(i_217074) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP2644[(*(*n).kindU.S6.Sons->data[i_217074]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[i_217074]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(0) >= (NU)((*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (!(((TMP2647[(*(*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->data[0]).Kind/8] &(1<<((*(*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->data[0]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP2648));
				LOC17 = 0;
				LOC17 = identeq_166469((*(*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->data[0]).kindU.S5.Ident, name);
				if (!LOC17) goto LA18;
				nimln(34, "filters.nim");
				nimln(34, "filters.nim");
				if (((TMP2644[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(i_217074) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP2644[(*(*n).kindU.S6.Sons->data[i_217074]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[i_217074]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
				if ((NU)(1) >= (NU)((*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				result = (*(*n).kindU.S6.Sons->data[i_217074]).kindU.S6.Sons->data[1];
				goto BeforeRet;
			}
			LA18: ;
		}
		goto LA7;
		LA9: ;
		{
			nimln(35, "filters.nim");
			if (!(i_217074 == pos)) goto LA21;
			nimln(36, "filters.nim");
			nimln(36, "filters.nim");
			if (((TMP2644[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP2645));
			if ((NU)(i_217074) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = (*n).kindU.S6.Sons->data[i_217074];
			goto BeforeRet;
		}
		goto LA7;
		LA21: ;
		LA7: ;
		nimln(1453, "system.nim");
		res_217221 = addInt(res_217221, 1);
	} LA6: ;
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #12
0
N_NIMCALL(NIM_BOOL, equalgenericparams_270010)(tnode172659* proca, tnode172659* procb) {
	NIM_BOOL result;
	NI i_270024;
	NI HEX3Atmp_270134;
	NI LOC7;
	NI TMP3698;
	NI res_270136;
	nimfr("equalGenericParams", "procfind.nim")
	result = 0;
	nimln(17, "procfind.nim");
	{
		NI LOC3;
		NI LOC4;
		nimln(698, "system.nim");
		nimln(698, "system.nim");
		nimln(17, "procfind.nim");
		LOC3 = 0;
		LOC3 = sonslen_173022(proca);
		nimln(17, "procfind.nim");
		LOC4 = 0;
		LOC4 = sonslen_173022(procb);
		if (!!((LOC3 == LOC4))) goto LA5;
		nimln(17, "procfind.nim");
		goto BeforeRet;
	}	LA5: ;
	i_270024 = 0;
	HEX3Atmp_270134 = 0;
	nimln(18, "procfind.nim");
	nimln(18, "procfind.nim");
	nimln(18, "procfind.nim");
	LOC7 = 0;
	LOC7 = sonslen_173022(proca);
	TMP3698 = subInt(LOC7, 1);
	HEX3Atmp_270134 = (NI32)(TMP3698);
	nimln(1301, "system.nim");
	res_270136 = 0;
	nimln(1302, "system.nim");
	while (1) {
		tsym172689* a;
		tsym172689* b;
		nimln(1302, "system.nim");
		if (!(res_270136 <= HEX3Atmp_270134)) goto LA8;
		nimln(1301, "system.nim");
		i_270024 = res_270136;
		nimln(19, "procfind.nim");
		{
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			if (((TMP3696[(*proca).Kind/8] &(1<<((*proca).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
			if ((NU)(i_270024) >= (NU)((*proca).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*proca).kindU.S6.Sons->data[i_270024]).Kind == ((NU8) 3)))) goto LA11;
			nimln(20, "procfind.nim");
			internalerror_139369((*proca).Info, ((NimStringDesc*) &TMP3699));			nimln(21, "procfind.nim");
			goto BeforeRet;
		}		LA11: ;
		nimln(22, "procfind.nim");
		{
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			if (((TMP3696[(*procb).Kind/8] &(1<<((*procb).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
			if ((NU)(i_270024) >= (NU)((*procb).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*procb).kindU.S6.Sons->data[i_270024]).Kind == ((NU8) 3)))) goto LA15;
			nimln(23, "procfind.nim");
			internalerror_139369((*procb).Info, ((NimStringDesc*) &TMP3699));			nimln(24, "procfind.nim");
			goto BeforeRet;
		}		LA15: ;
		nimln(25, "procfind.nim");
		if (((TMP3696[(*proca).Kind/8] &(1<<((*proca).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
		if ((NU)(i_270024) >= (NU)((*proca).kindU.S6.Sons->Sup.len)) raiseIndexError();
		if (!(((TMP3700[(*(*proca).kindU.S6.Sons->data[i_270024]).Kind/8] &(1<<((*(*proca).kindU.S6.Sons->data[i_270024]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3701));
		a = (*(*proca).kindU.S6.Sons->data[i_270024]).kindU.S4.Sym;
		nimln(26, "procfind.nim");
		if (((TMP3696[(*procb).Kind/8] &(1<<((*procb).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3697));
		if ((NU)(i_270024) >= (NU)((*procb).kindU.S6.Sons->Sup.len)) raiseIndexError();
		if (!(((TMP3700[(*(*procb).kindU.S6.Sons->data[i_270024]).Kind/8] &(1<<((*(*procb).kindU.S6.Sons->data[i_270024]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3701));
		b = (*(*procb).kindU.S6.Sons->data[i_270024]).kindU.S4.Sym;
		nimln(27, "procfind.nim");
		{
			NIM_BOOL LOC19;
			NIM_BOOL LOC21;
			nimln(27, "procfind.nim");
			LOC19 = 0;
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			LOC19 = !(((*(*a).Name).Sup.Id == (*(*b).Name).Sup.Id));
			if (LOC19) goto LA20;
			nimln(28, "procfind.nim");
			nimln(28, "procfind.nim");
			LOC21 = 0;
			LOC21 = sametypeornil_205663((*a).Typ, (*b).Typ, 2);
			LOC19 = !(LOC21);
			LA20: ;
			if (!LOC19) goto LA22;
			nimln(28, "procfind.nim");
			goto BeforeRet;
		}		LA22: ;
		nimln(29, "procfind.nim");
		{
			NIM_BOOL LOC26;
			nimln(29, "procfind.nim");
			LOC26 = 0;
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			LOC26 = !(((*a).Ast == NIM_NIL));
			if (!(LOC26)) goto LA27;
			nimln(698, "system.nim");
			nimln(698, "system.nim");
			LOC26 = !(((*b).Ast == NIM_NIL));
			LA27: ;
			if (!LOC26) goto LA28;
			nimln(30, "procfind.nim");
			{
				NIM_BOOL LOC32;
				nimln(30, "procfind.nim");
				nimln(30, "procfind.nim");
				LOC32 = 0;
				LOC32 = exprstructuralequivalent_199122((*a).Ast, (*b).Ast);
				if (!!(LOC32)) goto LA33;
				nimln(30, "procfind.nim");
				goto BeforeRet;
			}			LA33: ;
		}		LA28: ;
		nimln(1304, "system.nim");
		res_270136 = addInt(res_270136, 1);
	} LA8: ;
	nimln(31, "procfind.nim");
	result = NIM_TRUE;
	BeforeRet: ;	popFrame();
	return result;
}
コード例 #13
0
N_NIMCALL(tnode191813*, evaltemplate_395275)(tnode191813* n, tsym191843* tmpl, tsym191843* gensymowner) {
	tnode191813* result;
	tnode191813* args;
	templctx395010 ctx;
	tnode191813* body;
	nimfr("evalTemplate", "evaltempl.nim")
	result = 0;
	nimln(78, "evaltempl.nim");
	evaltemplatecounter_395273 = addInt(evaltemplatecounter_395273, 1);
	nimln(79, "evaltempl.nim");
	{
		nimln(79, "evaltempl.nim");
		if (!(100 < evaltemplatecounter_395273)) goto LA3;
		nimln(80, "evaltempl.nim");
		globalerror_168558((*n).Info, ((NU16) 183), ((NimStringDesc*) &TMP5475));
		nimln(81, "evaltempl.nim");
		result = n;
	}
	LA3: ;
	nimln(84, "evaltempl.nim");
	args = evaltemplateargs_395174(n, tmpl);
	memset((void*)&ctx, 0, sizeof(ctx));
	nimln(86, "evaltempl.nim");
	ctx.Owner = tmpl;
	nimln(87, "evaltempl.nim");
	ctx.Gensymowner = gensymowner;
	nimln(88, "evaltempl.nim");
	initidtable_192130(&ctx.Mapping);
	nimln(90, "evaltempl.nim");
	body = getbody_243244(tmpl);
	nimln(91, "evaltempl.nim");
	{
		NIM_BOOL LOC7;
		nimln(91, "evaltempl.nim");
		LOC7 = 0;
		LOC7 = isatom_198186(body);
		if (!LOC7) goto LA8;
		nimln(92, "evaltempl.nim");
		result = newnodei_192109(((NU8) 37), (*body).Info);
		nimln(93, "evaltempl.nim");
		evaltemplateaux_395024(body, args, &ctx, result);
		nimln(94, "evaltempl.nim");
		{
			NI LOC12;
			nimln(94, "evaltempl.nim");
			nimln(94, "evaltempl.nim");
			LOC12 = 0;
			LOC12 = len_192274(result);
			if (!(LOC12 == 1)) goto LA13;
			nimln(94, "evaltempl.nim");
			if (((TMP5470[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5471));
			if ((NU)(0) >= (NU)((*result).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = (*result).kindU.S6.Sons->data[0];
		}
		goto LA10;
		LA13: ;
		{
			NimStringDesc* LOC16;
			nimln(96, "evaltempl.nim");
			nimln(97, "evaltempl.nim");
			LOC16 = 0;
			LOC16 = rendertree_215051(result, 4);
			globalerror_168558((*result).Info, ((NU16) 1), LOC16);
		}
		LA10: ;
	}
	goto LA5;
	LA8: ;
	{
		NI i_395345;
		NI HEX3Atmp_395378;
		NI LOC22;
		NI TMP5477;
		NI res_395380;
		nimln(99, "evaltempl.nim");
		result = copynode_192243(body);
		nimln(100, "evaltempl.nim");
		nimln(100, "evaltempl.nim");
		nimln(100, "evaltempl.nim");
		ctx.Instlines = !(((*body).Kind == ((NU8) 114) || (*body).Kind == ((NU8) 125) || (*body).Kind == ((NU8) 111) || (*body).Kind == ((NU8) 126)));
		nimln(102, "evaltempl.nim");
		{
			if (!ctx.Instlines) goto LA20;
			nimln(102, "evaltempl.nim");
			(*result).Info = (*n).Info;
		}
		LA20: ;
		i_395345 = 0;
		HEX3Atmp_395378 = 0;
		nimln(103, "evaltempl.nim");
		nimln(103, "evaltempl.nim");
		nimln(103, "evaltempl.nim");
		LOC22 = 0;
		LOC22 = safelen_192330(body);
		TMP5477 = subInt(LOC22, 1);
		HEX3Atmp_395378 = (NI32)(TMP5477);
		nimln(1451, "system.nim");
		res_395380 = 0;
		nimln(1452, "system.nim");
		while (1) {
			nimln(1452, "system.nim");
			if (!(res_395380 <= HEX3Atmp_395378)) goto LA23;
			nimln(1451, "system.nim");
			i_395345 = res_395380;
			nimln(104, "evaltempl.nim");
			if (((TMP5470[(*body).Kind/8] &(1<<((*body).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5471));
			if ((NU)(i_395345) >= (NU)((*body).kindU.S6.Sons->Sup.len)) raiseIndexError();
			evaltemplateaux_395024((*body).kindU.S6.Sons->data[i_395345], args, &ctx, result);
			nimln(1454, "system.nim");
			res_395380 = addInt(res_395380, 1);
		} LA23: ;
	}
	LA5: ;
	nimln(106, "evaltempl.nim");
	evaltemplatecounter_395273 = subInt(evaltemplatecounter_395273, 1);
	popFrame();
	return result;
}
コード例 #14
0
N_NIMCALL(tnode191813*, evaltemplateargs_395174)(tnode191813* n, tsym191843* s) {
	tnode191813* result;
	NI a;
	NI f;
	NI i_395194;
	NI HEX3Atmp_395266;
	NI TMP5476;
	NI res_395268;
	nimfr("evalTemplateArgs", "evaltempl.nim")
	result = 0;
	a = 0;
	nimln(60, "evaltempl.nim");
	switch ((*n).Kind) {
	case ((NU8) 27):
	case ((NU8) 29):
	case ((NU8) 30):
	case ((NU8) 31):
	case ((NU8) 26):
	case ((NU8) 28):
	{
		nimln(62, "evaltempl.nim");
		a = sonslen_192191(n);
	}
	break;
	default:
	{
		nimln(63, "evaltempl.nim");
		a = 0;
	}
	break;
	}
	nimln(64, "evaltempl.nim");
	f = sonslen_192195((*s).Typ);
	nimln(65, "evaltempl.nim");
	{
		nimln(65, "evaltempl.nim");
		if (!(f < a)) goto LA5;
		nimln(65, "evaltempl.nim");
		globalerror_168558((*n).Info, ((NU16) 133), ((NimStringDesc*) &TMP5475));
	}
	LA5: ;
	nimln(67, "evaltempl.nim");
	result = newnodei_192109(((NU8) 150), (*n).Info);
	i_395194 = 0;
	HEX3Atmp_395266 = 0;
	nimln(68, "evaltempl.nim");
	nimln(68, "evaltempl.nim");
	TMP5476 = subInt(f, 1);
	HEX3Atmp_395266 = (NI32)(TMP5476);
	nimln(1451, "system.nim");
	res_395268 = 1;
	nimln(1452, "system.nim");
	while (1) {
		tnode191813* arg;
		nimln(1452, "system.nim");
		if (!(res_395268 <= HEX3Atmp_395266)) goto LA7;
		nimln(1451, "system.nim");
		i_395194 = res_395268;
		nimln(69, "evaltempl.nim");
		nimln(69, "evaltempl.nim");
		{
			nimln(69, "evaltempl.nim");
			if (!(i_395194 < a)) goto LA10;
			if (((TMP5470[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5471));
			if ((NU)(i_395194) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			arg = (*n).kindU.S6.Sons->data[i_395194];
		}
		goto LA8;
		LA10: ;
		{
			nimln(69, "evaltempl.nim");
			if (((TMP5470[(*(*(*s).Typ).N).Kind/8] &(1<<((*(*(*s).Typ).N).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5471));
			if ((NU)(i_395194) >= (NU)((*(*(*s).Typ).N).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!(((TMP5468[(*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_395194]).Kind/8] &(1<<((*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_395194]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5469));
			arg = copytree_192247((*(*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_395194]).kindU.S4.Sym).Ast);
		}
		LA8: ;
		nimln(70, "evaltempl.nim");
		{
			NIM_BOOL LOC15;
			nimln(70, "evaltempl.nim");
			LOC15 = 0;
			nimln(70, "evaltempl.nim");
			LOC15 = (arg == NIM_NIL);
			if (LOC15) goto LA16;
			nimln(70, "evaltempl.nim");
			LOC15 = ((*arg).Kind == ((NU8) 1));
			LA16: ;
			if (!LOC15) goto LA17;
			nimln(71, "evaltempl.nim");
			localerror_168571((*n).Info, ((NU16) 133), ((NimStringDesc*) &TMP5475));
		}
		LA17: ;
		nimln(72, "evaltempl.nim");
		addson_192217(result, arg);
		nimln(1454, "system.nim");
		res_395268 = addInt(res_395268, 1);
	} LA7: ;
	popFrame();
	return result;
}
コード例 #15
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(void, compileconstraints_280106)(tnode191813* p, NimStringDesc** result) {
	nimfr("compileConstraints", "parampatterns.nim")
	nimln(57, "parampatterns.nim");
	switch ((*p).Kind) {
	case ((NU8) 27):
	case ((NU8) 29):
	case ((NU8) 30):
	case ((NU8) 31):
	case ((NU8) 26):
	case ((NU8) 28):
	case ((NU8) 32):
	{
		tident170019* op;
		nimln(59, "parampatterns.nim");
		{
			nimln(59, "parampatterns.nim");
			nimln(59, "parampatterns.nim");
			if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*p).kindU.S6.Sons->data[0]).Kind == ((NU8) 2)))) goto LA4;
			nimln(60, "parampatterns.nim");
			if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
			patternerror_280040((*p).kindU.S6.Sons->data[0]);
			nimln(61, "parampatterns.nim");
			goto BeforeRet;
		}
		LA4: ;
		nimln(62, "parampatterns.nim");
		if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
		if ((NU)(0) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
		if (!(((TMP3572[(*(*p).kindU.S6.Sons->data[0]).Kind/8] &(1<<((*(*p).kindU.S6.Sons->data[0]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3573));
		op = (*(*p).kindU.S6.Sons->data[0]).kindU.S5.Ident;
		nimln(63, "parampatterns.nim");
		{
			NI LOC8;
			nimln(63, "parampatterns.nim");
			nimln(63, "parampatterns.nim");
			LOC8 = 0;
			LOC8 = len_192274(p);
			if (!(LOC8 == 3)) goto LA9;
			nimln(64, "parampatterns.nim");
			{
				NIM_BOOL LOC13;
				nimln(64, "parampatterns.nim");
				LOC13 = 0;
				nimln(64, "parampatterns.nim");
				LOC13 = eqStrings((*op).S, ((NimStringDesc*) &TMP3574));
				if (LOC13) goto LA14;
				nimln(64, "parampatterns.nim");
				LOC13 = ((*op).Sup.Id == 47);
				LA14: ;
				if (!LOC13) goto LA15;
				nimln(65, "parampatterns.nim");
				if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
				if ((NU)(1) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
				compileconstraints_280106((*p).kindU.S6.Sons->data[1], result);
				nimln(66, "parampatterns.nim");
				if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
				if ((NU)(2) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
				compileconstraints_280106((*p).kindU.S6.Sons->data[2], result);
				nimln(67, "parampatterns.nim");
				add_280046(result, ((NU8) 2));
			}
			goto LA11;
			LA15: ;
			{
				NIM_BOOL LOC18;
				nimln(68, "parampatterns.nim");
				LOC18 = 0;
				nimln(68, "parampatterns.nim");
				LOC18 = eqStrings((*op).S, ((NimStringDesc*) &TMP3575));
				if (LOC18) goto LA19;
				nimln(68, "parampatterns.nim");
				LOC18 = ((*op).Sup.Id == 2);
				LA19: ;
				if (!LOC18) goto LA20;
				nimln(69, "parampatterns.nim");
				if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
				if ((NU)(1) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
				compileconstraints_280106((*p).kindU.S6.Sons->data[1], result);
				nimln(70, "parampatterns.nim");
				if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
				if ((NU)(2) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
				compileconstraints_280106((*p).kindU.S6.Sons->data[2], result);
				nimln(71, "parampatterns.nim");
				add_280046(result, ((NU8) 3));
			}
			goto LA11;
			LA20: ;
			{
				nimln(73, "parampatterns.nim");
				patternerror_280040(p);
			}
			LA11: ;
		}
		goto LA6;
		LA9: ;
		{
			NIM_BOOL LOC24;
			NI LOC25;
			NIM_BOOL LOC27;
			nimln(74, "parampatterns.nim");
			LOC24 = 0;
			nimln(74, "parampatterns.nim");
			nimln(74, "parampatterns.nim");
			LOC25 = 0;
			LOC25 = len_192274(p);
			LOC24 = (LOC25 == 2);
			if (!(LOC24)) goto LA26;
			nimln(74, "parampatterns.nim");
			LOC27 = 0;
			nimln(74, "parampatterns.nim");
			LOC27 = eqStrings((*op).S, ((NimStringDesc*) &TMP3576));
			if (LOC27) goto LA28;
			nimln(74, "parampatterns.nim");
			LOC27 = ((*op).Sup.Id == 43);
			LA28: ;
			LOC24 = LOC27;
			LA26: ;
			if (!LOC24) goto LA29;
			nimln(75, "parampatterns.nim");
			if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
			compileconstraints_280106((*p).kindU.S6.Sons->data[1], result);
			nimln(76, "parampatterns.nim");
			add_280046(result, ((NU8) 4));
		}
		goto LA6;
		LA29: ;
		{
			nimln(78, "parampatterns.nim");
			patternerror_280040(p);
		}
		LA6: ;
	}
	break;
	case ((NU8) 53):
	case ((NU8) 37):
	{
		nimln(80, "parampatterns.nim");
		{
			NI LOC35;
			nimln(80, "parampatterns.nim");
			nimln(80, "parampatterns.nim");
			LOC35 = 0;
			LOC35 = len_192274(p);
			if (!(LOC35 == 1)) goto LA36;
			nimln(81, "parampatterns.nim");
			if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
			compileconstraints_280106((*p).kindU.S6.Sons->data[0], result);
		}
		goto LA33;
		LA36: ;
		{
			nimln(83, "parampatterns.nim");
			patternerror_280040(p);
		}
		LA33: ;
	}
	break;
	case ((NU8) 2):
	{
		NimStringDesc* spec;
		nimln(85, "parampatterns.nim");
		if (!(((TMP3572[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3573));
		spec = nsuNormalize((*(*p).kindU.S5.Ident).S);
		nimln(86, "parampatterns.nim");
		switch (hashString(spec) & 15) {
		case 1: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3587))) goto LA50;
break;
		case 3: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3583))) goto LA46;
if (eqStrings(spec, ((NimStringDesc*) &TMP3584))) goto LA47;
if (eqStrings(spec, ((NimStringDesc*) &TMP3586))) goto LA49;
break;
		case 4: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3579))) goto LA42;
break;
		case 6: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3580))) goto LA43;
if (eqStrings(spec, ((NimStringDesc*) &TMP3585))) goto LA48;
break;
		case 11: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3577))) goto LA40;
break;
		case 12: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3578))) goto LA41;
break;
		case 13: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3581))) goto LA44;
break;
		case 14: 
if (eqStrings(spec, ((NimStringDesc*) &TMP3582))) goto LA45;
break;
		}
		goto LA51;
		LA40: ;
		{
			nimln(87, "parampatterns.nim");
			add_280046(result, ((NU8) 6));
		}
		goto LA52;
		LA41: ;
		{
			nimln(88, "parampatterns.nim");
			add_280046(result, ((NU8) 7));
		}
		goto LA52;
		LA42: ;
		{
			nimln(89, "parampatterns.nim");
			add_280046(result, ((NU8) 5));
		}
		goto LA52;
		LA43: ;
		{
			nimln(90, "parampatterns.nim");
			add_280046(result, ((NU8) 8));
		}
		goto LA52;
		LA44: ;
		{
			nimln(91, "parampatterns.nim");
			add_280046(result, ((NU8) 9));
		}
		goto LA52;
		LA45: ;
		{
			nimln(92, "parampatterns.nim");
			if ((NU)(0) > (NU)((*result)->Sup.len)) raiseIndexError();
			(*result)->data[0] = 2;
		}
		goto LA52;
		LA46: ;
		{
			nimln(93, "parampatterns.nim");
			if ((NU)(0) > (NU)((*result)->Sup.len)) raiseIndexError();
			(*result)->data[0] = 3;
		}
		goto LA52;
		LA47: ;
		{
			nimln(94, "parampatterns.nim");
			add_280046(result, ((NU8) 12));
		}
		goto LA52;
		LA48: ;
		{
			nimln(95, "parampatterns.nim");
			add_280046(result, ((NU8) 13));
		}
		goto LA52;
		LA49: ;
		{
			nimln(96, "parampatterns.nim");
			add_280046(result, ((NU8) 14));
		}
		goto LA52;
		LA50: ;
		{
			nimln(97, "parampatterns.nim");
			add_280046(result, ((NU8) 15));
		}
		goto LA52;
		LA51: ;
		{
			NU8 i_280371;
			NU8 res_280461;
			NU8 i_280442;
			NU8 res_280466;
			nimln(849, "msgs.nim");
			{
				NimStringDesc* LOC69;
				if (!NIM_FALSE) goto LA67;
				nimln(849, "msgs.nim");
				nimln(849, "msgs.nim");
				LOC69 = 0;
				LOC69 = HEX24_168714(TMP3588);
				internalerror_168606(LOC69);
			}
			LA67: ;
			i_280371 = 0;
			nimln(1458, "system.nim");
			res_280461 = ((NU8) 0);
			nimln(1459, "system.nim");
			while (1) {
				nimln(1459, "system.nim");
				if (!(res_280461 <= ((NU8) 24))) goto LA70;
				nimln(1458, "system.nim");
				i_280371 = res_280461;
				nimln(102, "parampatterns.nim");
				{
					NimStringDesc* LOC73;
					NI LOC74;
					nimln(102, "parampatterns.nim");
					nimln(102, "parampatterns.nim");
					nimln(102, "parampatterns.nim");
					nimln(102, "parampatterns.nim");
					LOC73 = 0;
					LOC73 = copyStr(reprEnum(i_280371, (&NTI191451)), 2);
					LOC74 = 0;
					LOC74 = nsuCmpIgnoreStyle(LOC73, spec);
					if (!(LOC74 == 0)) goto LA75;
					nimln(103, "parampatterns.nim");
					add_280046(result, ((NU8) 10));
					nimln(104, "parampatterns.nim");
					nimln(104, "parampatterns.nim");
					nimln(104, "parampatterns.nim");
					(*result) = addChar((*result), ((NIM_CHAR) (((NI) (i_280371)))));
					nimln(105, "parampatterns.nim");
					goto BeforeRet;
				}
				LA75: ;
				nimln(1461, "system.nim");
				res_280461 = addInt(res_280461, 1);
			} LA70: ;
			nimln(849, "msgs.nim");
			{
				NimStringDesc* LOC81;
				if (!NIM_FALSE) goto LA79;
				nimln(849, "msgs.nim");
				nimln(849, "msgs.nim");
				LOC81 = 0;
				LOC81 = HEX24_168714(TMP3590);
				internalerror_168606(LOC81);
			}
			LA79: ;
			i_280442 = 0;
			nimln(1458, "system.nim");
			res_280466 = ((NU8) 0);
			nimln(1459, "system.nim");
			while (1) {
				nimln(1459, "system.nim");
				if (!(res_280466 <= ((NU8) 156))) goto LA82;
				nimln(1458, "system.nim");
				i_280442 = res_280466;
				nimln(109, "parampatterns.nim");
				{
					NI LOC85;
					nimln(109, "parampatterns.nim");
					nimln(109, "parampatterns.nim");
					nimln(109, "parampatterns.nim");
					LOC85 = 0;
					LOC85 = nsuCmpIgnoreStyle(reprEnum(i_280442, (&NTI191023)), spec);
					if (!(LOC85 == 0)) goto LA86;
					nimln(110, "parampatterns.nim");
					add_280046(result, ((NU8) 11));
					nimln(111, "parampatterns.nim");
					nimln(111, "parampatterns.nim");
					nimln(111, "parampatterns.nim");
					(*result) = addChar((*result), ((NIM_CHAR) (((NI) (i_280442)))));
					nimln(112, "parampatterns.nim");
					goto BeforeRet;
				}
				LA86: ;
				nimln(1461, "system.nim");
				res_280466 = addInt(res_280466, 1);
			} LA82: ;
			nimln(113, "parampatterns.nim");
			patternerror_280040(p);
		}
		LA52: ;
	}
	break;
	default:
	{
		nimln(115, "parampatterns.nim");
		patternerror_280040(p);
	}
	break;
	}
	BeforeRet: ;
	popFrame();
}
コード例 #16
0
ファイル: treetab.c プロジェクト: Varriount/csources
N_NIMCALL(NI, hashtree_252022)(tnode192813* n) {
	NI result;
	nimfr("hashTree", "treetab.nim")
	result = 0;
	nimln(16, "treetab.nim");
	{
		nimln(16, "treetab.nim");
		if (!(n == NIM_NIL)) goto LA3;
		nimln(16, "treetab.nim");
		goto BeforeRet;
	}
	LA3: ;
	nimln(17, "treetab.nim");
	nimln(17, "treetab.nim");
	result = ((NI) ((*n).Kind));
	nimln(18, "treetab.nim");
	switch ((*n).Kind) {
	case ((NU8) 1):
	case ((NU8) 23):
	case ((NU8) 4):
	{
	}
	break;
	case ((NU8) 2):
	{
		nimln(22, "treetab.nim");
		if (!(((TMP3200[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3201));
		result = HEX21HEX26_120015(result, (*(*n).kindU.S5.Ident).H);
	}
	break;
	case ((NU8) 3):
	{
		nimln(24, "treetab.nim");
		if (!(((TMP3202[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3203));
		result = HEX21HEX26_120015(result, (*(*(*n).kindU.S4.Sym).Name).H);
	}
	break;
	case ((NU8) 5) ... ((NU8) 15):
	{
		nimln(26, "treetab.nim");
		{
			NIM_BOOL LOC11;
			nimln(26, "treetab.nim");
			LOC11 = 0;
			nimln(26, "treetab.nim");
			if (!(((TMP3204[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3205));
			LOC11 = ((-2147483647 -1) <= (*n).kindU.S1.Intval);
			if (!(LOC11)) goto LA12;
			nimln(26, "treetab.nim");
			if (!(((TMP3204[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3205));
			LOC11 = ((*n).kindU.S1.Intval <= 2147483647);
			LA12: ;
			if (!LOC11) goto LA13;
			nimln(27, "treetab.nim");
			if (!(((TMP3204[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3205));
			result = HEX21HEX26_120015(result, ((NI)chckRange64((*n).kindU.S1.Intval, (-2147483647 -1), 2147483647)));
		}
		LA13: ;
	}
	break;
	case ((NU8) 16) ... ((NU8) 18):
	{
		nimln(29, "treetab.nim");
		{
			NIM_BOOL LOC18;
			nimln(29, "treetab.nim");
			LOC18 = 0;
			nimln(29, "treetab.nim");
			if (!(((TMP3206[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3207));
			LOC18 = (-1.0000000000000000e+006 <= (*n).kindU.S2.Floatval);
			if (!(LOC18)) goto LA19;
			nimln(29, "treetab.nim");
			if (!(((TMP3206[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3207));
			LOC18 = ((*n).kindU.S2.Floatval <= 1.0000000000000000e+006);
			LA19: ;
			if (!LOC18) goto LA20;
			nimln(30, "treetab.nim");
			nimln(30, "treetab.nim");
			if (!(((TMP3206[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3207));
			result = HEX21HEX26_120015(result, float64ToInt32((*n).kindU.S2.Floatval));
		}
		LA20: ;
	}
	break;
	case ((NU8) 20) ... ((NU8) 22):
	{
		NI LOC23;
		nimln(32, "treetab.nim");
		nimln(32, "treetab.nim");
		if (!(((TMP3208[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3209));
		LOC23 = 0;
		LOC23 = hash_120827((*n).kindU.S3.Strval);
		result = HEX21HEX26_120015(result, LOC23);
	}
	break;
	default:
	{
		NI i_252197;
		NI HEX3Atmp_252216;
		NI LOC25;
		NI TMP3212;
		NI res_252218;
		i_252197 = 0;
		HEX3Atmp_252216 = 0;
		nimln(34, "treetab.nim");
		nimln(34, "treetab.nim");
		nimln(34, "treetab.nim");
		LOC25 = 0;
		LOC25 = sonslen_193191(n);
		TMP3212 = subInt(LOC25, 1);
		HEX3Atmp_252216 = (NI32)(TMP3212);
		nimln(1451, "system.nim");
		res_252218 = 0;
		nimln(1452, "system.nim");
		while (1) {
			NI LOC27;
			nimln(1452, "system.nim");
			if (!(res_252218 <= HEX3Atmp_252216)) goto LA26;
			nimln(1451, "system.nim");
			i_252197 = res_252218;
			nimln(35, "treetab.nim");
			nimln(35, "treetab.nim");
			if (((TMP3210[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3211));
			if ((NU)(i_252197) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC27 = 0;
			LOC27 = hashtree_252022((*n).kindU.S6.Sons->data[i_252197]);
			result = HEX21HEX26_120015(result, LOC27);
			nimln(1454, "system.nim");
			res_252218 = addInt(res_252218, 1);
		} LA26: ;
	}
	break;
	}
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #17
0
ファイル: aliases.c プロジェクト: rbehrends/csources
N_NIMCALL(NU8, ispartofaux_416020)(tnode191813* n, ttype191847* b, tintset188047* marker) {
	NU8 result;
	nimfr("isPartOfAux", "aliases.nim")
	result = 0;
	nimln(22, "aliases.nim");
	result = ((NU8) 0);
	nimln(23, "aliases.nim");
	switch ((*n).Kind) {
	case ((NU8) 136):
	{
		NI i_416039;
		NI HEX3Atmp_416311;
		NI LOC2;
		NI TMP5621;
		NI res_416313;
		i_416039 = 0;
		HEX3Atmp_416311 = 0;
		nimln(25, "aliases.nim");
		nimln(25, "aliases.nim");
		nimln(25, "aliases.nim");
		LOC2 = 0;
		LOC2 = sonslen_192191(n);
		TMP5621 = subInt(LOC2, 1);
		HEX3Atmp_416311 = (NI32)(TMP5621);
		nimln(1451, "system.nim");
		res_416313 = 0;
		nimln(1452, "system.nim");
		while (1) {
			nimln(1452, "system.nim");
			if (!(res_416313 <= HEX3Atmp_416311)) goto LA3;
			nimln(1451, "system.nim");
			i_416039 = res_416313;
			nimln(26, "aliases.nim");
			if (((TMP5619[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5620));
			if ((NU)(i_416039) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = ispartofaux_416020((*n).kindU.S6.Sons->data[i_416039], b, marker);
			nimln(27, "aliases.nim");
			{
				nimln(27, "aliases.nim");
				if (!(result == ((NU8) 2))) goto LA6;
				nimln(27, "aliases.nim");
				goto BeforeRet;
			}
			LA6: ;
			nimln(1454, "system.nim");
			res_416313 = addInt(res_416313, 1);
		} LA3: ;
	}
	break;
	case ((NU8) 137):
	{
		NI i_416259;
		NI HEX3Atmp_416315;
		NI LOC17;
		NI TMP5623;
		NI res_416317;
		nimln(29, "aliases.nim");
		{
			nimln(29, "aliases.nim");
			nimln(29, "aliases.nim");
			if (((TMP5619[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5620));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!!(((*(*n).kindU.S6.Sons->data[0]).Kind == ((NU8) 3)))) goto LA11;
			nimln(29, "aliases.nim");
			failedassertimpl_80421(((NimStringDesc*) &TMP5622));
		}
		LA11: ;
		nimln(30, "aliases.nim");
		if (((TMP5619[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5620));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		result = ispartofaux_416020((*n).kindU.S6.Sons->data[0], b, marker);
		nimln(31, "aliases.nim");
		{
			nimln(31, "aliases.nim");
			if (!(result == ((NU8) 2))) goto LA15;
			nimln(31, "aliases.nim");
			goto BeforeRet;
		}
		LA15: ;
		i_416259 = 0;
		HEX3Atmp_416315 = 0;
		nimln(32, "aliases.nim");
		nimln(32, "aliases.nim");
		nimln(32, "aliases.nim");
		LOC17 = 0;
		LOC17 = sonslen_192191(n);
		TMP5623 = subInt(LOC17, 1);
		HEX3Atmp_416315 = (NI32)(TMP5623);
		nimln(1451, "system.nim");
		res_416317 = 1;
		nimln(1452, "system.nim");
		while (1) {
			nimln(1452, "system.nim");
			if (!(res_416317 <= HEX3Atmp_416315)) goto LA18;
			nimln(1451, "system.nim");
			i_416259 = res_416317;
			nimln(33, "aliases.nim");
			if (((TMP5619[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5620));
			if ((NU)(i_416259) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			switch ((*(*n).kindU.S6.Sons->data[i_416259]).Kind) {
			case ((NU8) 85):
			case ((NU8) 88):
			{
				tnode191813* LOC20;
				nimln(35, "aliases.nim");
				nimln(35, "aliases.nim");
				if (((TMP5619[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5620));
				if ((NU)(i_416259) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC20 = 0;
				LOC20 = lastson_192199((*n).kindU.S6.Sons->data[i_416259]);
				result = ispartofaux_416020(LOC20, b, marker);
				nimln(36, "aliases.nim");
				{
					nimln(36, "aliases.nim");
					if (!(result == ((NU8) 2))) goto LA23;
					nimln(36, "aliases.nim");
					goto BeforeRet;
				}
				LA23: ;
			}
			break;
			default:
			{
				nimln(37, "aliases.nim");
				internalerror_168606(((NimStringDesc*) &TMP5625));
			}
			break;
			}
			nimln(1454, "system.nim");
			res_416317 = addInt(res_416317, 1);
		} LA18: ;
	}
	break;
	case ((NU8) 3):
	{
		nimln(39, "aliases.nim");
		if (!(((TMP5626[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5627));
		result = ispartofaux_416013((*(*n).kindU.S4.Sym).Typ, b, marker);
	}
	break;
	default:
	{
		nimln(40, "aliases.nim");
		internalerror_168591((*n).Info, ((NimStringDesc*) &TMP5628));
	}
	break;
	}
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #18
0
ファイル: treetab.c プロジェクト: Varriount/csources
N_NIMCALL(NIM_BOOL, treesequivalent_252223)(tnode192813* a, tnode192813* b) {
	NIM_BOOL result;
	nimfr("treesEquivalent", "treetab.nim")
	result = 0;
	nimln(38, "treetab.nim");
	{
		nimln(38, "treetab.nim");
		if (!(a == b)) goto LA3;
		nimln(39, "treetab.nim");
		result = NIM_TRUE;
	}
	goto LA1;
	LA3: ;
	{
		NIM_BOOL LOC6;
		NIM_BOOL LOC7;
		nimln(40, "treetab.nim");
		LOC6 = 0;
		nimln(40, "treetab.nim");
		LOC7 = 0;
		nimln(40, "treetab.nim");
		nimln(40, "treetab.nim");
		LOC7 = !((a == NIM_NIL));
		if (!(LOC7)) goto LA8;
		nimln(40, "treetab.nim");
		nimln(40, "treetab.nim");
		LOC7 = !((b == NIM_NIL));
		LA8: ;
		LOC6 = LOC7;
		if (!(LOC6)) goto LA9;
		nimln(40, "treetab.nim");
		LOC6 = ((*a).Kind == (*b).Kind);
		LA9: ;
		if (!LOC6) goto LA10;
		nimln(41, "treetab.nim");
		switch ((*a).Kind) {
		case ((NU8) 1):
		case ((NU8) 23):
		case ((NU8) 4):
		{
			nimln(42, "treetab.nim");
			result = NIM_TRUE;
		}
		break;
		case ((NU8) 3):
		{
			nimln(43, "treetab.nim");
			nimln(43, "treetab.nim");
			if (!(((TMP3202[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3203));
			if (!(((TMP3202[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3203));
			result = ((*(*a).kindU.S4.Sym).Sup.Id == (*(*b).kindU.S4.Sym).Sup.Id);
		}
		break;
		case ((NU8) 2):
		{
			nimln(44, "treetab.nim");
			nimln(44, "treetab.nim");
			if (!(((TMP3200[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3201));
			if (!(((TMP3200[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3201));
			result = ((*(*a).kindU.S5.Ident).Sup.Id == (*(*b).kindU.S5.Ident).Sup.Id);
		}
		break;
		case ((NU8) 5) ... ((NU8) 15):
		{
			nimln(45, "treetab.nim");
			nimln(45, "treetab.nim");
			if (!(((TMP3204[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3205));
			if (!(((TMP3204[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3205));
			result = ((*a).kindU.S1.Intval == (*b).kindU.S1.Intval);
		}
		break;
		case ((NU8) 16) ... ((NU8) 18):
		{
			nimln(46, "treetab.nim");
			nimln(46, "treetab.nim");
			if (!(((TMP3206[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3207));
			if (!(((TMP3206[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3207));
			result = ((*a).kindU.S2.Floatval == (*b).kindU.S2.Floatval);
		}
		break;
		case ((NU8) 20) ... ((NU8) 22):
		{
			nimln(47, "treetab.nim");
			nimln(47, "treetab.nim");
			if (!(((TMP3208[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3209));
			if (!(((TMP3208[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3209));
			result = eqStrings((*a).kindU.S3.Strval, (*b).kindU.S3.Strval);
		}
		break;
		default:
		{
			nimln(49, "treetab.nim");
			{
				NI LOC21;
				NI LOC22;
				NI i_252439;
				NI HEX3Atmp_252468;
				NI LOC25;
				NI TMP3213;
				NI res_252470;
				nimln(49, "treetab.nim");
				nimln(49, "treetab.nim");
				LOC21 = 0;
				LOC21 = sonslen_193191(a);
				nimln(49, "treetab.nim");
				LOC22 = 0;
				LOC22 = sonslen_193191(b);
				if (!(LOC21 == LOC22)) goto LA23;
				i_252439 = 0;
				HEX3Atmp_252468 = 0;
				nimln(50, "treetab.nim");
				nimln(50, "treetab.nim");
				nimln(50, "treetab.nim");
				LOC25 = 0;
				LOC25 = sonslen_193191(a);
				TMP3213 = subInt(LOC25, 1);
				HEX3Atmp_252468 = (NI32)(TMP3213);
				nimln(1451, "system.nim");
				res_252470 = 0;
				nimln(1452, "system.nim");
				while (1) {
					nimln(1452, "system.nim");
					if (!(res_252470 <= HEX3Atmp_252468)) goto LA26;
					nimln(1451, "system.nim");
					i_252439 = res_252470;
					nimln(51, "treetab.nim");
					{
						NIM_BOOL LOC29;
						nimln(51, "treetab.nim");
						nimln(51, "treetab.nim");
						if (((TMP3210[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3211));
						if ((NU)(i_252439) >= (NU)((*a).kindU.S6.Sons->Sup.len)) raiseIndexError();
						if (((TMP3210[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3211));
						if ((NU)(i_252439) >= (NU)((*b).kindU.S6.Sons->Sup.len)) raiseIndexError();
						LOC29 = 0;
						LOC29 = treesequivalent_252223((*a).kindU.S6.Sons->data[i_252439], (*b).kindU.S6.Sons->data[i_252439]);
						if (!!(LOC29)) goto LA30;
						nimln(51, "treetab.nim");
						goto BeforeRet;
					}
					LA30: ;
					nimln(1454, "system.nim");
					res_252470 = addInt(res_252470, 1);
				} LA26: ;
				nimln(52, "treetab.nim");
				result = NIM_TRUE;
			}
			LA23: ;
		}
		break;
		}
		nimln(53, "treetab.nim");
		{
			if (!result) goto LA34;
			nimln(53, "treetab.nim");
			result = sametypeornil_233151((*a).Typ, (*b).Typ, 0);
		}
		LA34: ;
	}
	goto LA1;
	LA10: ;
	LA1: ;
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #19
0
ファイル: nimsets.c プロジェクト: reactormonk/csources
N_NIMCALL(NI64, cardset_243063)(tnode186813* s) {
	NI64 result;
	NI i_243904;
	NI HEX3Atmp_244000;
	NI LOC1;
	NI TMP3163;
	NI res_244002;
	nimfr("cardSet", "nimsets.nim")
	result = 0;
	nimln(153, "nimsets.nim");
	result = 0;
	i_243904 = 0;
	HEX3Atmp_244000 = 0;
	nimln(154, "nimsets.nim");
	nimln(154, "nimsets.nim");
	nimln(154, "nimsets.nim");
	LOC1 = 0;
	LOC1 = sonslen_187191(s);
	TMP3163 = subInt(LOC1, 1);
	HEX3Atmp_244000 = (NI64)(TMP3163);
	nimln(1450, "system.nim");
	res_244002 = 0;
	nimln(1451, "system.nim");
	while (1) {
		nimln(1451, "system.nim");
		if (!(res_244002 <= HEX3Atmp_244000)) goto LA2;
		nimln(1450, "system.nim");
		i_243904 = res_244002;
		nimln(155, "nimsets.nim");
		{
			NI64 LOC7;
			NI64 TMP3164;
			NI64 LOC8;
			NI64 TMP3165;
			NI64 TMP3166;
			nimln(155, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243904) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*s).kindU.S6.Sons->data[i_243904]).Kind == ((NU8) 44))) goto LA5;
			nimln(156, "nimsets.nim");
			nimln(157, "nimsets.nim");
			nimln(156, "nimsets.nim");
			nimln(156, "nimsets.nim");
			nimln(156, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243904) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243904]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243904]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(1) >= (NU)((*(*s).kindU.S6.Sons->data[i_243904]).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC7 = 0;
			LOC7 = getordvalue_222150((*(*s).kindU.S6.Sons->data[i_243904]).kindU.S6.Sons->data[1]);
			TMP3164 = addInt64(result, LOC7);
			nimln(157, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243904) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243904]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243904]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*(*s).kindU.S6.Sons->data[i_243904]).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC8 = 0;
			LOC8 = getordvalue_222150((*(*s).kindU.S6.Sons->data[i_243904]).kindU.S6.Sons->data[0]);
			TMP3165 = subInt64((NI64)(TMP3164), LOC8);
			TMP3166 = addInt64((NI64)(TMP3165), 1);
			result = (NI64)(TMP3166);
		}
		goto LA3;
		LA5: ;
		{
			nimln(159, "nimsets.nim");
			result = addInt64(result, 1);
		}
		LA3: ;
		nimln(1453, "system.nim");
		res_244002 = addInt(res_244002, 1);
	} LA2: ;
	popFrame();
	return result;
}
コード例 #20
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(tnode191813*, semnodekindconstraints_280472)(tnode191813* p) {
	tnode191813* result;
	nimfr("semNodeKindConstraints", "parampatterns.nim")
	result = 0;
	nimln(120, "parampatterns.nim");
	{
		nimln(120, "parampatterns.nim");
		nimln(120, "parampatterns.nim");
		if (!!(((*p).Kind == ((NU8) 40)))) goto LA3;
		nimln(120, "parampatterns.nim");
		failedassertimpl_80621(((NimStringDesc*) &TMP3591));
	}
	LA3: ;
	nimln(121, "parampatterns.nim");
	result = newnodei_192109(((NU8) 20), (*p).Info);
	nimln(122, "parampatterns.nim");
	if (!(((TMP3568[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
	nimln(122, "parampatterns.nim");
	asgnRefNoCycle((void**) &(*result).kindU.S3.Strval, rawNewString(10));
	nimln(123, "parampatterns.nim");
	if (!(((TMP3568[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
	(*result).kindU.S3.Strval = addChar((*result).kindU.S3.Strval, 1);
	nimln(124, "parampatterns.nim");
	{
		NI LOC7;
		NI i_280667;
		NI HEX3Atmp_280727;
		NI LOC10;
		NI res_280729;
		nimln(124, "parampatterns.nim");
		nimln(124, "parampatterns.nim");
		LOC7 = 0;
		LOC7 = len_192274(p);
		if (!(2 <= LOC7)) goto LA8;
		i_280667 = 0;
		HEX3Atmp_280727 = 0;
		nimln(125, "parampatterns.nim");
		nimln(125, "parampatterns.nim");
		nimln(125, "parampatterns.nim");
		LOC10 = 0;
		LOC10 = len_192274(p);
		HEX3Atmp_280727 = subInt(LOC10, 1);
		nimln(1458, "system.nim");
		res_280729 = 1;
		nimln(1459, "system.nim");
		while (1) {
			nimln(1459, "system.nim");
			if (!(res_280729 <= HEX3Atmp_280727)) goto LA11;
			nimln(1458, "system.nim");
			i_280667 = res_280729;
			nimln(126, "parampatterns.nim");
			if (((TMP3570[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(i_280667) >= (NU)((*p).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!(((TMP3568[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
			compileconstraints_280106((*p).kindU.S6.Sons->data[i_280667], &(*result).kindU.S3.Strval);
			nimln(1461, "system.nim");
			res_280729 = addInt(res_280729, 1);
		} LA11: ;
		nimln(127, "parampatterns.nim");
		{
			nimln(127, "parampatterns.nim");
			nimln(127, "parampatterns.nim");
			if (!(((TMP3568[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
			if (!(63 < (*result).kindU.S3.Strval->Sup.len)) goto LA14;
			nimln(128, "parampatterns.nim");
			internalerror_168591((*p).Info, ((NimStringDesc*) &TMP3592));
		}
		LA14: ;
	}
	goto LA5;
	LA8: ;
	{
		nimln(130, "parampatterns.nim");
		patternerror_280040(p);
	}
	LA5: ;
	nimln(131, "parampatterns.nim");
	if (!(((TMP3568[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
	add_280046(&(*result).kindU.S3.Strval, ((NU8) 1));
	popFrame();
	return result;
}
コード例 #21
0
ファイル: nimsets.c プロジェクト: reactormonk/csources
N_NIMCALL(NIM_BOOL, overlap_243008)(tnode186813* a, tnode186813* b) {
	NIM_BOOL result;
	nimfr("overlap", "nimsets.nim")
	result = 0;
	nimln(48, "nimsets.nim");
	{
		nimln(48, "nimsets.nim");
		if (!((*a).Kind == ((NU8) 44))) goto LA3;
		nimln(49, "nimsets.nim");
		{
			NIM_BOOL LOC9;
			nimln(49, "nimsets.nim");
			if (!((*b).Kind == ((NU8) 44))) goto LA7;
			nimln(51, "nimsets.nim");
			nimln(51, "nimsets.nim");
			LOC9 = 0;
			nimln(51, "nimsets.nim");
			if (((TMP3150[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*a).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (((TMP3150[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(1) >= (NU)((*b).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC9 = levalue_195404((*a).kindU.S6.Sons->data[0], (*b).kindU.S6.Sons->data[1]);
			if (!(LOC9)) goto LA10;
			nimln(52, "nimsets.nim");
			if (((TMP3150[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*b).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (((TMP3150[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(1) >= (NU)((*a).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC9 = levalue_195404((*b).kindU.S6.Sons->data[0], (*a).kindU.S6.Sons->data[1]);
			LA10: ;
			result = LOC9;
		}
		goto LA5;
		LA7: ;
		{
			NIM_BOOL LOC12;
			nimln(54, "nimsets.nim");
			nimln(54, "nimsets.nim");
			LOC12 = 0;
			nimln(54, "nimsets.nim");
			if (((TMP3150[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*a).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC12 = levalue_195404((*a).kindU.S6.Sons->data[0], b);
			if (!(LOC12)) goto LA13;
			nimln(54, "nimsets.nim");
			if (((TMP3150[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(1) >= (NU)((*a).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC12 = levalue_195404(b, (*a).kindU.S6.Sons->data[1]);
			LA13: ;
			result = LOC12;
		}
		LA5: ;
	}
	goto LA1;
	LA3: ;
	{
		nimln(56, "nimsets.nim");
		{
			NIM_BOOL LOC19;
			nimln(56, "nimsets.nim");
			if (!((*b).Kind == ((NU8) 44))) goto LA17;
			nimln(57, "nimsets.nim");
			nimln(57, "nimsets.nim");
			LOC19 = 0;
			nimln(57, "nimsets.nim");
			if (((TMP3150[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*b).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC19 = levalue_195404((*b).kindU.S6.Sons->data[0], a);
			if (!(LOC19)) goto LA20;
			nimln(57, "nimsets.nim");
			if (((TMP3150[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(1) >= (NU)((*b).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC19 = levalue_195404(a, (*b).kindU.S6.Sons->data[1]);
			LA20: ;
			result = LOC19;
		}
		goto LA15;
		LA17: ;
		{
			nimln(59, "nimsets.nim");
			result = samevalue_195271(a, b);
		}
		LA15: ;
	}
	LA1: ;
	popFrame();
	return result;
}
コード例 #22
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(NU8, checkforsideeffects_280740)(tnode191813* n) {
	NU8 result;
	nimfr("checkForSideEffects", "parampatterns.nim")
	result = 0;
	nimln(139, "parampatterns.nim");
	switch ((*n).Kind) {
	case ((NU8) 27):
	case ((NU8) 29):
	case ((NU8) 30):
	case ((NU8) 31):
	case ((NU8) 26):
	case ((NU8) 28):
	case ((NU8) 32):
	{
		tnode191813* op;
		NI i_280844;
		NI HEX3Atmp_280951;
		NI LOC16;
		NI res_280953;
		nimln(142, "parampatterns.nim");
		if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		op = (*n).kindU.S6.Sons->data[0];
		nimln(143, "parampatterns.nim");
		{
			NIM_BOOL LOC4;
			tsym191843* s;
			nimln(143, "parampatterns.nim");
			LOC4 = 0;
			nimln(143, "parampatterns.nim");
			LOC4 = ((*op).Kind == ((NU8) 3));
			if (!(LOC4)) goto LA5;
			nimln(143, "parampatterns.nim");
			if (!(((TMP3593[(*op).Kind/8] &(1<<((*op).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
			LOC4 = isroutine_198040((*op).kindU.S4.Sym);
			LA5: ;
			if (!LOC4) goto LA6;
			nimln(144, "parampatterns.nim");
			if (!(((TMP3593[(*op).Kind/8] &(1<<((*op).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
			s = (*op).kindU.S4.Sym;
			nimln(145, "parampatterns.nim");
			{
				nimln(145, "parampatterns.nim");
				if (!(((*s).Flags &(1<<((((NU8) 11))&31)))!=0)) goto LA10;
				nimln(146, "parampatterns.nim");
				nimln(146, "parampatterns.nim");
				result = ((NU8) 1);
				goto BeforeRet;
			}
			LA10: ;
			nimln(148, "parampatterns.nim");
			result = ((NU8) 2);
		}
		goto LA2;
		LA6: ;
		{
			nimln(149, "parampatterns.nim");
			if (!(((*(*op).Typ).Flags &(1<<((((NU8) 1))&31)))!=0)) goto LA13;
			nimln(151, "parampatterns.nim");
			result = ((NU8) 2);
		}
		goto LA2;
		LA13: ;
		{
			nimln(154, "parampatterns.nim");
			nimln(154, "parampatterns.nim");
			result = ((NU8) 1);
			goto BeforeRet;
		}
		LA2: ;
		i_280844 = 0;
		HEX3Atmp_280951 = 0;
		nimln(156, "parampatterns.nim");
		nimln(156, "parampatterns.nim");
		nimln(156, "parampatterns.nim");
		LOC16 = 0;
		LOC16 = len_192274(n);
		HEX3Atmp_280951 = subInt(LOC16, 1);
		nimln(1458, "system.nim");
		res_280953 = 0;
		nimln(1459, "system.nim");
		while (1) {
			NU8 ret;
			nimln(1459, "system.nim");
			if (!(res_280953 <= HEX3Atmp_280951)) goto LA17;
			nimln(1458, "system.nim");
			i_280844 = res_280953;
			nimln(157, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(i_280844) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			ret = checkforsideeffects_280740((*n).kindU.S6.Sons->data[i_280844]);
			nimln(158, "parampatterns.nim");
			{
				nimln(158, "parampatterns.nim");
				if (!(ret == ((NU8) 1))) goto LA20;
				nimln(158, "parampatterns.nim");
				nimln(158, "parampatterns.nim");
				result = ret;
				goto BeforeRet;
			}
			goto LA18;
			LA20: ;
			{
				NIM_BOOL LOC23;
				nimln(159, "parampatterns.nim");
				LOC23 = 0;
				nimln(159, "parampatterns.nim");
				LOC23 = (ret == ((NU8) 0));
				if (!(LOC23)) goto LA24;
				nimln(159, "parampatterns.nim");
				LOC23 = (result == ((NU8) 2));
				LA24: ;
				if (!LOC23) goto LA25;
				nimln(160, "parampatterns.nim");
				result = ((NU8) 0);
			}
			goto LA18;
			LA25: ;
			LA18: ;
			nimln(1461, "system.nim");
			res_280953 = addInt(res_280953, 1);
		} LA17: ;
	}
	break;
	case ((NU8) 0) ... ((NU8) 23):
	{
		nimln(163, "parampatterns.nim");
		result = ((NU8) 2);
	}
	break;
	default:
	{
		NI i_280908;
		NI HEX3Atmp_280955;
		NI LOC29;
		NI res_280957;
		i_280908 = 0;
		HEX3Atmp_280955 = 0;
		nimln(165, "parampatterns.nim");
		nimln(165, "parampatterns.nim");
		nimln(165, "parampatterns.nim");
		LOC29 = 0;
		LOC29 = len_192274(n);
		HEX3Atmp_280955 = subInt(LOC29, 1);
		nimln(1458, "system.nim");
		res_280957 = 0;
		nimln(1459, "system.nim");
		while (1) {
			NU8 ret;
			nimln(1459, "system.nim");
			if (!(res_280957 <= HEX3Atmp_280955)) goto LA30;
			nimln(1458, "system.nim");
			i_280908 = res_280957;
			nimln(166, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(i_280908) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			ret = checkforsideeffects_280740((*n).kindU.S6.Sons->data[i_280908]);
			nimln(167, "parampatterns.nim");
			{
				nimln(167, "parampatterns.nim");
				if (!(ret == ((NU8) 1))) goto LA33;
				nimln(167, "parampatterns.nim");
				nimln(167, "parampatterns.nim");
				result = ret;
				goto BeforeRet;
			}
			goto LA31;
			LA33: ;
			{
				NIM_BOOL LOC36;
				nimln(168, "parampatterns.nim");
				LOC36 = 0;
				nimln(168, "parampatterns.nim");
				LOC36 = (ret == ((NU8) 0));
				if (!(LOC36)) goto LA37;
				nimln(168, "parampatterns.nim");
				LOC36 = (result == ((NU8) 2));
				LA37: ;
				if (!LOC36) goto LA38;
				nimln(169, "parampatterns.nim");
				result = ((NU8) 0);
			}
			goto LA31;
			LA38: ;
			LA31: ;
			nimln(1461, "system.nim");
			res_280957 = addInt(res_280957, 1);
		} LA30: ;
	}
	break;
	}
	BeforeRet: ;
	popFrame();
	return result;
}
コード例 #23
0
ファイル: nimsets.c プロジェクト: reactormonk/csources
N_NIMCALL(void, tobitset_243002)(tnode186813* s, tbitset242012** b) {
	NI64 first;
	NI64 j;
	NI64 LOC1;
	NI i_243558;
	NI HEX3Atmp_243671;
	NI LOC2;
	NI TMP3155;
	NI res_243673;
	nimfr("toBitSet", "nimsets.nim")
	first = 0;
	j = 0;
	nimln(79, "nimsets.nim");
	if ((NU)(0) >= (NU)((*(*s).Typ).Sons->Sup.len)) raiseIndexError();
	first = firstord_222002((*(*s).Typ).Sons->data[0]);
	nimln(80, "nimsets.nim");
	nimln(80, "nimsets.nim");
	LOC1 = 0;
	LOC1 = getsize_222158((*s).Typ);
	bitsetinit_242017(b, ((NI) (LOC1)));
	i_243558 = 0;
	HEX3Atmp_243671 = 0;
	nimln(81, "nimsets.nim");
	nimln(81, "nimsets.nim");
	nimln(81, "nimsets.nim");
	LOC2 = 0;
	LOC2 = sonslen_187191(s);
	TMP3155 = subInt(LOC2, 1);
	HEX3Atmp_243671 = (NI64)(TMP3155);
	nimln(1450, "system.nim");
	res_243673 = 0;
	nimln(1451, "system.nim");
	while (1) {
		nimln(1451, "system.nim");
		if (!(res_243673 <= HEX3Atmp_243671)) goto LA3;
		nimln(1450, "system.nim");
		i_243558 = res_243673;
		nimln(82, "nimsets.nim");
		{
			nimln(82, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243558) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!((*(*s).kindU.S6.Sons->data[i_243558]).Kind == ((NU8) 44))) goto LA6;
			nimln(83, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243558) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243558]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243558]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(0) >= (NU)((*(*s).kindU.S6.Sons->data[i_243558]).kindU.S6.Sons->Sup.len)) raiseIndexError();
			j = getordvalue_222150((*(*s).kindU.S6.Sons->data[i_243558]).kindU.S6.Sons->data[0]);
			nimln(84, "nimsets.nim");
			while (1) {
				NI64 LOC9;
				NI64 TMP3156;
				nimln(84, "nimsets.nim");
				nimln(84, "nimsets.nim");
				if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(i_243558) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
				if (((TMP3150[(*(*s).kindU.S6.Sons->data[i_243558]).Kind/8] &(1<<((*(*s).kindU.S6.Sons->data[i_243558]).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
				if ((NU)(1) >= (NU)((*(*s).kindU.S6.Sons->data[i_243558]).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC9 = 0;
				LOC9 = getordvalue_222150((*(*s).kindU.S6.Sons->data[i_243558]).kindU.S6.Sons->data[1]);
				if (!(j <= LOC9)) goto LA8;
				nimln(85, "nimsets.nim");
				nimln(85, "nimsets.nim");
				TMP3156 = subInt64(j, first);
				bitsetincl_242047(b, (NI64)(TMP3156));
				nimln(86, "nimsets.nim");
				j = addInt64(j, 1);
			} LA8: ;
		}
		goto LA4;
		LA6: ;
		{
			NI64 LOC11;
			NI64 TMP3157;
			nimln(88, "nimsets.nim");
			nimln(88, "nimsets.nim");
			nimln(88, "nimsets.nim");
			if (((TMP3150[(*s).Kind/8] &(1<<((*s).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3151));
			if ((NU)(i_243558) >= (NU)((*s).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC11 = 0;
			LOC11 = getordvalue_222150((*s).kindU.S6.Sons->data[i_243558]);
			TMP3157 = subInt64(LOC11, first);
			bitsetincl_242047(b, (NI64)(TMP3157));
		}
		LA4: ;
		nimln(1453, "system.nim");
		res_243673 = addInt(res_243673, 1);
	} LA3: ;
	popFrame();
}
コード例 #24
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(NU8, isassignable_280970)(tsym191843* owner, tnode191813* n) {
	NU8 result;
	nimfr("isAssignable", "parampatterns.nim")
	result = 0;
	nimln(181, "parampatterns.nim");
	result = ((NU8) 0);
	nimln(182, "parampatterns.nim");
	switch ((*n).Kind) {
	case ((NU8) 3):
	{
		nimln(185, "parampatterns.nim");
		{
			nimln(185, "parampatterns.nim");
			if (!(((TMP3593[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
			if (!((2336 &(1<<(((*(*n).kindU.S4.Sym).Kind)&31)))!=0)) goto LA4;
			nimln(186, "parampatterns.nim");
			{
				NIM_BOOL LOC8;
				NIM_BOOL LOC9;
				nimln(186, "parampatterns.nim");
				LOC8 = 0;
				nimln(186, "parampatterns.nim");
				LOC9 = 0;
				nimln(186, "parampatterns.nim");
				nimln(186, "parampatterns.nim");
				LOC9 = !((owner == NIM_NIL));
				if (!(LOC9)) goto LA10;
				nimln(186, "parampatterns.nim");
				if (!(((TMP3593[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
				LOC9 = ((*owner).Sup.Id == (*(*(*n).kindU.S4.Sym).Owner).Sup.Id);
				LA10: ;
				LOC8 = LOC9;
				if (!(LOC8)) goto LA11;
				nimln(187, "parampatterns.nim");
				nimln(187, "parampatterns.nim");
				if (!(((TMP3593[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
				LOC8 = !((((*(*n).kindU.S4.Sym).Flags &(1<<((((NU8) 3))&31)))!=0));
				LA11: ;
				if (!LOC8) goto LA12;
				nimln(188, "parampatterns.nim");
				result = ((NU8) 2);
			}
			goto LA6;
			LA12: ;
			{
				nimln(190, "parampatterns.nim");
				result = ((NU8) 1);
			}
			LA6: ;
		}
		LA4: ;
	}
	break;
	case ((NU8) 45):
	{
		nimln(192, "parampatterns.nim");
		{
			ttype191847* LOC18;
			nimln(192, "parampatterns.nim");
			nimln(192, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC18 = 0;
			LOC18 = skiptypes_195793((*(*n).kindU.S6.Sons->data[0]).Typ, IL64(211106232576000));
			if (!((*LOC18).Kind == ((NU8) 23) || (*LOC18).Kind == ((NU8) 21) || (*LOC18).Kind == ((NU8) 22))) goto LA19;
			nimln(194, "parampatterns.nim");
			result = ((NU8) 1);
		}
		goto LA16;
		LA19: ;
		{
			nimln(196, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[0]);
		}
		LA16: ;
		nimln(197, "parampatterns.nim");
		{
			NIM_BOOL LOC24;
			nimln(197, "parampatterns.nim");
			LOC24 = 0;
			nimln(197, "parampatterns.nim");
			nimln(197, "parampatterns.nim");
			LOC24 = !((result == ((NU8) 0)));
			if (!(LOC24)) goto LA25;
			nimln(197, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!(((TMP3593[(*(*n).kindU.S6.Sons->data[1]).Kind/8] &(1<<((*(*n).kindU.S6.Sons->data[1]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
			LOC24 = (((*(*(*n).kindU.S6.Sons->data[1]).kindU.S4.Sym).Flags &(1<<((((NU8) 18))&31)))!=0);
			LA25: ;
			if (!LOC24) goto LA26;
			nimln(198, "parampatterns.nim");
			result = ((NU8) 3);
		}
		LA26: ;
	}
	break;
	case ((NU8) 42):
	{
		nimln(200, "parampatterns.nim");
		{
			ttype191847* LOC31;
			nimln(200, "parampatterns.nim");
			nimln(200, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC31 = 0;
			LOC31 = skiptypes_195793((*(*n).kindU.S6.Sons->data[0]).Typ, IL64(211106232576000));
			if (!((*LOC31).Kind == ((NU8) 23) || (*LOC31).Kind == ((NU8) 21) || (*LOC31).Kind == ((NU8) 22))) goto LA32;
			nimln(202, "parampatterns.nim");
			result = ((NU8) 1);
		}
		goto LA29;
		LA32: ;
		{
			nimln(204, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[0]);
		}
		LA29: ;
	}
	break;
	case ((NU8) 58):
	case ((NU8) 59):
	case ((NU8) 60):
	{
		nimln(208, "parampatterns.nim");
		{
			ttype191847* LOC38;
			nimln(208, "parampatterns.nim");
			nimln(208, "parampatterns.nim");
			LOC38 = 0;
			LOC38 = skiptypes_195793((*n).Typ, IL64(211106247256064));
			if (!((*LOC38).Kind == ((NU8) 27) || (*LOC38).Kind == ((NU8) 18) || (*LOC38).Kind == ((NU8) 17))) goto LA39;
			nimln(210, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[1]);
		}
		goto LA36;
		LA39: ;
		{
			NIM_BOOL LOC42;
			nimln(211, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			LOC42 = 0;
			LOC42 = comparetypes_234564((*n).Typ, (*(*n).kindU.S6.Sons->data[1]).Typ, ((NU8) 1), 0);
			if (!LOC42) goto LA43;
			nimln(213, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[1]);
		}
		goto LA36;
		LA43: ;
		LA36: ;
	}
	break;
	case ((NU8) 65):
	case ((NU8) 47):
	{
		nimln(215, "parampatterns.nim");
		result = ((NU8) 1);
	}
	break;
	case ((NU8) 67):
	case ((NU8) 66):
	case ((NU8) 46):
	{
		nimln(217, "parampatterns.nim");
		if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[0]);
	}
	break;
	case ((NU8) 27):
	case ((NU8) 29):
	case ((NU8) 30):
	case ((NU8) 31):
	case ((NU8) 26):
	case ((NU8) 28):
	case ((NU8) 32):
	{
		nimln(220, "parampatterns.nim");
		{
			NU16 LOC50;
			nimln(220, "parampatterns.nim");
			nimln(220, "parampatterns.nim");
			LOC50 = 0;
			LOC50 = getmagic_225775(n);
			if (!(LOC50 == ((NU16) 151))) goto LA51;
			nimln(220, "parampatterns.nim");
			if (((TMP3570[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP3571));
			if ((NU)(1) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			result = isassignable_280970(owner, (*n).kindU.S6.Sons->data[1]);
		}
		LA51: ;
	}
	break;
	default:
	{
	}
	break;
	}
	popFrame();
	return result;
}
コード例 #25
0
N_NIMCALL(NU8, ispartof_325356)(tnode171659* a, tnode171659* b) {
	NU8 result;
	nimfr("isPartOf", "aliases.nim")
	result = 0;
	nimln(94, "aliases.nim");
	{
		nimln(94, "aliases.nim");
		if (!((*a).Kind == (*b).Kind)) goto LA3;
		nimln(95, "aliases.nim");
		switch ((*a).Kind) {
		case ((NU8) 3):
		{
			nimln(99, "aliases.nim");
			{
				nimln(99, "aliases.nim");
				if (!(((TMP5037[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
				if (!(((TMP5037[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
				if (!((*(*a).kindU.S4.Sym).Sup.Id == (*(*b).kindU.S4.Sym).Sup.Id)) goto LA8;
				nimln(99, "aliases.nim");
				result = ((NU8) 2);
			}			goto LA6;
			LA8: ;
			{
				NIM_BOOL LOC11;
				nimln(100, "aliases.nim");
				LOC11 = 0;
				nimln(730, "system.nim");
				if (!(((TMP5037[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
				LOC11 = ((4384 &(1<<(((*(*a).kindU.S4.Sym).Kind)&31)))!=0);
				if (LOC11) goto LA12;
				nimln(730, "system.nim");
				if (!(((TMP5037[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
				LOC11 = ((4384 &(1<<(((*(*b).kindU.S4.Sym).Kind)&31)))!=0);
				LA12: ;
				if (!LOC11) goto LA13;
				nimln(103, "aliases.nim");
				result = ((NU8) 0);
			}			goto LA6;
			LA13: ;
			{
				nimln(106, "aliases.nim");
				{
					NU8 LOC18;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					nimln(106, "aliases.nim");
					if (!(((TMP5037[(*a).Kind/8] &(1<<((*a).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
					if (!(((TMP5037[(*b).Kind/8] &(1<<((*b).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
					LOC18 = 0;
					LOC18 = ispartof_325347((*(*a).kindU.S4.Sym).Typ, (*(*b).kindU.S4.Sym).Typ);
					if (!!((LOC18 == ((NU8) 0)))) goto LA19;
					nimln(107, "aliases.nim");
					result = ((NU8) 1);
				}				LA19: ;
			}			LA6: ;
		}		break;
		case ((NU8) 42):
		{
			tnode171659* LOC22;
			tnode171659* LOC23;
			nimln(109, "aliases.nim");
			nimln(109, "aliases.nim");
			LOC22 = 0;
			LOC22 = HEX5BHEX5D_172475(a, 0);
			nimln(109, "aliases.nim");
			LOC23 = 0;
			LOC23 = HEX5BHEX5D_172475(b, 0);
			result = ispartof_325356(LOC22, LOC23);
			nimln(110, "aliases.nim");
			{
				NIM_BOOL LOC26;
				NI LOC27;
				NI LOC29;
				nimln(110, "aliases.nim");
				LOC26 = 0;
				nimln(702, "system.nim");
				nimln(110, "aliases.nim");
				LOC27 = 0;
				LOC27 = len_172102(a);
				LOC26 = (2 <= LOC27);
				if (!(LOC26)) goto LA28;
				nimln(702, "system.nim");
				nimln(110, "aliases.nim");
				LOC29 = 0;
				LOC29 = len_172102(b);
				LOC26 = (2 <= LOC29);
				LA28: ;
				if (!LOC26) goto LA30;
				nimln(112, "aliases.nim");
				{
					NIM_BOOL LOC34;
					NIM_BOOL LOC35;
					tnode171659* LOC37;
					tnode171659* LOC39;
					tnode171659* x;
					tnode171659* y;
					nimln(112, "aliases.nim");
					LOC34 = 0;
					nimln(112, "aliases.nim");
					LOC35 = 0;
					nimln(112, "aliases.nim");
					LOC35 = (result == ((NU8) 2));
					if (!(LOC35)) goto LA36;
					nimln(112, "aliases.nim");
					nimln(112, "aliases.nim");
					LOC37 = 0;
					LOC37 = HEX5BHEX5D_172475(a, 1);
					LOC35 = isdeepconstexpr_198696(LOC37);
					LA36: ;
					LOC34 = LOC35;
					if (!(LOC34)) goto LA38;
					nimln(112, "aliases.nim");
					nimln(112, "aliases.nim");
					LOC39 = 0;
					LOC39 = HEX5BHEX5D_172475(b, 1);
					LOC34 = isdeepconstexpr_198696(LOC39);
					LA38: ;
					if (!LOC34) goto LA40;
					nimln(115, "aliases.nim");
					nimln(115, "aliases.nim");
					{
						tnode171659* LOC44;
						tnode171659* LOC47;
						nimln(115, "aliases.nim");
						nimln(115, "aliases.nim");
						LOC44 = 0;
						LOC44 = HEX5BHEX5D_172475(a, 1);
						if (!((*LOC44).Kind == ((NU8) 58))) goto LA45;
						nimln(115, "aliases.nim");
						nimln(115, "aliases.nim");
						LOC47 = 0;
						LOC47 = HEX5BHEX5D_172475(a, 1);
						x = HEX5BHEX5D_172475(LOC47, 1);
					}					goto LA42;
					LA45: ;
					{
						nimln(115, "aliases.nim");
						x = HEX5BHEX5D_172475(a, 1);
					}					LA42: ;
					nimln(116, "aliases.nim");
					nimln(116, "aliases.nim");
					{
						tnode171659* LOC51;
						tnode171659* LOC54;
						nimln(116, "aliases.nim");
						nimln(116, "aliases.nim");
						LOC51 = 0;
						LOC51 = HEX5BHEX5D_172475(b, 1);
						if (!((*LOC51).Kind == ((NU8) 58))) goto LA52;
						nimln(116, "aliases.nim");
						nimln(116, "aliases.nim");
						LOC54 = 0;
						LOC54 = HEX5BHEX5D_172475(b, 1);
						y = HEX5BHEX5D_172475(LOC54, 1);
					}					goto LA49;
					LA52: ;
					{
						nimln(116, "aliases.nim");
						y = HEX5BHEX5D_172475(b, 1);
					}					LA49: ;
					nimln(118, "aliases.nim");
					{
						NIM_BOOL LOC58;
						nimln(118, "aliases.nim");
						LOC58 = 0;
						LOC58 = samevalue_178269(x, y);
						if (!LOC58) goto LA59;
						nimln(118, "aliases.nim");
						result = ((NU8) 2);
					}					goto LA56;
					LA59: ;
					{
						nimln(119, "aliases.nim");
						result = ((NU8) 0);
					}					LA56: ;
				}				LA40: ;
			}			goto LA24;
			LA30: ;
			{
				nimln(123, "aliases.nim");
				{
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					if (!!((result == ((NU8) 2)))) goto LA65;
					nimln(124, "aliases.nim");
					{
						NU8 LOC69;
						nimln(698, "system.nim");
						nimln(698, "system.nim");
						nimln(124, "aliases.nim");
						LOC69 = 0;
						LOC69 = ispartof_325347((*a).Typ, (*b).Typ);
						if (!!((LOC69 == ((NU8) 0)))) goto LA70;
						nimln(124, "aliases.nim");
						result = ((NU8) 1);
					}					LA70: ;
				}				LA65: ;
			}			LA24: ;
		}		break;
		case ((NU8) 45):
		{
			tnode171659* LOC73;
			tnode171659* LOC74;
			nimln(127, "aliases.nim");
			nimln(127, "aliases.nim");
			LOC73 = 0;
			LOC73 = HEX5BHEX5D_172475(a, 0);
			nimln(127, "aliases.nim");
			LOC74 = 0;
			LOC74 = HEX5BHEX5D_172475(b, 0);
			result = ispartof_325356(LOC73, LOC74);
			nimln(128, "aliases.nim");
			{
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				if (!!((result == ((NU8) 0)))) goto LA77;
				nimln(130, "aliases.nim");
				{
					tnode171659* LOC81;
					tnode171659* LOC82;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					nimln(130, "aliases.nim");
					LOC81 = 0;
					LOC81 = HEX5BHEX5D_172475(a, 1);
					if (!(((TMP5037[(*LOC81).Kind/8] &(1<<((*LOC81).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
					nimln(130, "aliases.nim");
					LOC82 = 0;
					LOC82 = HEX5BHEX5D_172475(b, 1);
					if (!(((TMP5037[(*LOC82).Kind/8] &(1<<((*LOC82).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5038));
					if (!!(((*(*LOC81).kindU.S4.Sym).Sup.Id == (*(*LOC82).kindU.S4.Sym).Sup.Id))) goto LA83;
					nimln(131, "aliases.nim");
					result = ((NU8) 0);
				}				LA83: ;
			}			LA77: ;
		}		break;
		case ((NU8) 65):
		case ((NU8) 47):
		{
			tnode171659* LOC86;
			tnode171659* LOC87;
			nimln(134, "aliases.nim");
			nimln(134, "aliases.nim");
			LOC86 = 0;
			LOC86 = HEX5BHEX5D_172475(a, 0);
			nimln(134, "aliases.nim");
			LOC87 = 0;
			LOC87 = HEX5BHEX5D_172475(b, 0);
			result = ispartof_325356(LOC86, LOC87);
			nimln(136, "aliases.nim");
			{
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				if (!!((result == ((NU8) 2)))) goto LA90;
				nimln(137, "aliases.nim");
				{
					NU8 LOC94;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					nimln(137, "aliases.nim");
					LOC94 = 0;
					LOC94 = ispartof_325347((*a).Typ, (*b).Typ);
					if (!!((LOC94 == ((NU8) 0)))) goto LA95;
					nimln(137, "aliases.nim");
					result = ((NU8) 1);
				}				LA95: ;
			}			LA90: ;
		}		break;
		case ((NU8) 58):
		case ((NU8) 59):
		case ((NU8) 60):
		{
			tnode171659* LOC98;
			tnode171659* LOC99;
			nimln(140, "aliases.nim");
			nimln(140, "aliases.nim");
			LOC98 = 0;
			LOC98 = HEX5BHEX5D_172475(a, 1);
			nimln(140, "aliases.nim");
			LOC99 = 0;
			LOC99 = HEX5BHEX5D_172475(b, 1);
			result = ispartof_325356(LOC98, LOC99);
		}		break;
		case ((NU8) 67):
		case ((NU8) 66):
		case ((NU8) 46):
		{
			tnode171659* LOC101;
			tnode171659* LOC102;
			nimln(142, "aliases.nim");
			nimln(142, "aliases.nim");
			LOC101 = 0;
			LOC101 = HEX5BHEX5D_172475(a, 0);
			nimln(142, "aliases.nim");
			LOC102 = 0;
			LOC102 = HEX5BHEX5D_172475(b, 0);
			result = ispartof_325356(LOC101, LOC102);
		}		break;
		default:
		{
		}		break;
		}
	}	goto LA1;
	LA3: ;
	{
		nimln(152, "aliases.nim");
		switch ((*b).Kind) {
		case ((NU8) 45):
		case ((NU8) 42):
		case ((NU8) 67):
		case ((NU8) 66):
		case ((NU8) 46):
		{
			tnode171659* LOC106;
			nimln(155, "aliases.nim");
			nimln(155, "aliases.nim");
			LOC106 = 0;
			LOC106 = HEX5BHEX5D_172475(b, 0);
			result = ispartof_325356(a, LOC106);
		}		break;
		case ((NU8) 65):
		case ((NU8) 47):
		{
			nimln(159, "aliases.nim");
			{
				NU8 LOC110;
				tnode171659* LOC113;
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				nimln(159, "aliases.nim");
				LOC110 = 0;
				LOC110 = ispartof_325347((*a).Typ, (*b).Typ);
				if (!!((LOC110 == ((NU8) 0)))) goto LA111;
				nimln(160, "aliases.nim");
				nimln(160, "aliases.nim");
				LOC113 = 0;
				LOC113 = HEX5BHEX5D_172475(b, 0);
				result = ispartof_325356(a, LOC113);
				nimln(161, "aliases.nim");
				{
					nimln(161, "aliases.nim");
					if (!(result == ((NU8) 0))) goto LA116;
					nimln(161, "aliases.nim");
					result = ((NU8) 1);
				}				LA116: ;
			}			LA111: ;
		}		break;
		case ((NU8) 58):
		case ((NU8) 59):
		case ((NU8) 60):
		{
			tnode171659* LOC119;
			nimln(165, "aliases.nim");
			nimln(165, "aliases.nim");
			LOC119 = 0;
			LOC119 = HEX5BHEX5D_172475(b, 1);
			result = ispartof_325356(a, LOC119);
		}		break;
		case ((NU8) 3):
		{
			nimln(169, "aliases.nim");
			switch ((*a).Kind) {
			case ((NU8) 45):
			case ((NU8) 42):
			case ((NU8) 67):
			case ((NU8) 66):
			case ((NU8) 46):
			{
				tnode171659* LOC122;
				nimln(172, "aliases.nim");
				nimln(172, "aliases.nim");
				LOC122 = 0;
				LOC122 = HEX5BHEX5D_172475(a, 0);
				result = ispartof_325356(LOC122, b);
			}			break;
			case ((NU8) 58):
			case ((NU8) 59):
			case ((NU8) 60):
			{
				tnode171659* LOC124;
				nimln(174, "aliases.nim");
				nimln(174, "aliases.nim");
				LOC124 = 0;
				LOC124 = HEX5BHEX5D_172475(a, 1);
				result = ispartof_325356(LOC124, b);
			}			break;
			case ((NU8) 65):
			case ((NU8) 47):
			{
				nimln(177, "aliases.nim");
				{
					NU8 LOC128;
					tnode171659* LOC131;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					nimln(177, "aliases.nim");
					LOC128 = 0;
					LOC128 = ispartof_325347((*a).Typ, (*b).Typ);
					if (!!((LOC128 == ((NU8) 0)))) goto LA129;
					nimln(178, "aliases.nim");
					nimln(178, "aliases.nim");
					LOC131 = 0;
					LOC131 = HEX5BHEX5D_172475(a, 0);
					result = ispartof_325356(LOC131, b);
					nimln(179, "aliases.nim");
					{
						nimln(179, "aliases.nim");
						if (!(result == ((NU8) 0))) goto LA134;
						nimln(179, "aliases.nim");
						result = ((NU8) 1);
					}					LA134: ;
				}				LA129: ;
			}			break;
			default:
			{
			}			break;
			}
		}		break;
		default:
		{
		}		break;
		}
	}	LA1: ;
	popFrame();
	return result;
}N_NOINLINE(void, compileraliasesInit)(void) {
コード例 #26
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(NIM_BOOL, matchnodekinds_281344)(tnode191813* p, tnode191813* n) {
	NIM_BOOL result;
	TY281349 stack;
	NI sp;
	NimStringDesc* code;
	NI pc;
	NI TMP3605;
	nimfr("matchNodeKinds", "parampatterns.nim")
	result = 0;
	nimln(229, "parampatterns.nim");
	stack[(0)- 0] = NIM_TRUE;
	nimln(230, "parampatterns.nim");
	sp = 1;
	nimln(236, "parampatterns.nim");
	if (!(((TMP3568[(*p).Kind/8] &(1<<((*p).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
	code = (*p).kindU.S3.Strval;
	nimln(237, "parampatterns.nim");
	pc = 1;
	nimln(238, "parampatterns.nim");
	while (1) {
		nimln(239, "parampatterns.nim");
		if ((NU)(pc) > (NU)(code->Sup.len)) raiseIndexError();
		switch (((NU8)chckRange(((NU8)(code->data[pc])), ((NU8) 1), ((NU8) 15)))) {
		case ((NU8) 1):
		{
			nimln(240, "parampatterns.nim");
			goto LA1;
		}
		break;
		case ((NU8) 2):
		{
			NI TMP3595;
			NIM_BOOL LOC4;
			NI TMP3596;
			NI TMP3597;
			nimln(242, "parampatterns.nim");
			nimln(242, "parampatterns.nim");
			TMP3595 = subInt(sp, 2);
			if ((NU)((NI32)(TMP3595)) > (NU)(64)) raiseIndexError();
			nimln(242, "parampatterns.nim");
			LOC4 = 0;
			nimln(242, "parampatterns.nim");
			TMP3596 = subInt(sp, 1);
			if ((NU)((NI32)(TMP3596)) > (NU)(64)) raiseIndexError();
			LOC4 = stack[((NI32)(TMP3596))- 0];
			if (LOC4) goto LA5;
			nimln(242, "parampatterns.nim");
			TMP3597 = subInt(sp, 2);
			if ((NU)((NI32)(TMP3597)) > (NU)(64)) raiseIndexError();
			LOC4 = stack[((NI32)(TMP3597))- 0];
			LA5: ;
			stack[((NI32)(TMP3595))- 0] = LOC4;
			nimln(243, "parampatterns.nim");
			sp = subInt(sp, 1);
		}
		break;
		case ((NU8) 3):
		{
			NI TMP3598;
			NIM_BOOL LOC7;
			NI TMP3599;
			NI TMP3600;
			nimln(245, "parampatterns.nim");
			nimln(245, "parampatterns.nim");
			TMP3598 = subInt(sp, 2);
			if ((NU)((NI32)(TMP3598)) > (NU)(64)) raiseIndexError();
			nimln(245, "parampatterns.nim");
			LOC7 = 0;
			nimln(245, "parampatterns.nim");
			TMP3599 = subInt(sp, 1);
			if ((NU)((NI32)(TMP3599)) > (NU)(64)) raiseIndexError();
			LOC7 = stack[((NI32)(TMP3599))- 0];
			if (!(LOC7)) goto LA8;
			nimln(245, "parampatterns.nim");
			TMP3600 = subInt(sp, 2);
			if ((NU)((NI32)(TMP3600)) > (NU)(64)) raiseIndexError();
			LOC7 = stack[((NI32)(TMP3600))- 0];
			LA8: ;
			stack[((NI32)(TMP3598))- 0] = LOC7;
			nimln(246, "parampatterns.nim");
			sp = subInt(sp, 1);
		}
		break;
		case ((NU8) 4):
		{
			NI TMP3601;
			NI TMP3602;
			nimln(247, "parampatterns.nim");
			nimln(247, "parampatterns.nim");
			TMP3601 = subInt(sp, 1);
			if ((NU)((NI32)(TMP3601)) > (NU)(64)) raiseIndexError();
			nimln(247, "parampatterns.nim");
			nimln(247, "parampatterns.nim");
			TMP3602 = subInt(sp, 1);
			if ((NU)((NI32)(TMP3602)) > (NU)(64)) raiseIndexError();
			stack[((NI32)(TMP3601))- 0] = !(stack[((NI32)(TMP3602))- 0]);
		}
		break;
		case ((NU8) 5):
		{
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(248, "parampatterns.nim");
			stack[(sp)- 0] = ((*n).Kind == ((NU8) 3));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 6):
		{
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			stack[(sp)- 0] = isatom_198186(n);
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 7):
		{
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(250, "parampatterns.nim");
			stack[(sp)- 0] = ((*n).Kind >= ((NU8) 5) && (*n).Kind <= ((NU8) 23));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 8):
		{
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(251, "parampatterns.nim");
			stack[(sp)- 0] = ((*n).Kind == ((NU8) 2));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 9):
		{
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(252, "parampatterns.nim");
			stack[(sp)- 0] = ((*n).Kind == ((NU8) 27) || (*n).Kind == ((NU8) 29) || (*n).Kind == ((NU8) 30) || (*n).Kind == ((NU8) 31) || (*n).Kind == ((NU8) 26) || (*n).Kind == ((NU8) 28) || (*n).Kind == ((NU8) 32));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 10):
		{
			NU8 kind;
			NI TMP3603;
			NIM_BOOL LOC16;
			nimln(254, "parampatterns.nim");
			nimln(254, "parampatterns.nim");
			TMP3603 = addInt(pc, 1);
			if ((NU)((NI32)(TMP3603)) > (NU)(code->Sup.len)) raiseIndexError();
			kind = ((NU8)chckRange(((NU8)(code->data[(NI32)(TMP3603)])), ((NU8) 0), ((NU8) 24)));
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(255, "parampatterns.nim");
			LOC16 = 0;
			nimln(255, "parampatterns.nim");
			LOC16 = ((*n).Kind == ((NU8) 3));
			if (!(LOC16)) goto LA17;
			nimln(255, "parampatterns.nim");
			if (!(((TMP3593[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3594));
			LOC16 = ((*(*n).kindU.S4.Sym).Kind == kind);
			LA17: ;
			stack[(sp)- 0] = LOC16;
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
			nimln(256, "parampatterns.nim");
			pc = addInt(pc, 1);
		}
		break;
		case ((NU8) 11):
		{
			NU8 kind;
			NI TMP3604;
			nimln(258, "parampatterns.nim");
			nimln(258, "parampatterns.nim");
			TMP3604 = addInt(pc, 1);
			if ((NU)((NI32)(TMP3604)) > (NU)(code->Sup.len)) raiseIndexError();
			kind = ((NU8)chckRange(((NU8)(code->data[(NI32)(TMP3604)])), ((NU8) 0), ((NU8) 156)));
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(259, "parampatterns.nim");
			stack[(sp)- 0] = ((*n).Kind == kind);
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
			nimln(260, "parampatterns.nim");
			pc = addInt(pc, 1);
		}
		break;
		case ((NU8) 12):
		{
			NU8 LOC20;
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(261, "parampatterns.nim");
			nimln(261, "parampatterns.nim");
			LOC20 = 0;
			LOC20 = isassignable_280970(NIM_NIL, n);
			stack[(sp)- 0] = ((6 &(1<<((LOC20)&7)))!=0);
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 13):
		{
			NU8 LOC22;
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(262, "parampatterns.nim");
			nimln(262, "parampatterns.nim");
			LOC22 = 0;
			LOC22 = isassignable_280970(NIM_NIL, n);
			stack[(sp)- 0] = (LOC22 == ((NU8) 2));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 14):
		{
			NU8 LOC24;
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(263, "parampatterns.nim");
			nimln(263, "parampatterns.nim");
			LOC24 = 0;
			LOC24 = checkforsideeffects_280740(n);
			stack[(sp)- 0] = (LOC24 == ((NU8) 1));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		case ((NU8) 15):
		{
			NU8 LOC26;
			nimln(233, "parampatterns.nim");
			if ((NU)(sp) > (NU)(64)) raiseIndexError();
			nimln(264, "parampatterns.nim");
			nimln(264, "parampatterns.nim");
			nimln(264, "parampatterns.nim");
			LOC26 = 0;
			LOC26 = checkforsideeffects_280740(n);
			stack[(sp)- 0] = !((LOC26 == ((NU8) 1)));
			nimln(234, "parampatterns.nim");
			sp = addInt(sp, 1);
		}
		break;
		}
		nimln(265, "parampatterns.nim");
		pc = addInt(pc, 1);
	} LA1: ;
	nimln(266, "parampatterns.nim");
	nimln(266, "parampatterns.nim");
	TMP3605 = subInt(sp, 1);
	if ((NU)((NI32)(TMP3605)) > (NU)(64)) raiseIndexError();
	result = stack[((NI32)(TMP3605))- 0];
	popFrame();
	return result;
}
コード例 #27
0
N_NIMCALL(void, annotatetype_420194)(tnode191813* n, ttype191847* t) {
	ttype191847* x;
	nimfr("annotateType", "semmacrosanity.nim")
	nimln(37, "semmacrosanity.nim");
	x = skiptypes_195793(t, IL64(211106232576256));
	nimln(40, "semmacrosanity.nim");
	switch ((*n).Kind) {
	case ((NU8) 37):
	{
		nimln(42, "semmacrosanity.nim");
		{
			NI i_420229;
			NI HEX3Atmp_420404;
			NI LOC6;
			NI res_420406;
			nimln(42, "semmacrosanity.nim");
			if (!((*x).Kind == ((NU8) 17))) goto LA4;
			nimln(43, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			i_420229 = 0;
			HEX3Atmp_420404 = 0;
			nimln(44, "semmacrosanity.nim");
			nimln(44, "semmacrosanity.nim");
			nimln(44, "semmacrosanity.nim");
			LOC6 = 0;
			LOC6 = len_192274(n);
			HEX3Atmp_420404 = subInt(LOC6, 1);
			nimln(1458, "system.nim");
			res_420406 = 0;
			nimln(1459, "system.nim");
			while (1) {
				tsym191843* field;
				nimln(1459, "system.nim");
				if (!(res_420406 <= HEX3Atmp_420404)) goto LA7;
				nimln(1458, "system.nim");
				i_420229 = res_420406;
				nimln(45, "semmacrosanity.nim");
				field = ithfield_420007((*x).N, i_420229);
				nimln(46, "semmacrosanity.nim");
				{
					NimStringDesc* LOC12;
					NimStringDesc* LOC13;
					nimln(46, "semmacrosanity.nim");
					if (!field == 0) goto LA10;
					nimln(46, "semmacrosanity.nim");
					nimln(46, "semmacrosanity.nim");
					LOC12 = 0;
					nimln(46, "semmacrosanity.nim");
					LOC13 = 0;
					LOC13 = nimIntToStr(i_420229);
					LOC12 = rawNewString(LOC13->Sup.len + 23);
appendString(LOC12, ((NimStringDesc*) &TMP5689));
appendString(LOC12, LOC13);
					globalerror_168565((*n).Info, LOC12);
				}
				goto LA8;
				LA10: ;
				{
					nimln(47, "semmacrosanity.nim");
					if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
					if ((NU)(i_420229) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
					annotatetype_420194((*n).kindU.S6.Sons->data[i_420229], (*field).Typ);
				}
				LA8: ;
				nimln(1461, "system.nim");
				res_420406 = addInt(res_420406, 1);
			} LA7: ;
		}
		goto LA2;
		LA4: ;
		{
			NI i_420286;
			NI HEX3Atmp_420408;
			NI LOC18;
			NI res_420410;
			nimln(48, "semmacrosanity.nim");
			if (!((*x).Kind == ((NU8) 18))) goto LA16;
			nimln(49, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			i_420286 = 0;
			HEX3Atmp_420408 = 0;
			nimln(50, "semmacrosanity.nim");
			nimln(50, "semmacrosanity.nim");
			nimln(50, "semmacrosanity.nim");
			LOC18 = 0;
			LOC18 = len_192274(n);
			HEX3Atmp_420408 = subInt(LOC18, 1);
			nimln(1458, "system.nim");
			res_420410 = 0;
			nimln(1459, "system.nim");
			while (1) {
				nimln(1459, "system.nim");
				if (!(res_420410 <= HEX3Atmp_420408)) goto LA19;
				nimln(1458, "system.nim");
				i_420286 = res_420410;
				nimln(51, "semmacrosanity.nim");
				{
					NI LOC22;
					NimStringDesc* LOC25;
					NimStringDesc* LOC26;
					nimln(51, "semmacrosanity.nim");
					nimln(51, "semmacrosanity.nim");
					LOC22 = 0;
					LOC22 = len_195569(x);
					if (!(LOC22 <= i_420286)) goto LA23;
					nimln(51, "semmacrosanity.nim");
					nimln(51, "semmacrosanity.nim");
					LOC25 = 0;
					nimln(51, "semmacrosanity.nim");
					LOC26 = 0;
					LOC26 = nimIntToStr(i_420286);
					LOC25 = rawNewString(LOC26->Sup.len + 23);
appendString(LOC25, ((NimStringDesc*) &TMP5689));
appendString(LOC25, LOC26);
					globalerror_168565((*n).Info, LOC25);
				}
				goto LA20;
				LA23: ;
				{
					nimln(52, "semmacrosanity.nim");
					if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
					if ((NU)(i_420286) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
					if ((NU)(i_420286) >= (NU)((*x).Sons->Sup.len)) raiseIndexError();
					annotatetype_420194((*n).kindU.S6.Sons->data[i_420286], (*x).Sons->data[i_420286]);
				}
				LA20: ;
				nimln(1461, "system.nim");
				res_420410 = addInt(res_420410, 1);
			} LA19: ;
		}
		goto LA2;
		LA16: ;
		{
			NIM_BOOL LOC29;
			nimln(53, "semmacrosanity.nim");
			LOC29 = 0;
			nimln(53, "semmacrosanity.nim");
			LOC29 = ((*x).Kind == ((NU8) 25));
			if (!(LOC29)) goto LA30;
			nimln(53, "semmacrosanity.nim");
			LOC29 = ((*x).Callconv == ((NU8) 8));
			LA30: ;
			if (!LOC29) goto LA31;
			nimln(54, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
		}
		goto LA2;
		LA31: ;
		{
			nimln(56, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5690));
		}
		LA2: ;
	}
	break;
	case ((NU8) 41):
	{
		nimln(58, "semmacrosanity.nim");
		{
			tnode191813* m_420333;
			NI i_420413;
			NI HEX3Atmp_420415;
			NI LOC39;
			NI res_420417;
			nimln(58, "semmacrosanity.nim");
			if (!((151060496 &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA37;
			nimln(59, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			m_420333 = 0;
			i_420413 = 0;
			HEX3Atmp_420415 = 0;
			nimln(1521, "ast.nim");
			nimln(1521, "ast.nim");
			nimln(1521, "ast.nim");
			LOC39 = 0;
			LOC39 = len_192274(n);
			HEX3Atmp_420415 = subInt(LOC39, 1);
			nimln(1458, "system.nim");
			res_420417 = 0;
			nimln(1459, "system.nim");
			while (1) {
				ttype191847* LOC41;
				nimln(1459, "system.nim");
				if (!(res_420417 <= HEX3Atmp_420415)) goto LA40;
				nimln(1458, "system.nim");
				i_420413 = res_420417;
				nimln(1521, "ast.nim");
				if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
				if ((NU)(i_420413) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				m_420333 = (*n).kindU.S6.Sons->data[i_420413];
				nimln(60, "semmacrosanity.nim");
				nimln(60, "semmacrosanity.nim");
				LOC41 = 0;
				LOC41 = elemtype_227559(x);
				annotatetype_420194(m_420333, LOC41);
				nimln(1461, "system.nim");
				res_420417 = addInt(res_420417, 1);
			} LA40: ;
		}
		goto LA35;
		LA37: ;
		{
			nimln(62, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5691));
		}
		LA35: ;
	}
	break;
	case ((NU8) 39):
	{
		nimln(64, "semmacrosanity.nim");
		{
			tnode191813* m_420348;
			NI i_420419;
			NI HEX3Atmp_420421;
			NI LOC48;
			NI res_420423;
			nimln(64, "semmacrosanity.nim");
			if (!((524288 &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA46;
			nimln(65, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			m_420348 = 0;
			i_420419 = 0;
			HEX3Atmp_420421 = 0;
			nimln(1521, "ast.nim");
			nimln(1521, "ast.nim");
			nimln(1521, "ast.nim");
			LOC48 = 0;
			LOC48 = len_192274(n);
			HEX3Atmp_420421 = subInt(LOC48, 1);
			nimln(1458, "system.nim");
			res_420423 = 0;
			nimln(1459, "system.nim");
			while (1) {
				ttype191847* LOC50;
				nimln(1459, "system.nim");
				if (!(res_420423 <= HEX3Atmp_420421)) goto LA49;
				nimln(1458, "system.nim");
				i_420419 = res_420423;
				nimln(1521, "ast.nim");
				if (((TMP5677[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5678));
				if ((NU)(i_420419) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				m_420348 = (*n).kindU.S6.Sons->data[i_420419];
				nimln(66, "semmacrosanity.nim");
				nimln(66, "semmacrosanity.nim");
				LOC50 = 0;
				LOC50 = elemtype_227559(x);
				annotatetype_420194(m_420348, LOC50);
				nimln(1461, "system.nim");
				res_420423 = addInt(res_420423, 1);
			} LA49: ;
		}
		goto LA44;
		LA46: ;
		{
			nimln(68, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5692));
		}
		LA44: ;
	}
	break;
	case ((NU8) 16) ... ((NU8) 19):
	{
		nimln(70, "semmacrosanity.nim");
		{
			nimln(70, "semmacrosanity.nim");
			if (!((IL64(1030792151040) &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA55;
			nimln(71, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
		}
		goto LA53;
		LA55: ;
		{
			nimln(73, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5693));
		}
		LA53: ;
	}
	break;
	case ((NU8) 5) ... ((NU8) 15):
	{
		nimln(75, "semmacrosanity.nim");
		{
			nimln(75, "semmacrosanity.nim");
			if (!((IL64(35182224621574) &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA61;
			nimln(76, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
		}
		goto LA59;
		LA61: ;
		{
			nimln(78, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5694));
		}
		LA59: ;
	}
	break;
	case ((NU8) 20) ... ((NU8) 22):
	{
		nimln(80, "semmacrosanity.nim");
		{
			nimln(80, "semmacrosanity.nim");
			if (!((805306368 &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA67;
			nimln(81, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
		}
		goto LA65;
		LA67: ;
		{
			nimln(83, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5695));
		}
		LA65: ;
	}
	break;
	case ((NU8) 23):
	{
		nimln(85, "semmacrosanity.nim");
		{
			nimln(85, "semmacrosanity.nim");
			if (!((IL64(1125900835880960) &(IL64(1)<<(((*x).Kind)&IL64(63))))!=0)) goto LA73;
			nimln(86, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
		}
		goto LA71;
		LA73: ;
		{
			nimln(88, "semmacrosanity.nim");
			globalerror_168565((*n).Info, ((NimStringDesc*) &TMP5696));
		}
		LA71: ;
	}
	break;
	default:
	{
	}
	break;
	}
	popFrame();
}
コード例 #28
0
ファイル: parampatterns.c プロジェクト: rbehrends/csources
N_NIMCALL(NU8, whichalias_280061)(tsym191843* p) {
	NU8 result;
	nimfr("whichAlias", "parampatterns.nim")
	result = 0;
	nimln(51, "parampatterns.nim");
	{
		nimln(51, "parampatterns.nim");
		nimln(51, "parampatterns.nim");
		if (!!(((*p).Constraint == NIM_NIL))) goto LA3;
		nimln(52, "parampatterns.nim");
		nimln(52, "parampatterns.nim");
		if (!(((TMP3568[(*(*p).Constraint).Kind/8] &(1<<((*(*p).Constraint).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP3569));
		if ((NU)(0) > (NU)((*(*p).Constraint).kindU.S3.Strval->Sup.len)) raiseIndexError();
		result = ((NU8)chckRange(((NU8)((*(*p).Constraint).kindU.S3.Strval->data[0])), ((NU8) 1), ((NU8) 3)));
	}
	goto LA1;
	LA3: ;
	{
		nimln(54, "parampatterns.nim");
		result = ((NU8) 1);
	}
	LA1: ;
	popFrame();
	return result;
}
コード例 #29
0
ファイル: evaltempl.c プロジェクト: reactormonk/csources
N_NIMCALL(void, evaltemplateaux_389024)(tnode185813* templ, tnode185813* actual, templctx389010* c, tnode185813* result) {
	nimfr("evalTemplateAux", "evaltempl.nim")
	nimln(28, "evaltempl.nim");
	switch ((*templ).Kind) {
	case ((NU8) 3):
	{
		tsym185843* s;
		nimln(30, "evaltempl.nim");
		if (!(((TMP5462[(*templ).Kind/8] &(1<<((*templ).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5463));
		s = (*templ).kindU.S4.Sym;
		nimln(31, "evaltempl.nim");
		{
			nimln(31, "evaltempl.nim");
			if (!((*(*s).Owner).Sup.Id == (*(*c).Owner).Sup.Id)) goto LA4;
			nimln(32, "evaltempl.nim");
			{
				tnode185813* x;
				nimln(32, "evaltempl.nim");
				if (!((*s).Kind == ((NU8) 3))) goto LA8;
				nimln(33, "evaltempl.nim");
				if (((TMP5464[(*actual).Kind/8] &(1<<((*actual).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
				if ((NU)((*s).Position) >= (NU)((*actual).kindU.S6.Sons->Sup.len)) raiseIndexError();
				x = (*actual).kindU.S6.Sons->data[(*s).Position];
				nimln(34, "evaltempl.nim");
				{
					tnode185813* y_389079;
					NI i_389161;
					NI HEX3Atmp_389163;
					NI LOC14;
					NI res_389165;
					nimln(34, "evaltempl.nim");
					if (!((*x).Kind == ((NU8) 150))) goto LA12;
					y_389079 = 0;
					i_389161 = 0;
					HEX3Atmp_389163 = 0;
					nimln(1522, "ast.nim");
					nimln(1522, "ast.nim");
					nimln(1522, "ast.nim");
					LOC14 = 0;
					LOC14 = len_186274(x);
					HEX3Atmp_389163 = subInt(LOC14, 1);
					nimln(1457, "system.nim");
					res_389165 = 0;
					nimln(1458, "system.nim");
					while (1) {
						nimln(1458, "system.nim");
						if (!(res_389165 <= HEX3Atmp_389163)) goto LA15;
						nimln(1457, "system.nim");
						i_389161 = res_389165;
						nimln(1522, "ast.nim");
						if (((TMP5464[(*x).Kind/8] &(1<<((*x).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
						if ((NU)(i_389161) >= (NU)((*x).kindU.S6.Sons->Sup.len)) raiseIndexError();
						y_389079 = (*x).kindU.S6.Sons->data[i_389161];
						nimln(35, "evaltempl.nim");
						add_186400(result, y_389079);
						nimln(1460, "system.nim");
						res_389165 = addInt(res_389165, 1);
					} LA15: ;
				}
				goto LA10;
				LA12: ;
				{
					tnode185813* LOC17;
					nimln(37, "evaltempl.nim");
					nimln(37, "evaltempl.nim");
					LOC17 = 0;
					LOC17 = copytree_186247(x);
					add_186400(result, LOC17);
				}
				LA10: ;
			}
			goto LA6;
			LA8: ;
			{
				tsym185843* x;
				TNimObject* LOC24;
				tlineinfo161527 LOC29;
				tnode185813* LOC35;
				nimln(849, "msgs.nim");
				{
					NimStringDesc* LOC23;
					nimln(849, "msgs.nim");
					nimln(39, "evaltempl.nim");
					if (!!((((*s).Flags &(1<<((((NU8) 31))&31)))!=0))) goto LA21;
					nimln(849, "msgs.nim");
					nimln(849, "msgs.nim");
					LOC23 = 0;
					LOC23 = HEX24_163714(TMP5466);
					internalerror_163606(LOC23);
				}
				LA21: ;
				nimln(40, "evaltempl.nim");
				nimln(40, "evaltempl.nim");
				LOC24 = 0;
				LOC24 = idtableget_194137((*c).Mapping, &s->Sup);
				if (LOC24) chckObj((*LOC24).m_type, (&NTI185843));
				x = ((tsym185843*) (LOC24));
				nimln(41, "evaltempl.nim");
				{
					nimln(41, "evaltempl.nim");
					if (!(x == NIM_NIL)) goto LA27;
					nimln(42, "evaltempl.nim");
					x = copysym_186157(s, NIM_FALSE);
					nimln(43, "evaltempl.nim");
					asgnRefNoCycle((void**) &(*x).Owner, (*c).Gensymowner);
					nimln(44, "evaltempl.nim");
					idtableput_194147(&(*c).Mapping, &s->Sup, &x->Sup.Sup);
				}
				LA27: ;
				nimln(45, "evaltempl.nim");
				nimln(45, "evaltempl.nim");
				nimln(45, "evaltempl.nim");
				{
					if (!(*c).Instlines) goto LA32;
					LOC29 = (*actual).Info;
				}
				goto LA30;
				LA32: ;
				{
					LOC29 = (*templ).Info;
				}
				LA30: ;
				LOC35 = 0;
				LOC35 = newsymnode_187723(x, LOC29);
				add_186400(result, LOC35);
			}
			LA6: ;
		}
		goto LA2;
		LA4: ;
		{
			tnode185813* LOC37;
			nimln(47, "evaltempl.nim");
			nimln(47, "evaltempl.nim");
			LOC37 = 0;
			LOC37 = copynode_389016(&(*c), templ, actual);
			add_186400(result, LOC37);
		}
		LA2: ;
	}
	break;
	case ((NU8) 0) ... ((NU8) 2):
	case ((NU8) 4) ... ((NU8) 23):
	{
		tnode185813* LOC39;
		nimln(49, "evaltempl.nim");
		nimln(49, "evaltempl.nim");
		LOC39 = 0;
		LOC39 = copynode_389016(&(*c), templ, actual);
		add_186400(result, LOC39);
	}
	break;
	default:
	{
		tnode185813* res;
		NI i_389145;
		NI HEX3Atmp_389166;
		NI LOC41;
		NI TMP5468;
		NI res_389168;
		nimln(51, "evaltempl.nim");
		res = copynode_389016(&(*c), templ, actual);
		i_389145 = 0;
		HEX3Atmp_389166 = 0;
		nimln(52, "evaltempl.nim");
		nimln(52, "evaltempl.nim");
		nimln(52, "evaltempl.nim");
		LOC41 = 0;
		LOC41 = sonslen_186191(templ);
		TMP5468 = subInt(LOC41, 1);
		HEX3Atmp_389166 = (NI32)(TMP5468);
		nimln(1450, "system.nim");
		res_389168 = 0;
		nimln(1451, "system.nim");
		while (1) {
			nimln(1451, "system.nim");
			if (!(res_389168 <= HEX3Atmp_389166)) goto LA42;
			nimln(1450, "system.nim");
			i_389145 = res_389168;
			nimln(53, "evaltempl.nim");
			if (((TMP5464[(*templ).Kind/8] &(1<<((*templ).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
			if ((NU)(i_389145) >= (NU)((*templ).kindU.S6.Sons->Sup.len)) raiseIndexError();
			evaltemplateaux_389024((*templ).kindU.S6.Sons->data[i_389145], actual, c, res);
			nimln(1453, "system.nim");
			res_389168 = addInt(res_389168, 1);
		} LA42: ;
		nimln(54, "evaltempl.nim");
		add_186400(result, res);
	}
	break;
	}
	popFrame();
}
コード例 #30
0
N_NIMCALL(NU8, whichalias_268080)(Tsym190843* p) {
	NU8 result;
	nimfr("whichAlias", "parampatterns.nim")
	result = 0;
	nimln(51, "parampatterns.nim");
	{
		if (!!(((*p).constraint == NIM_NIL))) goto LA3;
		nimln(52, "parampatterns.nim");
		if (!(((TMP4686[(*(*p).constraint).kind/8] &(1<<((*(*p).constraint).kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP4687));
		if ((NU)(((NI) 0)) > (NU)((*(*p).constraint).kindU.S3.strval->Sup.len)) raiseIndexError();
		result = ((NU8)chckRange(((NU8)((*(*p).constraint).kindU.S3.strval->data[((NI) 0)])), ((NU8) 1), ((NU8) 3)));
	}
	goto LA1;
	LA3: ;
	{
		nimln(54, "parampatterns.nim");
		result = ((NU8) 1);
	}
	LA1: ;
	popFrame();
	return result;
}