Ejemplo n.º 1
0
N_NIMCALL(void, addpathrec_150180)(NimStringDesc* dir, tlineinfo136509 info) {
	tstringtable112610* packages;
	NI pos;
	NI TMP1406;
	NU8 k_150207;
	NimStringDesc* p_150208;
	DIR* d_150219;
	NimStringDesc* p_150217;
	NimStringDesc* key_150229;
	NimStringDesc* val_150231;
	NI h_150233;
	NI HEX3Atmp_150235;
	NI res_150237;
	nimfr("addPathRec", "babelcmd.nim")
	nimln(79, "babelcmd.nim");
	packages = nstnewStringTable(((NU8) 2));
	nimln(80, "babelcmd.nim");
	nimln(80, "babelcmd.nim");
	nimln(80, "babelcmd.nim");
	TMP1406 = subInt(dir->Sup.len, 1);
	pos = (NI64)(TMP1406);
	nimln(81, "babelcmd.nim");
	{
		nimln(730, "system.nim");
		if ((NU)(pos) > (NU)(dir->Sup.len)) raiseIndexError();
		if (!(((NU8)(dir->data[pos])) == ((NU8)(47)) || ((NU8)(dir->data[pos])) == ((NU8)(47)))) goto LA3;
		nimln(81, "babelcmd.nim");
		pos = addInt(pos, 1);
	}	LA3: ;
	k_150207 = 0;
	p_150208 = 0;
	nimln(1227, "os.nim");
	d_150219 = opendir(dir->data);
	nimln(1228, "os.nim");
	{
		int LOC41;
		nimln(698, "system.nim");
		nimln(698, "system.nim");
		if (!!((d_150219 == NIM_NIL))) goto LA7;
		nimln(1229, "os.nim");
		while (1) {
			struct dirent* x_150221;
			NimStringDesc* y_150223;
			nimln(1230, "os.nim");
			x_150221 = readdir(d_150219);
			nimln(1231, "os.nim");
			{
				nimln(1231, "os.nim");
				if (!(x_150221 == NIM_NIL)) goto LA12;
				nimln(1231, "os.nim");
				goto LA9;
			}			LA12: ;
			nimln(1232, "os.nim");
			nimln(1232, "os.nim");
			y_150223 = cstrToNimstr(((NCSTRING) ((*x_150221).d_name)));
			nimln(1233, "os.nim");
			{
				NIM_BOOL LOC16;
				struct stat s_150225;
				NU8 k_150227;
				nimln(1233, "os.nim");
				LOC16 = 0;
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				LOC16 = !(eqStrings(y_150223, ((NimStringDesc*) &TMP1400)));
				if (!(LOC16)) goto LA17;
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				LOC16 = !(eqStrings(y_150223, ((NimStringDesc*) &TMP1401)));
				LA17: ;
				if (!LOC16) goto LA18;
				memset((void*)&s_150225, 0, sizeof(s_150225));
				nimln(1235, "os.nim");
				y_150223 = HEX2F_102067(dir, y_150223);
				nimln(1236, "os.nim");
				{
					int LOC22;
					nimln(1236, "os.nim");
					nimln(1236, "os.nim");
					LOC22 = 0;
					LOC22 = lstat(y_150223->data, &s_150225);
					if (!(LOC22 < ((NI32) 0))) goto LA23;
					nimln(1236, "os.nim");
					goto LA9;
				}				LA23: ;
				nimln(1237, "os.nim");
				k_150227 = ((NU8) 0);
				nimln(1238, "os.nim");
				{
					NIM_BOOL LOC27;
					nimln(1238, "os.nim");
					LOC27 = 0;
					LOC27 = S_ISDIR(s_150225.st_mode);
					if (!LOC27) goto LA28;
					nimln(1238, "os.nim");
					k_150227 = ((NU8) 2);
				}				LA28: ;
				nimln(1239, "os.nim");
				{
					NIM_BOOL LOC32;
					nimln(1239, "os.nim");
					LOC32 = 0;
					LOC32 = S_ISLNK(s_150225.st_mode);
					if (!LOC32) goto LA33;
					nimln(1239, "os.nim");
					nimln(1239, "os.nim");
					k_150227 = addInt(k_150227, 1);
				}				LA33: ;
				nimln(1237, "os.nim");
				k_150207 = k_150227;
				nimln(1232, "os.nim");
				p_150208 = y_150223;
				nimln(83, "babelcmd.nim");
				{
					NIM_BOOL LOC37;
					nimln(83, "babelcmd.nim");
					LOC37 = 0;
					nimln(83, "babelcmd.nim");
					LOC37 = (k_150207 == ((NU8) 2));
					if (!(LOC37)) goto LA38;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					if ((NU)(pos) > (NU)(p_150208->Sup.len)) raiseIndexError();
					LOC37 = !(((NU8)(p_150208->data[pos]) == (NU8)(46)));
					LA38: ;
					if (!LOC37) goto LA39;
					nimln(84, "babelcmd.nim");
					addpackage_150103(packages, p_150208);				}				LA39: ;
			}			LA18: ;
		} LA9: ;
		nimln(1241, "os.nim");
		nimln(1241, "os.nim");
		LOC41 = 0;
		LOC41 = closedir(d_150219);
	}	LA7: ;
	p_150217 = 0;
	key_150229 = 0;
	val_150231 = 0;
	h_150233 = 0;
	HEX3Atmp_150235 = 0;
	nimln(40, "strtabs.nim");
	nimln(40, "strtabs.nim");
	HEX3Atmp_150235 = ((*packages).Data->Sup.len-1);
	nimln(1308, "system.nim");
	res_150237 = 0;
	nimln(1309, "system.nim");
	while (1) {
		nimln(1309, "system.nim");
		if (!(res_150237 <= HEX3Atmp_150235)) goto LA42;
		nimln(1308, "system.nim");
		h_150233 = res_150237;
		nimln(41, "strtabs.nim");
		{
			NimStringDesc* res_150239;
			nimln(41, "strtabs.nim");
			nimln(41, "strtabs.nim");
			if ((NU)(h_150233) >= (NU)((*packages).Data->Sup.len)) raiseIndexError();
			if (!!((*packages).Data->data[h_150233].Field0 == 0)) goto LA45;
			nimln(42, "strtabs.nim");
			if ((NU)(h_150233) >= (NU)((*packages).Data->Sup.len)) raiseIndexError();
			key_150229 = (*packages).Data->data[h_150233].Field0;
			nimln(42, "strtabs.nim");
			if ((NU)(h_150233) >= (NU)((*packages).Data->Sup.len)) raiseIndexError();
			val_150231 = (*packages).Data->data[h_150233].Field1;
			nimln(58, "babelcmd.nim");
			nimln(58, "babelcmd.nim");
			{
				nimln(58, "babelcmd.nim");
				if (!eqStrings(val_150231, ((NimStringDesc*) &TMP1397))) goto LA49;
				res_150239 = key_150229;
			}			goto LA47;
			LA49: ;
			{
				NimStringDesc* LOC52;
				nimln(58, "babelcmd.nim");
				LOC52 = 0;
				LOC52 = rawNewString(key_150229->Sup.len + val_150231->Sup.len + 1);
appendString(LOC52, key_150229);
appendChar(LOC52, 45);
appendString(LOC52, val_150231);
				res_150239 = LOC52;
			}			LA47: ;
			nimln(58, "babelcmd.nim");
			p_150217 = res_150239;
			nimln(86, "babelcmd.nim");
			addbabelpath_150128(p_150217, info);		}		LA45: ;
		nimln(1311, "system.nim");
		res_150237 = addInt(res_150237, 1);
	} LA42: ;
	popFrame();
}
Ejemplo n.º 2
0
N_NIMCALL(tident170019*, getident_170250)(NCSTRING identifier, NI length, NI h) {
	tident170019* result;
	NI idx;
	tident170019* last;
	NI id;
	NI i_170429;
	NI HEX3Atmp_170448;
	NI TMP981;
	NI res_170450;
	nimfr("getIdent", "idents.nim")
	result = 0;
	nimln(69, "idents.nim");
	nimln(69, "idents.nim");
	idx = (NI)(h & 8191);
	nimln(70, "idents.nim");
	result = buckets_170033[(idx)- 0];
	nimln(71, "idents.nim");
	last = NIM_NIL;
	nimln(72, "idents.nim");
	id = 0;
	nimln(73, "idents.nim");
	while (1) {
		nimln(73, "idents.nim");
		nimln(73, "idents.nim");
		if (!!((result == NIM_NIL))) goto LA1;
		nimln(74, "idents.nim");
		{
			NI LOC4;
			nimln(74, "idents.nim");
			nimln(74, "idents.nim");
			LOC4 = 0;
			LOC4 = cmpexact_170186((*result).S->data, identifier, length);
			if (!(LOC4 == 0)) goto LA5;
			nimln(75, "idents.nim");
			{
				nimln(75, "idents.nim");
				nimln(75, "idents.nim");
				if (!!((last == NIM_NIL))) goto LA9;
				nimln(77, "idents.nim");
				asgnRefNoCycle((void**) &(*last).Next, (*result).Next);
				nimln(78, "idents.nim");
				asgnRefNoCycle((void**) &(*result).Next, buckets_170033[(idx)- 0]);
				nimln(79, "idents.nim");
				asgnRefNoCycle((void**) &buckets_170033[(idx)- 0], result);
			}
			LA9: ;
			nimln(80, "idents.nim");
			goto BeforeRet;
		}
		goto LA2;
		LA5: ;
		{
			NI LOC12;
			nimln(81, "idents.nim");
			nimln(81, "idents.nim");
			LOC12 = 0;
			LOC12 = cmpignorestyle_170036((*result).S->data, identifier, length);
			if (!(LOC12 == 0)) goto LA13;
			nimln(82, "idents.nim");
			{
				NIM_BOOL LOC17;
				nimln(82, "idents.nim");
				nimln(82, "idents.nim");
				LOC17 = 0;
				nimln(82, "idents.nim");
				LOC17 = (id == 0);
				if (LOC17) goto LA18;
				nimln(82, "idents.nim");
				LOC17 = (id == (*result).Sup.Id);
				LA18: ;
				if (!!(LOC17)) goto LA19;
				nimln(82, "idents.nim");
				failedassertimpl_80421(((NimStringDesc*) &TMP978));
			}
			LA19: ;
			nimln(83, "idents.nim");
			id = (*result).Sup.Id;
		}
		goto LA2;
		LA13: ;
		LA2: ;
		nimln(84, "idents.nim");
		last = result;
		nimln(85, "idents.nim");
		result = (*result).Next;
	} LA1: ;
	nimln(86, "idents.nim");
	result = (tident170019*) newObj((&NTI170017), sizeof(tident170019));
	(*result).Sup.Sup.m_type = (&NTI170019);
	nimln(87, "idents.nim");
	(*result).H = h;
	nimln(88, "idents.nim");
	nimln(88, "idents.nim");
	asgnRefNoCycle((void**) &(*result).S, mnewString(length));
	i_170429 = 0;
	HEX3Atmp_170448 = 0;
	nimln(89, "idents.nim");
	nimln(89, "idents.nim");
	TMP981 = subInt(length, 1);
	HEX3Atmp_170448 = (NI64)(TMP981);
	nimln(1451, "system.nim");
	res_170450 = 0;
	nimln(1452, "system.nim");
	while (1) {
		nimln(1452, "system.nim");
		if (!(res_170450 <= HEX3Atmp_170448)) goto LA21;
		nimln(1451, "system.nim");
		i_170429 = res_170450;
		nimln(89, "idents.nim");
		if ((NU)(i_170429) > (NU)((*result).S->Sup.len)) raiseIndexError();
		(*result).S->data[i_170429] = identifier[i_170429];
		nimln(1454, "system.nim");
		res_170450 = addInt(res_170450, 1);
	} LA21: ;
	nimln(90, "idents.nim");
	asgnRefNoCycle((void**) &(*result).Next, buckets_170033[(idx)- 0]);
	nimln(91, "idents.nim");
	asgnRefNoCycle((void**) &buckets_170033[(idx)- 0], result);
	nimln(92, "idents.nim");
	{
		nimln(92, "idents.nim");
		if (!(id == 0)) goto LA24;
		nimln(93, "idents.nim");
		wordcounter_170248 = addInt(wordcounter_170248, 1);
		nimln(94, "idents.nim");
		nimln(94, "idents.nim");
		if (wordcounter_170248 == (IL64(-9223372036854775807) - IL64(1))) raiseOverflow();
		(*result).Sup.Id = ((NI64)-(wordcounter_170248));
	}
	goto LA22;
	LA24: ;
	{
		nimln(96, "idents.nim");
		(*result).Sup.Id = id;
	}
	LA22: ;
	BeforeRet: ;
	popFrame();
	return result;
}
Ejemplo n.º 3
0
N_NIMCALL(void, nponext)(toptparser523807* p) {
	NI i;
	nimfr("next", "parseopt.nim")
	nimln(94, "parseopt.nim");
	i = (*p).Pos;
	nimln(95, "parseopt.nim");
	while (1) {
		nimln(95, "parseopt.nim");
		if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
		if (!(((NU8)((*p).Cmd->data[i])) == ((NU8)(9)) || ((NU8)((*p).Cmd->data[i])) == ((NU8)(32)))) goto LA1;
		nimln(95, "parseopt.nim");
		i = addInt(i, 1);
	} LA1: ;
	nimln(96, "parseopt.nim");
	(*p).Pos = i;
	nimln(97, "parseopt.nim");
	(*p).Key = setLengthStr((*p).Key, 0);
	nimln(98, "parseopt.nim");
	(*p).Val = setLengthStr((*p).Val, 0);
	nimln(99, "parseopt.nim");
	{
		if (!(*p).Inshortstate) goto LA4;
		nimln(100, "parseopt.nim");
		handleshortoption_524106(p);
		nimln(101, "parseopt.nim");
		goto BeforeRet;
	}
	LA4: ;
	nimln(102, "parseopt.nim");
	if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
	switch (((NU8)((*p).Cmd->data[i]))) {
	case 0:
	{
		nimln(104, "parseopt.nim");
		(*p).Kind = ((NU8) 0);
	}
	break;
	case 45:
	{
		nimln(106, "parseopt.nim");
		i = addInt(i, 1);
		nimln(107, "parseopt.nim");
		{
			nimln(107, "parseopt.nim");
			if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
			if (!((NU8)((*p).Cmd->data[i]) == (NU8)(45))) goto LA10;
			nimln(108, "parseopt.nim");
			(*p).Kind = ((NU8) 2);
			nimln(109, "parseopt.nim");
			i = addInt(i, 1);
			nimln(110, "parseopt.nim");
			i = parseword_524002((*p).Cmd, i, &(*p).Key, TMP7637);
			nimln(111, "parseopt.nim");
			while (1) {
				nimln(111, "parseopt.nim");
				if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
				if (!(((NU8)((*p).Cmd->data[i])) == ((NU8)(9)) || ((NU8)((*p).Cmd->data[i])) == ((NU8)(32)))) goto LA12;
				nimln(111, "parseopt.nim");
				i = addInt(i, 1);
			} LA12: ;
			nimln(112, "parseopt.nim");
			{
				nimln(112, "parseopt.nim");
				if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
				if (!(((NU8)((*p).Cmd->data[i])) == ((NU8)(58)) || ((NU8)((*p).Cmd->data[i])) == ((NU8)(61)))) goto LA15;
				nimln(113, "parseopt.nim");
				i = addInt(i, 1);
				nimln(114, "parseopt.nim");
				while (1) {
					nimln(114, "parseopt.nim");
					if ((NU)(i) > (NU)((*p).Cmd->Sup.len)) raiseIndexError();
					if (!(((NU8)((*p).Cmd->data[i])) == ((NU8)(9)) || ((NU8)((*p).Cmd->data[i])) == ((NU8)(32)))) goto LA17;
					nimln(114, "parseopt.nim");
					i = addInt(i, 1);
				} LA17: ;
				nimln(115, "parseopt.nim");
				(*p).Pos = parseword_524002((*p).Cmd, i, &(*p).Val, TMP7636);
			}
			goto LA13;
			LA15: ;
			{
				nimln(117, "parseopt.nim");
				(*p).Pos = i;
			}
			LA13: ;
		}
		goto LA8;
		LA10: ;
		{
			nimln(119, "parseopt.nim");
			(*p).Pos = i;
			nimln(120, "parseopt.nim");
			handleshortoption_524106(p);
		}
		LA8: ;
	}
	break;
	default:
	{
		nimln(122, "parseopt.nim");
		(*p).Kind = ((NU8) 1);
		nimln(123, "parseopt.nim");
		(*p).Pos = parseword_524002((*p).Cmd, i, &(*p).Key, TMP7636);
	}
	break;
	}
	BeforeRet: ;
	popFrame();
}
Ejemplo n.º 4
0
N_NIMCALL(NI32, newcrcfromropeaux_150063)(trope148007* r, NI32 startval) {
	NI32 result;
	tropeseq148009* stack;
	TY148497 LOC1;
	nimfr("newCrcFromRopeAux", "ropes.nim")
	result = 0;
	nimln(337, "ropes.nim");
	nimln(337, "ropes.nim");
	stack = (tropeseq148009*) newSeq((&NTI148009), 1);
	memset((void*)LOC1, 0, sizeof(LOC1));
	LOC1[0] = r;
	asgnRefNoCycle((void**) &stack->data[0], LOC1[0]);
	nimln(338, "ropes.nim");
	result = startval;
	nimln(339, "ropes.nim");
	while (1) {
		trope148007* it;
		NI i;
		NI l;
		nimln(339, "ropes.nim");
		nimln(339, "ropes.nim");
		if (!(0 < stack->Sup.len)) goto LA2;
		nimln(340, "ropes.nim");
		it = pop_148515(&stack);
		nimln(341, "ropes.nim");
		while (1) {
			nimln(341, "ropes.nim");
			if (!((*it).Data == NIM_NIL)) goto LA3;
			nimln(342, "ropes.nim");
			stack = (tropeseq148009*) incrSeq(&(stack)->Sup, sizeof(trope148007*));
			asgnRefNoCycle((void**) &stack->data[stack->Sup.len-1], (*it).Right);
			nimln(343, "ropes.nim");
			it = (*it).Left;
		} LA3: ;
		nimln(344, "ropes.nim");
		{
			nimln(344, "ropes.nim");
			nimln(344, "ropes.nim");
			nimln(344, "ropes.nim");
			if (!!(!(((*it).Data == NIM_NIL)))) goto LA6;
			nimln(344, "ropes.nim");
			failedassertimpl_80621(((NimStringDesc*) &TMP552));
		}
		LA6: ;
		nimln(345, "ropes.nim");
		i = 0;
		nimln(346, "ropes.nim");
		nimln(346, "ropes.nim");
		l = (*it).Data->Sup.len;
		nimln(347, "ropes.nim");
		while (1) {
			nimln(347, "ropes.nim");
			if (!(i < l)) goto LA8;
			nimln(348, "ropes.nim");
			if ((NU)(i) > (NU)((*it).Data->Sup.len)) raiseIndexError();
			result = updatecrc32_147017((*it).Data->data[i], result);
			nimln(349, "ropes.nim");
			i = addInt(i, 1);
		} LA8: ;
	} LA2: ;
	popFrame();
	return result;
}
Ejemplo n.º 5
0
N_NIMCALL(NI, rawparseint_86531)(NimStringDesc* s, NI64* b, NI start) {
	NI result;
	NI64 sign;
	NI i;
	nimfr("rawParseInt", "parseutils.nim")
	result = 0;
	nimln(194, "parseutils.nim");
	sign = -1;
	nimln(195, "parseutils.nim");
	i = start;
	nimln(196, "parseutils.nim");
	{
		nimln(196, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!((NU8)(s->data[i]) == (NU8)(43))) goto LA3;
		nimln(196, "parseutils.nim");
		i = addInt(i, 1);
	}
	goto LA1;
	LA3: ;
	{
		nimln(197, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!((NU8)(s->data[i]) == (NU8)(45))) goto LA6;
		nimln(198, "parseutils.nim");
		i = addInt(i, 1);
		nimln(199, "parseutils.nim");
		sign = 1;
	}
	goto LA1;
	LA6: ;
	LA1: ;
	nimln(200, "parseutils.nim");
	{
		NI64 TMP1138;
		NI TMP1139;
		nimln(200, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!(((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57)))) goto LA10;
		nimln(201, "parseutils.nim");
		(*b) = 0;
		nimln(202, "parseutils.nim");
		while (1) {
			NI64 TMP1135;
			NI TMP1136;
			NI64 TMP1137;
			nimln(202, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!(((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57)))) goto LA12;
			nimln(203, "parseutils.nim");
			nimln(203, "parseutils.nim");
			nimln(203, "parseutils.nim");
			TMP1135 = mulInt64((*b), 10);
			nimln(203, "parseutils.nim");
			nimln(203, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			TMP1136 = subInt(((NI) (((NU8)(s->data[i])))), 48);
			TMP1137 = subInt64((NI64)(TMP1135), ((NI64) ((NI32)(TMP1136))));
			(*b) = (NI64)(TMP1137);
			nimln(204, "parseutils.nim");
			i = addInt(i, 1);
			nimln(205, "parseutils.nim");
			while (1) {
				nimln(205, "parseutils.nim");
				if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
				if (!((NU8)(s->data[i]) == (NU8)(95))) goto LA13;
				nimln(205, "parseutils.nim");
				i = addInt(i, 1);
			} LA13: ;
		} LA12: ;
		nimln(206, "parseutils.nim");
		nimln(206, "parseutils.nim");
		TMP1138 = mulInt64((*b), sign);
		(*b) = (NI64)(TMP1138);
		nimln(207, "parseutils.nim");
		nimln(207, "parseutils.nim");
		TMP1139 = subInt(i, start);
		result = (NI32)(TMP1139);
	}
	LA10: ;
	popFrame();
	return result;
}
Ejemplo n.º 6
0
N_NIMCALL(void, evaltemplateaux_383039)(Tnode190813* templ, Tnode190813* actual, Templctx383019* c, Tnode190813* result) {
	nimfr("evalTemplateAux", "evaltempl.nim")
	nimln(28, "evaltempl.nim");
	switch ((*templ).kind) {
	case ((NU8) 3):
	{
		Tsym190843* s;
		nimln(30, "evaltempl.nim");
		if (!(((TMP7624[(*templ).kind/8] &(1<<((*templ).kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP7625));
		s = (*templ).kindU.S4.sym;
		nimln(31, "evaltempl.nim");
		{
			if (!((*(*s).owner).Sup.id == (*(*c).owner).Sup.id)) goto LA4;
			nimln(32, "evaltempl.nim");
			{
				NIM_BOOL LOC8;
				Tnode190813* x;
				LOC8 = 0;
				LOC8 = ((*s).kind == ((NU8) 3));
				if (!(LOC8)) goto LA9;
				LOC8 = !((((*s).flags &(1<<((((NU8) 31))&31)))!=0));
				LA9: ;
				if (!LOC8) goto LA10;
				nimln(33, "evaltempl.nim");
				if (((TMP7626[(*actual).kind/8] &(1<<((*actual).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
				if ((NU)((*s).position) >= (NU)((*actual).kindU.S6.sons->Sup.len)) raiseIndexError();
				x = (*actual).kindU.S6.sons->data[(*s).position];
				nimln(34, "evaltempl.nim");
				{
					if (!((*x).kind == ((NU8) 152))) goto LA14;
					{
						Tnode190813* y_383083;
						y_383083 = 0;
						{
							NI i_383142;
							NI HEX3Atmp_383144;
							NI LOC18;
							NI res_383146;
							i_383142 = 0;
							HEX3Atmp_383144 = 0;
							nimln(1537, "ast.nim");
							LOC18 = 0;
							LOC18 = len_191097(x);
							HEX3Atmp_383144 = subInt(LOC18, 1);
							nimln(1598, "system.nim");
							res_383146 = ((NI) 0);
							{
								nimln(1599, "system.nim");
								while (1) {
									NI TMP7628;
									if (!(res_383146 <= HEX3Atmp_383144)) goto LA20;
									nimln(1600, "system.nim");
									i_383142 = res_383146;
									nimln(1537, "ast.nim");
									if (((TMP7626[(*x).kind/8] &(1<<((*x).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
									if ((NU)(i_383142) >= (NU)((*x).kindU.S6.sons->Sup.len)) raiseIndexError();
									y_383083 = (*x).kindU.S6.sons->data[i_383142];
									nimln(35, "evaltempl.nim");
									add_191164(result, y_383083);
									nimln(1619, "system.nim");
									TMP7628 = addInt(res_383146, ((NI) 1));
									res_383146 = (NI)(TMP7628);
								} LA20: ;
							}
						}
					}
				}
				goto LA12;
				LA14: ;
				{
					Tnode190813* LOC22;
					nimln(37, "evaltempl.nim");
					LOC22 = 0;
					LOC22 = copytree_195028(x);
					add_191164(result, LOC22);
				}
				LA12: ;
			}
			goto LA6;
			LA10: ;
			{
				Tsym190843* x;
				Tidobj166015* LOC29;
				TNimObject* LOC30;
				Tlineinfo162338 LOC37;
				Tnode190813* LOC43;
				nimln(854, "msgs.nim");
				{
					NimStringDesc* LOC28;
					nimln(39, "evaltempl.nim");
					if (!!((((*s).flags &(1<<((((NU8) 31))&31)))!=0))) goto LA26;
					nimln(854, "msgs.nim");
					LOC28 = 0;
					LOC28 = HEX24_164306(TMP7629);
					internalerror_164218(LOC28);
				}
				LA26: ;
				nimln(40, "evaltempl.nim");
				LOC29 = 0;
				LOC29 = &s->Sup;
				LOC30 = 0;
				LOC30 = idtableget_198182((*c).mapping, LOC29);
				if (LOC30) chckObj((*LOC30).m_type, (&NTI190843));
				x = ((Tsym190843*) (LOC30));
				nimln(41, "evaltempl.nim");
				{
					Tidobj166015* LOC35;
					TNimObject* LOC36;
					if (!(x == NIM_NIL)) goto LA33;
					nimln(42, "evaltempl.nim");
					x = copysym_193607(s, NIM_FALSE);
					nimln(43, "evaltempl.nim");
					asgnRefNoCycle((void**) (&(*x).owner), (*c).gensymowner);
					nimln(44, "evaltempl.nim");
					LOC35 = 0;
					LOC35 = &s->Sup;
					LOC36 = 0;
					LOC36 = &x->Sup.Sup;
					idtableput_198196((&(*c).mapping), LOC35, LOC36);
				}
				LA33: ;
				nimln(45, "evaltempl.nim");
				{
					if (!(*c).instlines) goto LA40;
					LOC37 = (*actual).info;
				}
				goto LA38;
				LA40: ;
				{
					LOC37 = (*templ).info;
				}
				LA38: ;
				LOC43 = 0;
				LOC43 = newsymnode_192338(x, LOC37);
				add_191164(result, LOC43);
			}
			LA6: ;
		}
		goto LA2;
		LA4: ;
		{
			Tnode190813* LOC45;
			nimln(47, "evaltempl.nim");
			LOC45 = 0;
			LOC45 = copynode_383027((&(*c)), templ, actual);
			add_191164(result, LOC45);
		}
		LA2: ;
	}
	break;
	case ((NU8) 0) ... ((NU8) 2):
	case ((NU8) 4) ... ((NU8) 23):
	{
		Tnode190813* LOC47;
		nimln(49, "evaltempl.nim");
		LOC47 = 0;
		LOC47 = copynode_383027((&(*c)), templ, actual);
		add_191164(result, LOC47);
	}
	break;
	default:
	{
		Tnode190813* res;
		nimln(51, "evaltempl.nim");
		res = copynode_383027((&(*c)), templ, actual);
		{
			NI i_383135;
			NI HEX3Atmp_383150;
			NI LOC50;
			NI TMP7631;
			NI res_383153;
			i_383135 = 0;
			HEX3Atmp_383150 = 0;
			nimln(52, "evaltempl.nim");
			LOC50 = 0;
			LOC50 = sonslen_193403(templ);
			TMP7631 = subInt(LOC50, ((NI) 1));
			HEX3Atmp_383150 = (NI)(TMP7631);
			nimln(1598, "system.nim");
			res_383153 = ((NI) 0);
			{
				nimln(1599, "system.nim");
				while (1) {
					NI TMP7632;
					if (!(res_383153 <= HEX3Atmp_383150)) goto LA52;
					nimln(1600, "system.nim");
					i_383135 = res_383153;
					nimln(53, "evaltempl.nim");
					if (((TMP7626[(*templ).kind/8] &(1<<((*templ).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
					if ((NU)(i_383135) >= (NU)((*templ).kindU.S6.sons->Sup.len)) raiseIndexError();
					evaltemplateaux_383039((*templ).kindU.S6.sons->data[i_383135], actual, c, res);
					nimln(1614, "system.nim");
					TMP7632 = addInt(res_383153, ((NI) 1));
					res_383153 = (NI)(TMP7632);
				} LA52: ;
			}
		}
		nimln(54, "evaltempl.nim");
		add_191164(result, res);
	}
	break;
	}
	popFrame();
}
Ejemplo n.º 7
0
N_NIMCALL(Tnode190813*, evaltemplate_383260)(Tnode190813* n, Tsym190843* tmpl, Tsym190843* gensymowner) {
	Tnode190813* result;
	NI TMP7636;
	Tnode190813* args;
	Templctx383019 ctx;
	Tnode190813* body;
	NI TMP7639;
	nimfr("evalTemplate", "evaltempl.nim")
	result = 0;
	nimln(78, "evaltempl.nim");
	TMP7636 = addInt(evaltemplatecounter_383256, ((NI) 1));
	evaltemplatecounter_383256 = (NI)(TMP7636);
	nimln(79, "evaltempl.nim");
	{
		if (!(((NI) 100) < evaltemplatecounter_383256)) goto LA3;
		nimln(80, "evaltempl.nim");
		globalerror_164134((*n).info, ((NU16) 183), ((NimStringDesc*) &TMP7633));
		nimln(81, "evaltempl.nim");
		result = n;
	}
	LA3: ;
	nimln(84, "evaltempl.nim");
	args = evaltemplateargs_383184(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_194057((&ctx.mapping));
	nimln(90, "evaltempl.nim");
	body = getbody_235647(tmpl);
	nimln(91, "evaltempl.nim");
	{
		NIM_BOOL LOC7;
		LOC7 = 0;
		LOC7 = isatom_195906(body);
		if (!LOC7) goto LA8;
		nimln(92, "evaltempl.nim");
		result = newnodei_192351(((NU8) 37), (*body).info);
		nimln(93, "evaltempl.nim");
		evaltemplateaux_383039(body, args, (&ctx), result);
		nimln(94, "evaltempl.nim");
		{
			NI LOC12;
			LOC12 = 0;
			LOC12 = len_191097(result);
			if (!(LOC12 == ((NI) 1))) goto LA13;
			if (((TMP7626[(*result).kind/8] &(1<<((*result).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
			if ((NU)(((NI) 0)) >= (NU)((*result).kindU.S6.sons->Sup.len)) raiseIndexError();
			result = (*result).kindU.S6.sons->data[((NI) 0)];
		}
		goto LA10;
		LA13: ;
		{
			NimStringDesc* LOC16;
			nimln(96, "evaltempl.nim");
			nimln(97, "evaltempl.nim");
			LOC16 = 0;
			LOC16 = rendertree_212058(result, 4);
			localerror_164155((*result).info, ((NU16) 1), LOC16);
		}
		LA10: ;
	}
	goto LA5;
	LA8: ;
	{
		nimln(99, "evaltempl.nim");
		result = copynode_194640(body);
		nimln(100, "evaltempl.nim");
		ctx.instlines = !(((*body).kind == ((NU8) 115) || (*body).kind == ((NU8) 126) || (*body).kind == ((NU8) 112) || (*body).kind == ((NU8) 127)));
		nimln(102, "evaltempl.nim");
		{
			if (!ctx.instlines) goto LA20;
			(*result).info = (*n).info;
		}
		LA20: ;
		{
			NI i_383308;
			NI HEX3Atmp_383322;
			NI LOC23;
			NI TMP7637;
			NI res_383325;
			i_383308 = 0;
			HEX3Atmp_383322 = 0;
			nimln(103, "evaltempl.nim");
			LOC23 = 0;
			LOC23 = safelen_191125(body);
			TMP7637 = subInt(LOC23, ((NI) 1));
			HEX3Atmp_383322 = (NI)(TMP7637);
			nimln(1598, "system.nim");
			res_383325 = ((NI) 0);
			{
				nimln(1599, "system.nim");
				while (1) {
					NI TMP7638;
					if (!(res_383325 <= HEX3Atmp_383322)) goto LA25;
					nimln(1600, "system.nim");
					i_383308 = res_383325;
					nimln(104, "evaltempl.nim");
					if (((TMP7626[(*body).kind/8] &(1<<((*body).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
					if ((NU)(i_383308) >= (NU)((*body).kindU.S6.sons->Sup.len)) raiseIndexError();
					evaltemplateaux_383039((*body).kindU.S6.sons->data[i_383308], args, (&ctx), result);
					nimln(1614, "system.nim");
					TMP7638 = addInt(res_383325, ((NI) 1));
					res_383325 = (NI)(TMP7638);
				} LA25: ;
			}
		}
	}
	LA5: ;
	nimln(106, "evaltempl.nim");
	TMP7639 = subInt(evaltemplatecounter_383256, ((NI) 1));
	evaltemplatecounter_383256 = (NI)(TMP7639);
	popFrame();
	return result;
}
Ejemplo n.º 8
0
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();
}
Ejemplo n.º 9
0
N_NIMCALL(tnode185813*, evaltemplateargs_389174)(tnode185813* n, tsym185843* s) {
	tnode185813* result;
	NI a;
	NI f;
	NI i_389194;
	NI HEX3Atmp_389266;
	NI TMP5470;
	NI res_389268;
	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_186191(n);
	}
	break;
	default:
	{
		nimln(63, "evaltempl.nim");
		a = 0;
	}
	break;
	}
	nimln(64, "evaltempl.nim");
	f = sonslen_186195((*s).Typ);
	nimln(65, "evaltempl.nim");
	{
		nimln(65, "evaltempl.nim");
		if (!(f < a)) goto LA5;
		nimln(65, "evaltempl.nim");
		globalerror_163558((*n).Info, ((NU16) 133), ((NimStringDesc*) &TMP5469));
	}
	LA5: ;
	nimln(67, "evaltempl.nim");
	result = newnodei_186109(((NU8) 150), (*n).Info);
	i_389194 = 0;
	HEX3Atmp_389266 = 0;
	nimln(68, "evaltempl.nim");
	nimln(68, "evaltempl.nim");
	TMP5470 = subInt(f, 1);
	HEX3Atmp_389266 = (NI32)(TMP5470);
	nimln(1450, "system.nim");
	res_389268 = 1;
	nimln(1451, "system.nim");
	while (1) {
		tnode185813* arg;
		nimln(1451, "system.nim");
		if (!(res_389268 <= HEX3Atmp_389266)) goto LA7;
		nimln(1450, "system.nim");
		i_389194 = res_389268;
		nimln(69, "evaltempl.nim");
		nimln(69, "evaltempl.nim");
		{
			nimln(69, "evaltempl.nim");
			if (!(i_389194 < a)) goto LA10;
			if (((TMP5464[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
			if ((NU)(i_389194) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			arg = (*n).kindU.S6.Sons->data[i_389194];
		}
		goto LA8;
		LA10: ;
		{
			nimln(69, "evaltempl.nim");
			if (((TMP5464[(*(*(*s).Typ).N).Kind/8] &(1<<((*(*(*s).Typ).N).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
			if ((NU)(i_389194) >= (NU)((*(*(*s).Typ).N).kindU.S6.Sons->Sup.len)) raiseIndexError();
			if (!(((TMP5462[(*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_389194]).Kind/8] &(1<<((*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_389194]).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5463));
			arg = copytree_186247((*(*(*(*(*s).Typ).N).kindU.S6.Sons->data[i_389194]).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_163571((*n).Info, ((NU16) 133), ((NimStringDesc*) &TMP5469));
		}
		LA17: ;
		nimln(72, "evaltempl.nim");
		addson_186217(result, arg);
		nimln(1453, "system.nim");
		res_389268 = addInt(res_389268, 1);
	} LA7: ;
	popFrame();
	return result;
}
Ejemplo n.º 10
0
N_NIMCALL(NimStringDesc*, getpackagename_114423)(NimStringDesc* path) {
	NimStringDesc* result;
	NI q;
	NI b;
	NI i_114448;
	NI HEX3Atmp_114461;
	NI TMP334;
	NI res_114463;
	nimfr("getPackageName", "options.nim")
	result = 0;
	nimln(215, "options.nim");
	q = 1;
	nimln(216, "options.nim");
	b = 0;
	nimln(217, "options.nim");
	{
		NI TMP333;
		nimln(730, "system.nim");
		nimln(217, "options.nim");
		nimln(217, "options.nim");
		TMP333 = subInt(path->Sup.len, 1);
		if ((NU)((NI32)(TMP333)) > (NU)(path->Sup.len)) raiseIndexError();
		if (!(((NU8)(path->data[(NI32)(TMP333)])) == ((NU8)(47)) || ((NU8)(path->data[(NI32)(TMP333)])) == ((NU8)(47)))) goto LA3;
		nimln(217, "options.nim");
		q = 2;
	}	LA3: ;
	i_114448 = 0;
	HEX3Atmp_114461 = 0;
	nimln(218, "options.nim");
	nimln(218, "options.nim");
	nimln(218, "options.nim");
	TMP334 = subInt(path->Sup.len, q);
	HEX3Atmp_114461 = (NI32)(TMP334);
	nimln(1292, "system.nim");
	res_114463 = HEX3Atmp_114461;
	nimln(1293, "system.nim");
	while (1) {
		nimln(702, "system.nim");
		if (!(0 <= res_114463)) goto LA5;
		nimln(1292, "system.nim");
		i_114448 = res_114463;
		nimln(219, "options.nim");
		{
			nimln(730, "system.nim");
			if ((NU)(i_114448) > (NU)(path->Sup.len)) raiseIndexError();
			if (!(((NU8)(path->data[i_114448])) == ((NU8)(47)) || ((NU8)(path->data[i_114448])) == ((NU8)(47)))) goto LA8;
			nimln(220, "options.nim");
			{
				nimln(220, "options.nim");
				if (!(b == 0)) goto LA12;
				nimln(220, "options.nim");
				b = i_114448;
			}			goto LA10;
			LA12: ;
			{
				NimStringDesc* x;
				NI TMP335;
				NI TMP336;
				NimStringDesc* LOC15;
				nimln(222, "options.nim");
				nimln(222, "options.nim");
				nimln(222, "options.nim");
				TMP335 = addInt(i_114448, 1);
				nimln(222, "options.nim");
				TMP336 = subInt(b, 1);
				x = copyStrLast(path, (NI32)(TMP335), (NI32)(TMP336));
				nimln(223, "options.nim");
				nimln(223, "options.nim");
				LOC15 = 0;
				LOC15 = nsuNormalize(x);
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP339))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP340))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP341))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP342))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP343))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP344))) goto LA16;
				if (eqStrings(LOC15, ((NimStringDesc*) &TMP345))) goto LA16;
				goto LA17;
				LA16: ;
				{
					nimln(225, "options.nim");
					b = i_114448;
				}				goto LA18;
				LA17: ;
				{
					nimln(227, "options.nim");
					nimln(227, "options.nim");
					result = nsuReplaceChar(x, 46, 95);
					goto BeforeRet;
				}				LA18: ;
			}			LA10: ;
		}		LA8: ;
		nimln(1295, "system.nim");
		res_114463 = subInt(res_114463, 1);
	} LA5: ;
	nimln(228, "options.nim");
	result = copyString(((NimStringDesc*) &TMP313));
	BeforeRet: ;	popFrame();
	return result;
}
Ejemplo n.º 11
0
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) {
Ejemplo n.º 12
0
N_NIMCALL(NI, binarystrsearch_114655)(NimStringDesc** x, NI xLen0, NimStringDesc* y) {
	NI result;
	NI a;
	NI b;
	NI TMP364;
	nimfr("binaryStrSearch", "options.nim")
	result = 0;
	nimln(324, "options.nim");
	a = 0;
	nimln(325, "options.nim");
	nimln(325, "options.nim");
	nimln(325, "options.nim");
	TMP364 = subInt(xLen0, 1);
	b = (NI32)(TMP364);
	nimln(326, "options.nim");
	while (1) {
		NI mid;
		NI TMP365;
		NI TMP366;
		NI c;
		nimln(326, "options.nim");
		if (!(a <= b)) goto LA1;
		nimln(327, "options.nim");
		nimln(327, "options.nim");
		nimln(327, "options.nim");
		TMP365 = addInt(a, b);
		TMP366 = divInt((NI32)(TMP365), 2);
		mid = (NI32)(TMP366);
		nimln(328, "options.nim");
		if ((NU)(mid) >= (NU)(xLen0)) raiseIndexError();
		c = nsuCmpIgnoreCase(x[mid], y);
		nimln(329, "options.nim");
		{
			NI TMP367;
			nimln(329, "options.nim");
			if (!(c < 0)) goto LA4;
			nimln(330, "options.nim");
			nimln(330, "options.nim");
			TMP367 = addInt(mid, 1);
			a = (NI32)(TMP367);
		}		goto LA2;
		LA4: ;
		{
			NI TMP368;
			nimln(706, "system.nim");
			if (!(0 < c)) goto LA7;
			nimln(332, "options.nim");
			nimln(332, "options.nim");
			TMP368 = subInt(mid, 1);
			b = (NI32)(TMP368);
		}		goto LA2;
		LA7: ;
		{
			nimln(334, "options.nim");
			nimln(334, "options.nim");
			result = mid;
			goto BeforeRet;
		}		LA2: ;
	} LA1: ;
	nimln(335, "options.nim");
	result = -1;
	BeforeRet: ;	popFrame();
	return result;
}N_NOINLINE(void, compileroptionsInit)(void) {
Ejemplo n.º 13
0
N_NIMCALL(void, libcandidates_114600)(NimStringDesc* s, TY9552** dest) {
	NI le;
	NI ri;
	NI TMP353;
	nimfr("libCandidates", "options.nim")
	nimln(299, "options.nim");
	le = nsuFindChar(s, 40, 0);
	nimln(300, "options.nim");
	nimln(300, "options.nim");
	TMP353 = addInt(le, 1);
	ri = nsuFindChar(s, 41, (NI32)(TMP353));
	nimln(301, "options.nim");
	{
		NIM_BOOL LOC3;
		NimStringDesc* prefix;
		NI TMP354;
		NimStringDesc* suffix;
		NI TMP355;
		NimStringDesc* middle_114611;
		NimStringDesc* HEX3Atmp_114626;
		NI TMP356;
		NI TMP357;
		NI last_114628;
		nimln(301, "options.nim");
		LOC3 = 0;
		nimln(702, "system.nim");
		LOC3 = (0 <= le);
		if (!(LOC3)) goto LA4;
		nimln(706, "system.nim");
		LOC3 = (le < ri);
		LA4: ;
		if (!LOC3) goto LA5;
		nimln(302, "options.nim");
		nimln(302, "options.nim");
		nimln(302, "options.nim");
		TMP354 = subInt(le, 1);
		prefix = copyStrLast(s, 0, (NI32)(TMP354));
		nimln(303, "options.nim");
		nimln(303, "options.nim");
		nimln(303, "options.nim");
		TMP355 = addInt(ri, 1);
		suffix = copyStr(s, (NI32)(TMP355));
		middle_114611 = 0;
		HEX3Atmp_114626 = 0;
		nimln(304, "options.nim");
		nimln(304, "options.nim");
		nimln(304, "options.nim");
		TMP356 = addInt(le, 1);
		nimln(304, "options.nim");
		TMP357 = subInt(ri, 1);
		HEX3Atmp_114626 = copyStrLast(s, (NI32)(TMP356), (NI32)(TMP357));
		nimln(247, "strutils.nim");
		last_114628 = 0;
		nimln(248, "strutils.nim");
		{
			if (!NIM_FALSE) goto LA9;
			nimln(248, "strutils.nim");
			hiddenraiseassert_76017(((NimStringDesc*) &TMP358));		}		LA9: ;
		nimln(249, "strutils.nim");
		{
			nimln(706, "system.nim");
			nimln(249, "strutils.nim");
			if (!(0 < HEX3Atmp_114626->Sup.len)) goto LA13;
			nimln(251, "strutils.nim");
			while (1) {
				NI first_114630;
				NI TMP359;
				NimStringDesc* LOC19;
				nimln(251, "strutils.nim");
				nimln(251, "strutils.nim");
				if (!(last_114628 <= HEX3Atmp_114626->Sup.len)) goto LA15;
				nimln(252, "strutils.nim");
				first_114630 = last_114628;
				nimln(253, "strutils.nim");
				while (1) {
					NIM_BOOL LOC17;
					nimln(253, "strutils.nim");
					LOC17 = 0;
					nimln(253, "strutils.nim");
					nimln(253, "strutils.nim");
					LOC17 = (last_114628 < HEX3Atmp_114626->Sup.len);
					if (!(LOC17)) goto LA18;
					nimln(698, "system.nim");
					nimln(698, "system.nim");
					if ((NU)(last_114628) > (NU)(HEX3Atmp_114626->Sup.len)) raiseIndexError();
					LOC17 = !(((NU8)(HEX3Atmp_114626->data[last_114628]) == (NU8)(124)));
					LA18: ;
					if (!LOC17) goto LA16;
					nimln(253, "strutils.nim");
					last_114628 = addInt(last_114628, 1);
				} LA16: ;
				nimln(254, "strutils.nim");
				nimln(254, "strutils.nim");
				nimln(254, "strutils.nim");
				TMP359 = subInt(last_114628, 1);
				middle_114611 = copyStrLast(HEX3Atmp_114626, first_114630, (NI32)(TMP359));
				nimln(305, "options.nim");
				nimln(305, "options.nim");
				LOC19 = 0;
				LOC19 = rawNewString(prefix->Sup.len + middle_114611->Sup.len + suffix->Sup.len + 0);
appendString(LOC19, prefix);
appendString(LOC19, middle_114611);
appendString(LOC19, suffix);
				libcandidates_114600(LOC19, dest);				nimln(255, "strutils.nim");
				last_114628 = addInt(last_114628, 1);
			} LA15: ;
		}		LA13: ;
	}	goto LA1;
	LA5: ;
	{
		NimStringDesc* LOC21;
		nimln(307, "options.nim");
		(*dest) = (TY9552*) incrSeq(&((*dest))->Sup, sizeof(NimStringDesc*));
		LOC21 = 0;
		LOC21 = (*dest)->data[(*dest)->Sup.len-1]; (*dest)->data[(*dest)->Sup.len-1] = copyStringRC1(s);
		if (LOC21) nimGCunrefNoCycle(LOC21);
	}	LA1: ;
	popFrame();
}
Ejemplo n.º 14
0
N_NIMCALL(void, initdefines_168072)(void) {
	NimStringDesc* LOC13;
	NimStringDesc* LOC14;
	NimStringDesc* LOC15;
	nimfr("initDefines", "condsyms.nim")
	nimln(41, "condsyms.nim");
	asgnRef((void**) &gsymbols_168003, nstnewStringTable(((NU8) 2)));
	nimln(42, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP982));
	nimln(44, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP983));
	nimln(45, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP984));
	nimln(46, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP985));
	nimln(47, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP986));
	nimln(48, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP987));
	nimln(49, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP988));
	nimln(50, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP989));
	nimln(51, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP990));
	nimln(52, "condsyms.nim");
	definesymbol_168006(((NimStringDesc*) &TMP991));
	nimln(55, "condsyms.nim");
	switch (targetcpu_142573) {
	case ((NU8) 1):
	{
		nimln(56, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP992));
	}
	break;
	case ((NU8) 8):
	{
		nimln(57, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP993));
	}
	break;
	case ((NU8) 9):
	{
		nimln(58, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP994));
	}
	break;
	default:
	{
	}
	break;
	}
	nimln(60, "condsyms.nim");
	switch (targetos_142575) {
	case ((NU8) 1):
	{
		nimln(62, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP995));
	}
	break;
	case ((NU8) 2):
	{
		nimln(64, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP996));
		nimln(65, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP997));
	}
	break;
	case ((NU8) 4):
	case ((NU8) 5):
	case ((NU8) 6):
	case ((NU8) 8):
	case ((NU8) 13):
	case ((NU8) 14):
	case ((NU8) 16):
	case ((NU8) 12):
	case ((NU8) 20):
	{
		nimln(69, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP998));
		nimln(70, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP999));
	}
	break;
	case ((NU8) 7):
	{
		nimln(72, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP1000));
		nimln(73, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP998));
		nimln(74, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP999));
	}
	break;
	case ((NU8) 9):
	case ((NU8) 10):
	case ((NU8) 11):
	{
		nimln(76, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP998));
		nimln(77, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP1001));
		nimln(78, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP999));
	}
	break;
	case ((NU8) 18):
	{
		nimln(80, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP1002));
	}
	break;
	case ((NU8) 19):
	{
		nimln(82, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP1002));
		nimln(83, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP998));
		nimln(84, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP999));
	}
	break;
	default:
	{
	}
	break;
	}
	nimln(86, "condsyms.nim");
	nimln(86, "condsyms.nim");
	LOC13 = 0;
	nimln(86, "condsyms.nim");
	if (targetcpu_142573 < 1 || targetcpu_142573 > 14) raiseIndexError();
	LOC14 = 0;
	LOC14 = nimIntToStr(cpu_142468[(targetcpu_142573)- 1].Field4);
	LOC13 = rawNewString(LOC14->Sup.len + 3);
appendString(LOC13, ((NimStringDesc*) &TMP1003));
appendString(LOC13, LOC14);
	definesymbol_168006(LOC13);
	nimln(87, "condsyms.nim");
	nimln(87, "condsyms.nim");
	if (targetcpu_142573 < 1 || targetcpu_142573 > 14) raiseIndexError();
	LOC15 = 0;
	LOC15 = nsuNormalize(endiantostr_142462[(cpu_142468[(targetcpu_142573)- 1].Field2)- 0]);
	definesymbol_168006(LOC15);
	nimln(88, "condsyms.nim");
	if (targetcpu_142573 < 1 || targetcpu_142573 > 14) raiseIndexError();
	definesymbol_168006(cpu_142468[(targetcpu_142573)- 1].Field0);
	nimln(89, "condsyms.nim");
	if (targetos_142575 < 1 || targetos_142575 > 23) raiseIndexError();
	definesymbol_168006(os_142063[(targetos_142575)- 1].Field0);
	nimln(90, "condsyms.nim");
	{
		nimln(90, "condsyms.nim");
		if (targetos_142575 < 1 || targetos_142575 > 23) raiseIndexError();
		if (!((os_142063[(targetos_142575)- 1].Field12 &(1<<((((NU8) 3))&7)))!=0)) goto LA18;
		nimln(91, "condsyms.nim");
		definesymbol_168006(((NimStringDesc*) &TMP1006));
	}
	LA18: ;
	popFrame();
}
Ejemplo n.º 15
0
N_NIMCALL(NIM_BOOL, llstreamreadline_179248)(tllstream179204* s, NimStringDesc** line) {
	NIM_BOOL result;
	nimfr("llStreamReadLine", "llstream.nim")
	result = 0;
	nimln(145, "llstream.nim");
	(*line) = setLengthStr((*line), 0);
	nimln(146, "llstream.nim");
	switch ((*s).Kind) {
	case ((NU8) 0):
	{
		nimln(148, "llstream.nim");
		result = NIM_TRUE;
	}
	break;
	case ((NU8) 1):
	{
		NIM_BOOL LOC11;
		nimln(150, "llstream.nim");
		while (1) {
			nimln(150, "llstream.nim");
			nimln(150, "llstream.nim");
			if (!((*s).Rd < (*s).S->Sup.len)) goto LA3;
			nimln(151, "llstream.nim");
			if ((NU)((*s).Rd) > (NU)((*s).S->Sup.len)) raiseIndexError();
			switch (((NU8)((*s).S->data[(*s).Rd]))) {
			case 13:
			{
				nimln(153, "llstream.nim");
				(*s).Rd = addInt((*s).Rd, 1);
				nimln(154, "llstream.nim");
				{
					nimln(154, "llstream.nim");
					if ((NU)((*s).Rd) > (NU)((*s).S->Sup.len)) raiseIndexError();
					if (!((NU8)((*s).S->data[(*s).Rd]) == (NU8)(10))) goto LA7;
					nimln(154, "llstream.nim");
					(*s).Rd = addInt((*s).Rd, 1);
				}
				LA7: ;
				nimln(155, "llstream.nim");
				goto LA3;
			}
			break;
			case 10:
			{
				nimln(157, "llstream.nim");
				(*s).Rd = addInt((*s).Rd, 1);
				nimln(158, "llstream.nim");
				goto LA3;
			}
			break;
			default:
			{
				nimln(160, "llstream.nim");
				if ((NU)((*s).Rd) > (NU)((*s).S->Sup.len)) raiseIndexError();
				(*line) = addChar((*line), (*s).S->data[(*s).Rd]);
				nimln(161, "llstream.nim");
				(*s).Rd = addInt((*s).Rd, 1);
			}
			break;
			}
		} LA3: ;
		nimln(162, "llstream.nim");
		nimln(162, "llstream.nim");
		LOC11 = 0;
		nimln(162, "llstream.nim");
		nimln(162, "llstream.nim");
		LOC11 = (0 < (*line)->Sup.len);
		if (LOC11) goto LA12;
		nimln(162, "llstream.nim");
		nimln(162, "llstream.nim");
		LOC11 = ((*s).Rd < (*s).S->Sup.len);
		LA12: ;
		result = LOC11;
	}
	break;
	case ((NU8) 2):
	{
		nimln(164, "llstream.nim");
		result = readline_10687((*s).F, line);
	}
	break;
	case ((NU8) 3):
	{
		nimln(166, "llstream.nim");
		result = readline_10687(stdin, line);
	}
	break;
	}
	popFrame();
	return result;
}
Ejemplo n.º 16
0
N_NIMCALL(tnode185813*, evaltemplate_389275)(tnode185813* n, tsym185843* tmpl, tsym185843* gensymowner) {
	tnode185813* result;
	tnode185813* args;
	templctx389010 ctx;
	tnode185813* body;
	nimfr("evalTemplate", "evaltempl.nim")
	result = 0;
	nimln(78, "evaltempl.nim");
	evaltemplatecounter_389273 = addInt(evaltemplatecounter_389273, 1);
	nimln(79, "evaltempl.nim");
	{
		nimln(79, "evaltempl.nim");
		if (!(100 < evaltemplatecounter_389273)) goto LA3;
		nimln(80, "evaltempl.nim");
		globalerror_163558((*n).Info, ((NU16) 183), ((NimStringDesc*) &TMP5469));
		nimln(81, "evaltempl.nim");
		result = n;
	}
	LA3: ;
	nimln(84, "evaltempl.nim");
	args = evaltemplateargs_389174(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_186130(&ctx.Mapping);
	nimln(90, "evaltempl.nim");
	body = getbody_237244(tmpl);
	nimln(91, "evaltempl.nim");
	{
		NIM_BOOL LOC7;
		nimln(91, "evaltempl.nim");
		LOC7 = 0;
		LOC7 = isatom_192186(body);
		if (!LOC7) goto LA8;
		nimln(92, "evaltempl.nim");
		result = newnodei_186109(((NU8) 37), (*body).Info);
		nimln(93, "evaltempl.nim");
		evaltemplateaux_389024(body, args, &ctx, result);
		nimln(94, "evaltempl.nim");
		{
			NI LOC12;
			nimln(94, "evaltempl.nim");
			nimln(94, "evaltempl.nim");
			LOC12 = 0;
			LOC12 = len_186274(result);
			if (!(LOC12 == 1)) goto LA13;
			nimln(94, "evaltempl.nim");
			if (((TMP5464[(*result).Kind/8] &(1<<((*result).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
			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_209051(result, 4);
			globalerror_163558((*result).Info, ((NU16) 1), LOC16);
		}
		LA10: ;
	}
	goto LA5;
	LA8: ;
	{
		NI i_389345;
		NI HEX3Atmp_389378;
		NI LOC22;
		NI TMP5471;
		NI res_389380;
		nimln(99, "evaltempl.nim");
		result = copynode_186243(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_389345 = 0;
		HEX3Atmp_389378 = 0;
		nimln(103, "evaltempl.nim");
		nimln(103, "evaltempl.nim");
		nimln(103, "evaltempl.nim");
		LOC22 = 0;
		LOC22 = safelen_186330(body);
		TMP5471 = subInt(LOC22, 1);
		HEX3Atmp_389378 = (NI32)(TMP5471);
		nimln(1450, "system.nim");
		res_389380 = 0;
		nimln(1451, "system.nim");
		while (1) {
			nimln(1451, "system.nim");
			if (!(res_389380 <= HEX3Atmp_389378)) goto LA23;
			nimln(1450, "system.nim");
			i_389345 = res_389380;
			nimln(104, "evaltempl.nim");
			if (((TMP5464[(*body).Kind/8] &(1<<((*body).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5465));
			if ((NU)(i_389345) >= (NU)((*body).kindU.S6.Sons->Sup.len)) raiseIndexError();
			evaltemplateaux_389024((*body).kindU.S6.Sons->data[i_389345], args, &ctx, result);
			nimln(1453, "system.nim");
			res_389380 = addInt(res_389380, 1);
		} LA23: ;
	}
	LA5: ;
	nimln(106, "evaltempl.nim");
	evaltemplatecounter_389273 = subInt(evaltemplatecounter_389273, 1);
	popFrame();
	return result;
}
Ejemplo n.º 17
0
N_NIMCALL(NimStringDesc*, llstreamreadall_179254)(tllstream179204* s) {
	NimStringDesc* result;
	nimfr("llStreamReadAll", "llstream.nim")
	result = 0;
	nimln(209, "llstream.nim");
	switch ((*s).Kind) {
	case ((NU8) 0):
	case ((NU8) 3):
	{
		nimln(211, "llstream.nim");
		result = copyString(((NimStringDesc*) &TMP1631));
	}
	break;
	case ((NU8) 1):
	{
		nimln(213, "llstream.nim");
		{
			nimln(213, "llstream.nim");
			if (!((*s).Rd == 0)) goto LA5;
			nimln(213, "llstream.nim");
			result = copyString((*s).S);
		}
		goto LA3;
		LA5: ;
		{
			nimln(214, "llstream.nim");
			nimln(214, "llstream.nim");
			result = copyStr((*s).S, (*s).Rd);
		}
		LA3: ;
		nimln(215, "llstream.nim");
		nimln(215, "llstream.nim");
		(*s).Rd = (*s).S->Sup.len;
	}
	break;
	case ((NU8) 2):
	{
		NI bytes;
		NI i;
		nimln(217, "llstream.nim");
		nimln(217, "llstream.nim");
		result = mnewString(2048);
		nimln(218, "llstream.nim");
		if ((NU)(0) > (NU)(result->Sup.len)) raiseIndexError();
		bytes = readbuffer_10827((*s).F, ((void*) (&result->data[0])), 2048);
		nimln(219, "llstream.nim");
		i = bytes;
		nimln(220, "llstream.nim");
		while (1) {
			NI TMP1645;
			NI TMP1646;
			nimln(220, "llstream.nim");
			if (!(bytes == 2048)) goto LA9;
			nimln(221, "llstream.nim");
			nimln(221, "llstream.nim");
			TMP1645 = addInt(i, 2048);
			result = setLengthStr(result, (NI32)(TMP1645));
			nimln(222, "llstream.nim");
			nimln(222, "llstream.nim");
			TMP1646 = addInt(i, 0);
			if ((NU)((NI32)(TMP1646)) > (NU)(result->Sup.len)) raiseIndexError();
			bytes = readbuffer_10827((*s).F, ((void*) (&result->data[(NI32)(TMP1646)])), 2048);
			nimln(223, "llstream.nim");
			i = addInt(i, bytes);
		} LA9: ;
		nimln(224, "llstream.nim");
		result = setLengthStr(result, i);
	}
	break;
	}
	popFrame();
	return result;
}
Ejemplo n.º 18
0
N_NIMCALL(void, render_154030)(void) {
    Entityobj149007* LOC17;
    NimStringDesc* LOC18;
    NimStringDesc* LOC19;
    nimfr("render", "game.nim")
    nimln(22, "game.nim");
    clear_142252();
    {
        WallHEX3Aobjecttype153013* i_154211;
        NI i_154416;
        NI L_154418;
        i_154211 = 0;
        nimln(3084, "system.nim");
        i_154416 = ((NI) 0);
        nimln(3085, "system.nim");
        L_154418 = (map_154010 ? map_154010->Sup.len : 0);
        {
            nimln(3086, "system.nim");
            while (1) {
                Entityobj149007* LOC4;
                NI TMP371;
                if (!(i_154416 < L_154418)) goto LA3;
                nimln(3087, "system.nim");
                if ((NU)(i_154416) >= (NU)(map_154010->Sup.len)) raiseIndexError();
                i_154211 = map_154010->data[i_154416];
                nimln(24, "game.nim");
                LOC4 = 0;
                LOC4 = &i_154211->Sup;
                draw_149042(LOC4);
                nimln(3088, "system.nim");
                TMP371 = addInt(i_154416, ((NI) 1));
                i_154416 = (NI)(TMP371);
                nimln(3089, "system.nim");
                {
                    if (!!(((map_154010 ? map_154010->Sup.len : 0) == L_154418))) goto LA7;
                    failedassertimpl_88817(((NimStringDesc*) &TMP372));
                }
LA7:
                ;
            }
LA3:
            ;
        }
    }
    {
        BombHEX3Aobjecttype151022* i_154411;
        NI i_154422;
        NI L_154424;
        i_154411 = 0;
        nimln(3084, "system.nim");
        i_154422 = ((NI) 0);
        nimln(3085, "system.nim");
        L_154424 = (bombs_154006 ? bombs_154006->Sup.len : 0);
        {
            nimln(3086, "system.nim");
            while (1) {
                Entityobj149007* LOC12;
                NI TMP373;
                if (!(i_154422 < L_154424)) goto LA11;
                nimln(3087, "system.nim");
                if ((NU)(i_154422) >= (NU)(bombs_154006->Sup.len)) raiseIndexError();
                i_154411 = bombs_154006->data[i_154422];
                nimln(27, "game.nim");
                LOC12 = 0;
                LOC12 = &i_154411->Sup;
                draw_149042(LOC12);
                nimln(3088, "system.nim");
                TMP373 = addInt(i_154422, ((NI) 1));
                i_154422 = (NI)(TMP373);
                nimln(3089, "system.nim");
                {
                    if (!!(((bombs_154006 ? bombs_154006->Sup.len : 0) == L_154424))) goto LA15;
                    failedassertimpl_88817(((NimStringDesc*) &TMP372));
                }
LA15:
                ;
            }
LA11:
            ;
        }
    }
    nimln(29, "game.nim");
    LOC17 = 0;
    LOC17 = &player1_154008->Sup;
    draw_149042(LOC17);
    nimln(30, "game.nim");
    LOC18 = 0;
    LOC19 = 0;
    LOC19 = nimIntToStr(score_154007);
    LOC18 = rawNewString(LOC19->Sup.len + 7);
    appendString(LOC18, ((NimStringDesc*) &TMP374));
    appendString(LOC18, LOC19);
    rendertext_142287(LOC18->data, ((NI32) 5), ((NI32) 5), ((NU8) 2));
    nimln(31, "game.nim");
    present_142261();
    popFrame();
}
Ejemplo n.º 19
0
N_NIMCALL(Tnode190813*, evaltemplateargs_383184)(Tnode190813* n, Tsym190843* s) {
	Tnode190813* result;
	NI a;
	NI f;
	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_193403(n);
	}
	break;
	default:
	{
		nimln(63, "evaltempl.nim");
		a = ((NI) 0);
	}
	break;
	}
	nimln(64, "evaltempl.nim");
	f = sonslen_193351((*s).typ);
	nimln(65, "evaltempl.nim");
	{
		if (!(f < a)) goto LA5;
		globalerror_164134((*n).info, ((NU16) 133), ((NimStringDesc*) &TMP7633));
	}
	LA5: ;
	nimln(67, "evaltempl.nim");
	result = newnodei_192351(((NU8) 152), (*n).info);
	{
		NI i_383204;
		NI HEX3Atmp_383234;
		NI TMP7634;
		NI res_383237;
		i_383204 = 0;
		HEX3Atmp_383234 = 0;
		nimln(68, "evaltempl.nim");
		TMP7634 = subInt(f, ((NI) 1));
		HEX3Atmp_383234 = (NI)(TMP7634);
		nimln(1598, "system.nim");
		res_383237 = ((NI) 1);
		{
			nimln(1599, "system.nim");
			while (1) {
				Tnode190813* arg;
				NI TMP7635;
				if (!(res_383237 <= HEX3Atmp_383234)) goto LA9;
				nimln(1600, "system.nim");
				i_383204 = res_383237;
				nimln(69, "evaltempl.nim");
				{
					if (!(i_383204 < a)) goto LA12;
					if (((TMP7626[(*n).kind/8] &(1<<((*n).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
					if ((NU)(i_383204) >= (NU)((*n).kindU.S6.sons->Sup.len)) raiseIndexError();
					arg = (*n).kindU.S6.sons->data[i_383204];
				}
				goto LA10;
				LA12: ;
				{
					if (((TMP7626[(*(*(*s).typ).n).kind/8] &(1<<((*(*(*s).typ).n).kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP7627));
					if ((NU)(i_383204) >= (NU)((*(*(*s).typ).n).kindU.S6.sons->Sup.len)) raiseIndexError();
					if (!(((TMP7624[(*(*(*(*s).typ).n).kindU.S6.sons->data[i_383204]).kind/8] &(1<<((*(*(*(*s).typ).n).kindU.S6.sons->data[i_383204]).kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP7625));
					arg = copytree_195028((*(*(*(*(*s).typ).n).kindU.S6.sons->data[i_383204]).kindU.S4.sym).ast);
				}
				LA10: ;
				nimln(70, "evaltempl.nim");
				{
					NIM_BOOL LOC17;
					LOC17 = 0;
					LOC17 = (arg == NIM_NIL);
					if (LOC17) goto LA18;
					LOC17 = ((*arg).kind == ((NU8) 1));
					LA18: ;
					if (!LOC17) goto LA19;
					nimln(71, "evaltempl.nim");
					localerror_164155((*n).info, ((NU16) 133), ((NimStringDesc*) &TMP7633));
				}
				LA19: ;
				nimln(72, "evaltempl.nim");
				addson_192819(result, arg);
				nimln(1614, "system.nim");
				TMP7635 = addInt(res_383237, ((NI) 1));
				res_383237 = (NI)(TMP7635);
			} LA9: ;
		}
	}
	popFrame();
	return result;
}
Ejemplo n.º 20
0
N_NIMCALL(void, loadlevel_154449)(NimStringDesc* name) {
    NimStringDesc* LOC1;
    NI32 x;
    NI32 y;
    nimfr("loadLevel", "game.nim")
    nimln(34, "game.nim");
    LOC1 = 0;
    LOC1 = rawNewString(name->Sup.len + 9);
    appendString(LOC1, ((NimStringDesc*) &TMP375));
    appendString(LOC1, name);
    appendString(LOC1, ((NimStringDesc*) &TMP376));
    asgnRefNoCycle((void**) (&mapstring_154011), readfile_13434(LOC1));
    nimln(35, "game.nim");
    x = ((NI32) 0);
    y = ((NI32) 0);
    {
        NIM_CHAR character_154454;
        NI i_154506;
        NI L_154508;
        character_154454 = 0;
        nimln(3102, "system.nim");
        i_154506 = ((NI) 0);
        nimln(3103, "system.nim");
        L_154508 = (mapstring_154011 ? mapstring_154011->Sup.len : 0);
        {
            nimln(3104, "system.nim");
            while (1) {
                NimStringDesc* LOC5;
                NI TMP385;
                if (!(i_154506 < L_154508)) goto LA4;
                nimln(3105, "system.nim");
                if ((NU)(i_154506) > (NU)(mapstring_154011->Sup.len)) raiseIndexError();
                character_154454 = mapstring_154011->data[i_154506];
                nimln(37, "game.nim");
                LOC5 = 0;
                LOC5 = nimIntToStr(((NI) (x)));
                printf("%s\015\012", LOC5? (LOC5)->data:"nil");
                nimln(38, "game.nim");
                {
                    NI32 TMP377;
                    NI32 TMP378;
                    WallHEX3Aobjecttype153013* LOC10;
                    NI32 TMP379;
                    if (!((NU8)(character_154454) == (NU8)(49))) goto LA8;
                    nimln(39, "game.nim");
                    TMP377 = mulInt(x, tilesize_154012);
                    TMP378 = mulInt(y, tilesize_154012);
                    LOC10 = 0;
                    LOC10 = newwall_153024((NI32)(TMP377), (NI32)(TMP378));
                    map_154010 = (TY154009*) incrSeq(&(map_154010)->Sup, sizeof(WallHEX3Aobjecttype153013*));
                    asgnRef((void**) (&map_154010->data[map_154010->Sup.len-1]), LOC10);
                    nimln(40, "game.nim");
                    TMP379 = addInt(x, ((NI) 1));
                    x = (NI32)(TMP379);
                }
                goto LA6;
LA8:
                ;
                {
                    NI32 TMP380;
                    NI32 TMP381;
                    NI32 TMP382;
                    nimln(41, "game.nim");
                    if (!((NU8)(character_154454) == (NU8)(80))) goto LA12;
                    nimln(42, "game.nim");
                    TMP380 = mulInt(x, tilesize_154012);
                    TMP381 = mulInt(y, tilesize_154012);
                    asgnRef((void**) (&player1_154008), newplayer_152024((NI32)(TMP380), (NI32)(TMP381)));
                    nimln(43, "game.nim");
                    TMP382 = addInt(x, ((NI) 1));
                    x = (NI32)(TMP382);
                }
                goto LA6;
LA12:
                ;
                {
                    NI32 TMP383;
                    nimln(44, "game.nim");
                    if (!((NU8)(character_154454) == (NU8)(48))) goto LA15;
                    nimln(45, "game.nim");
                    TMP383 = addInt(x, ((NI) 1));
                    x = (NI32)(TMP383);
                }
                goto LA6;
LA15:
                ;
                {
                    NI32 TMP384;
                    nimln(46, "game.nim");
                    if (!((NU8)(character_154454) == (NU8)(13))) goto LA18;
                    nimln(47, "game.nim");
                    TMP384 = addInt(y, ((NI) 1));
                    y = (NI32)(TMP384);
                    nimln(48, "game.nim");
                    x = ((NI32) 0);
                }
                goto LA6;
LA18:
                ;
LA6:
                ;
                nimln(3106, "system.nim");
                TMP385 = addInt(i_154506, ((NI) 1));
                i_154506 = (NI)(TMP385);
                nimln(3107, "system.nim");
                {
                    if (!!(((mapstring_154011 ? mapstring_154011->Sup.len : 0) == L_154508))) goto LA22;
                    failedassertimpl_88817(((NimStringDesc*) &TMP386));
                }
LA22:
                ;
            }
LA4:
            ;
        }
    }
    popFrame();
}
Ejemplo n.º 21
0
N_NIMCALL(trope148007*, ropef_148079)(NimStringDesc* frmt, trope148007** args, NI argsLen0) {
	trope148007* result;
	NI i;
	NI length;
	NI num;
	nimfr("ropef", "ropes.nim")
	result = 0;
	nimln(243, "ropes.nim");
	i = 0;
	nimln(244, "ropes.nim");
	nimln(244, "ropes.nim");
	length = frmt->Sup.len;
	nimln(245, "ropes.nim");
	result = NIM_NIL;
	nimln(246, "ropes.nim");
	num = 0;
	nimln(247, "ropes.nim");
	while (1) {
		NI TMP558;
		NI start;
		nimln(247, "ropes.nim");
		nimln(247, "ropes.nim");
		TMP558 = subInt(length, 1);
		if (!(i <= (NI32)(TMP558))) goto LA1;
		nimln(248, "ropes.nim");
		{
			nimln(248, "ropes.nim");
			if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
			if (!((NU8)(frmt->data[i]) == (NU8)(36))) goto LA4;
			nimln(249, "ropes.nim");
			i = addInt(i, 1);
			nimln(250, "ropes.nim");
			if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
			switch (((NU8)(frmt->data[i]))) {
			case 36:
			{
				nimln(252, "ropes.nim");
				app_148046(&result, ((NimStringDesc*) &TMP559));
				nimln(253, "ropes.nim");
				i = addInt(i, 1);
			}
			break;
			case 35:
			{
				nimln(255, "ropes.nim");
				i = addInt(i, 1);
				nimln(256, "ropes.nim");
				if ((NU)(num) >= (NU)(argsLen0)) raiseIndexError();
				app_148040(&result, args[num]);
				nimln(257, "ropes.nim");
				num = addInt(num, 1);
			}
			break;
			case 48 ... 57:
			{
				NI j;
				nimln(259, "ropes.nim");
				j = 0;
				nimln(260, "ropes.nim");
				while (1) {
					NI TMP560;
					NI TMP561;
					NI TMP562;
					nimln(261, "ropes.nim");
					nimln(261, "ropes.nim");
					nimln(261, "ropes.nim");
					nimln(261, "ropes.nim");
					TMP560 = mulInt(j, 10);
					nimln(261, "ropes.nim");
					if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
					TMP561 = addInt((NI32)(TMP560), ((NI) (((NU8)(frmt->data[i])))));
					TMP562 = subInt((NI32)(TMP561), 48);
					j = (NI32)(TMP562);
					nimln(262, "ropes.nim");
					i = addInt(i, 1);
					nimln(263, "ropes.nim");
					{
						NIM_BOOL LOC12;
						NI TMP563;
						NI TMP564;
						nimln(263, "ropes.nim");
						LOC12 = 0;
						nimln(263, "ropes.nim");
						nimln(263, "ropes.nim");
						nimln(263, "ropes.nim");
						TMP563 = addInt(length, 0);
						TMP564 = subInt((NI32)(TMP563), 1);
						LOC12 = ((NI32)(TMP564) < i);
						if (LOC12) goto LA13;
						nimln(263, "ropes.nim");
						nimln(263, "ropes.nim");
						if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
						LOC12 = !((((NU8)(frmt->data[i])) >= ((NU8)(48)) && ((NU8)(frmt->data[i])) <= ((NU8)(57))));
						LA13: ;
						if (!LOC12) goto LA14;
						nimln(263, "ropes.nim");
						goto LA9;
					}
					LA14: ;
				} LA9: ;
				nimln(264, "ropes.nim");
				num = j;
				nimln(265, "ropes.nim");
				{
					NI TMP565;
					NimStringDesc* LOC20;
					nimln(265, "ropes.nim");
					nimln(265, "ropes.nim");
					nimln(265, "ropes.nim");
					TMP565 = addInt((argsLen0-1), 1);
					if (!((NI32)(TMP565) < j)) goto LA18;
					nimln(266, "ropes.nim");
					nimln(266, "ropes.nim");
					LOC20 = 0;
					LOC20 = nimIntToStr(j);
					errorhandler_148108.ClEnv? errorhandler_148108.ClPrc(((NU8) 1), LOC20, NIM_FALSE, errorhandler_148108.ClEnv):((TMP566)(errorhandler_148108.ClPrc))(((NU8) 1), LOC20, NIM_FALSE);
				}
				goto LA16;
				LA18: ;
				{
					NI TMP567;
					nimln(268, "ropes.nim");
					nimln(268, "ropes.nim");
					TMP567 = subInt(j, 1);
					if ((NU)((NI32)(TMP567)) >= (NU)(argsLen0)) raiseIndexError();
					app_148040(&result, args[(NI32)(TMP567)]);
				}
				LA16: ;
			}
			break;
			case 110:
			{
				nimln(270, "ropes.nim");
				app_148040(&result, softrnl_149435);
				nimln(271, "ropes.nim");
				i = addInt(i, 1);
			}
			break;
			case 78:
			{
				nimln(273, "ropes.nim");
				app_148040(&result, rnl_149434);
				nimln(274, "ropes.nim");
				i = addInt(i, 1);
			}
			break;
			default:
			{
				NimStringDesc* LOC25;
				nimln(276, "ropes.nim");
				nimln(276, "ropes.nim");
				if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
				LOC25 = 0;
				LOC25 = nimCharToStr(frmt->data[i]);
				errorhandler_148108.ClEnv? errorhandler_148108.ClPrc(((NU8) 1), LOC25, NIM_FALSE, errorhandler_148108.ClEnv):((TMP568)(errorhandler_148108.ClPrc))(((NU8) 1), LOC25, NIM_FALSE);
			}
			break;
			}
		}
		LA4: ;
		nimln(277, "ropes.nim");
		start = i;
		nimln(278, "ropes.nim");
		while (1) {
			nimln(278, "ropes.nim");
			if (!(i < length)) goto LA26;
			nimln(279, "ropes.nim");
			{
				nimln(279, "ropes.nim");
				nimln(279, "ropes.nim");
				if ((NU)(i) > (NU)(frmt->Sup.len)) raiseIndexError();
				if (!!(((NU8)(frmt->data[i]) == (NU8)(36)))) goto LA29;
				nimln(279, "ropes.nim");
				i = addInt(i, 1);
			}
			goto LA27;
			LA29: ;
			{
				nimln(280, "ropes.nim");
				goto LA26;
			}
			LA27: ;
		} LA26: ;
		nimln(281, "ropes.nim");
		{
			NI TMP569;
			NI TMP570;
			NimStringDesc* LOC36;
			nimln(281, "ropes.nim");
			nimln(281, "ropes.nim");
			TMP569 = subInt(i, 1);
			if (!(start <= (NI32)(TMP569))) goto LA34;
			nimln(282, "ropes.nim");
			nimln(282, "ropes.nim");
			nimln(282, "ropes.nim");
			TMP570 = subInt(i, 1);
			LOC36 = 0;
			LOC36 = copyStrLast(frmt, start, (NI32)(TMP570));
			app_148046(&result, LOC36);
		}
		LA34: ;
	} LA1: ;
	nimln(283, "ropes.nim");
	{
		NIM_BOOL LOC39;
		nimln(283, "ropes.nim");
		nimln(283, "ropes.nim");
		LOC39 = 0;
		LOC39 = ropeinvariant_148098(result);
		if (!!(LOC39)) goto LA40;
		nimln(283, "ropes.nim");
		failedassertimpl_80621(((NimStringDesc*) &TMP545));
	}
	LA40: ;
	popFrame();
	return result;
}
Ejemplo n.º 22
0
N_NIMCALL(tstringtable121810*, parsecookies_334012)(NimStringDesc* s) {
	tstringtable121810* result;
	NI i;
	nimfr("parseCookies", "cookies.nim")
	result = 0;
	nimln(16, "cookies.nim");
	result = nstnewStringTable(((NU8) 1));
	nimln(17, "cookies.nim");
	i = 0;
	nimln(18, "cookies.nim");
	while (1) {
		NI keystart;
		NI keyend;
		NI TMP4679;
		NI valstart;
		NimStringDesc* LOC15;
		NI TMP4680;
		NimStringDesc* LOC16;
		nimln(19, "cookies.nim");
		while (1) {
			NIM_BOOL LOC3;
			nimln(19, "cookies.nim");
			LOC3 = 0;
			nimln(19, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC3 = ((NU8)(s->data[i]) == (NU8)(32));
			if (LOC3) goto LA4;
			nimln(19, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC3 = ((NU8)(s->data[i]) == (NU8)(9));
			LA4: ;
			if (!LOC3) goto LA2;
			nimln(19, "cookies.nim");
			i = addInt(i, 1);
		} LA2: ;
		nimln(20, "cookies.nim");
		keystart = i;
		nimln(21, "cookies.nim");
		while (1) {
			NIM_BOOL LOC6;
			nimln(21, "cookies.nim");
			LOC6 = 0;
			nimln(21, "cookies.nim");
			nimln(21, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC6 = !(((NU8)(s->data[i]) == (NU8)(61)));
			if (!(LOC6)) goto LA7;
			nimln(21, "cookies.nim");
			nimln(21, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC6 = !(((NU8)(s->data[i]) == (NU8)(0)));
			LA7: ;
			if (!LOC6) goto LA5;
			nimln(21, "cookies.nim");
			i = addInt(i, 1);
		} LA5: ;
		nimln(22, "cookies.nim");
		nimln(22, "cookies.nim");
		TMP4679 = subInt(i, 1);
		keyend = (NI64)(TMP4679);
		nimln(23, "cookies.nim");
		{
			nimln(23, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!((NU8)(s->data[i]) == (NU8)(0))) goto LA10;
			nimln(23, "cookies.nim");
			goto LA1;
		}
		LA10: ;
		nimln(24, "cookies.nim");
		i = addInt(i, 1);
		nimln(25, "cookies.nim");
		valstart = i;
		nimln(26, "cookies.nim");
		while (1) {
			NIM_BOOL LOC13;
			nimln(26, "cookies.nim");
			LOC13 = 0;
			nimln(26, "cookies.nim");
			nimln(26, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC13 = !(((NU8)(s->data[i]) == (NU8)(59)));
			if (!(LOC13)) goto LA14;
			nimln(26, "cookies.nim");
			nimln(26, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			LOC13 = !(((NU8)(s->data[i]) == (NU8)(0)));
			LA14: ;
			if (!LOC13) goto LA12;
			nimln(26, "cookies.nim");
			i = addInt(i, 1);
		} LA12: ;
		nimln(27, "cookies.nim");
		nimln(27, "cookies.nim");
		LOC15 = 0;
		LOC15 = copyStrLast(s, keystart, keyend);
		nimln(27, "cookies.nim");
		nimln(27, "cookies.nim");
		TMP4680 = subInt(i, 1);
		LOC16 = 0;
		LOC16 = copyStrLast(s, valstart, (NI64)(TMP4680));
		nstPut(result, LOC15, LOC16);
		nimln(28, "cookies.nim");
		{
			nimln(28, "cookies.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!((NU8)(s->data[i]) == (NU8)(0))) goto LA19;
			nimln(28, "cookies.nim");
			goto LA1;
		}
		LA19: ;
		nimln(29, "cookies.nim");
		i = addInt(i, 1);
	} LA1: ;
	popFrame();
	return result;
}
Ejemplo n.º 23
0
N_NIMCALL(NI, hashignorestyle_121859)(NimStringDesc* x) {
	NI result;
	NI h;
	NI i_121874;
	NI HEX3Atmp_121927;
	NI TMP286;
	NI res_121929;
	nimfr("hashIgnoreStyle", "hashes.nim")
	result = 0;
	nimln(99, "hashes.nim");
	h = 0;
	i_121874 = 0;
	HEX3Atmp_121927 = 0;
	nimln(100, "hashes.nim");
	nimln(100, "hashes.nim");
	nimln(100, "hashes.nim");
	TMP286 = subInt(x->Sup.len, 1);
	HEX3Atmp_121927 = (NI64)(TMP286);
	nimln(1458, "system.nim");
	res_121929 = 0;
	nimln(1459, "system.nim");
	while (1) {
		nimln(1459, "system.nim");
		if (!(res_121929 <= HEX3Atmp_121927)) goto LA1;
		nimln(1458, "system.nim");
		i_121874 = res_121929;
		{
			NIM_CHAR c;
			nimln(101, "hashes.nim");
			if ((NU)(i_121874) > (NU)(x->Sup.len)) raiseIndexError();
			c = x->data[i_121874];
			nimln(102, "hashes.nim");
			{
				nimln(102, "hashes.nim");
				if (!((NU8)(c) == (NU8)(95))) goto LA5;
				nimln(103, "hashes.nim");
				goto LA2;
			}
			LA5: ;
			nimln(104, "hashes.nim");
			{
				NI TMP287;
				nimln(104, "hashes.nim");
				if (!(((NU8)(c)) >= ((NU8)(65)) && ((NU8)(c)) <= ((NU8)(90)))) goto LA9;
				nimln(105, "hashes.nim");
				nimln(105, "hashes.nim");
				nimln(105, "hashes.nim");
				nimln(105, "hashes.nim");
				TMP287 = addInt(((NI) (((NU8)(c)))), 32);
				c = ((NIM_CHAR) (((NI)chckRange((NI64)(TMP287), 0, 255))));
			}
			LA9: ;
			nimln(106, "hashes.nim");
			nimln(106, "hashes.nim");
			h = HEX21HEX26_121015(h, ((NI) (((NU8)(c)))));
		} LA2: ;
		nimln(1461, "system.nim");
		res_121929 = addInt(res_121929, 1);
	} LA1: ;
	nimln(107, "hashes.nim");
	result = HEX21HEX24_121040(h);
	popFrame();
	return result;
}
Ejemplo n.º 24
0
N_NIMCALL(tsym187843*, ithfield_416007)(tnode187813* n, NI field) {
	tsym187843* 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_416024;
		NI HEX3Atmp_416182;
		NI LOC2;
		NI TMP5672;
		NI res_416184;
		i_416024 = 0;
		HEX3Atmp_416182 = 0;
		nimln(19, "semmacrosanity.nim");
		nimln(19, "semmacrosanity.nim");
		nimln(19, "semmacrosanity.nim");
		LOC2 = 0;
		LOC2 = sonslen_188191(n);
		TMP5672 = subInt(LOC2, 1);
		HEX3Atmp_416182 = (NI64)(TMP5672);
		nimln(1450, "system.nim");
		res_416184 = 0;
		nimln(1451, "system.nim");
		while (1) {
			NI TMP5673;
			nimln(1451, "system.nim");
			if (!(res_416184 <= HEX3Atmp_416182)) goto LA3;
			nimln(1450, "system.nim");
			i_416024 = res_416184;
			nimln(20, "semmacrosanity.nim");
			if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
			if ((NU)(i_416024) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			nimln(20, "semmacrosanity.nim");
			TMP5673 = subInt(field, i_416024);
			result = ithfield_416007((*n).kindU.S6.Sons->data[i_416024], (NI64)(TMP5673));
			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(1453, "system.nim");
			res_416184 = addInt(res_416184, 1);
		} LA3: ;
	}
	break;
	case ((NU8) 137):
	{
		NI TMP5675;
		NI i_416122;
		NI HEX3Atmp_416186;
		NI LOC17;
		NI TMP5676;
		NI res_416188;
		nimln(23, "semmacrosanity.nim");
		{
			nimln(23, "semmacrosanity.nim");
			nimln(23, "semmacrosanity.nim");
			if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
			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_165591((*n).Info, ((NimStringDesc*) &TMP5674));
		}
		LA11: ;
		nimln(24, "semmacrosanity.nim");
		if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
		if ((NU)(0) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
		nimln(24, "semmacrosanity.nim");
		TMP5675 = subInt(field, 1);
		result = ithfield_416007((*n).kindU.S6.Sons->data[0], (NI64)(TMP5675));
		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_416122 = 0;
		HEX3Atmp_416186 = 0;
		nimln(26, "semmacrosanity.nim");
		nimln(26, "semmacrosanity.nim");
		nimln(26, "semmacrosanity.nim");
		LOC17 = 0;
		LOC17 = sonslen_188191(n);
		TMP5676 = subInt(LOC17, 1);
		HEX3Atmp_416186 = (NI64)(TMP5676);
		nimln(1450, "system.nim");
		res_416188 = 1;
		nimln(1451, "system.nim");
		while (1) {
			nimln(1451, "system.nim");
			if (!(res_416188 <= HEX3Atmp_416186)) goto LA18;
			nimln(1450, "system.nim");
			i_416122 = res_416188;
			nimln(27, "semmacrosanity.nim");
			if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
			if ((NU)(i_416122) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
			switch ((*(*n).kindU.S6.Sons->data[i_416122]).Kind) {
			case ((NU8) 85):
			case ((NU8) 88):
			{
				tnode187813* LOC20;
				NI TMP5678;
				nimln(29, "semmacrosanity.nim");
				nimln(29, "semmacrosanity.nim");
				if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
				if ((NU)(i_416122) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				LOC20 = 0;
				LOC20 = lastson_188199((*n).kindU.S6.Sons->data[i_416122]);
				nimln(29, "semmacrosanity.nim");
				TMP5678 = subInt(field, 1);
				result = ithfield_416007(LOC20, (NI64)(TMP5678));
				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_165591((*n).Info, ((NimStringDesc*) &TMP5679));
			}
			break;
			}
			nimln(1453, "system.nim");
			res_416188 = addInt(res_416188, 1);
		} LA18: ;
	}
	break;
	case ((NU8) 3):
	{
		nimln(33, "semmacrosanity.nim");
		{
			nimln(33, "semmacrosanity.nim");
			if (!(field == 0)) goto LA29;
			nimln(33, "semmacrosanity.nim");
			if (!(((TMP5680[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5681));
			result = (*n).kindU.S4.Sym;
		}
		LA29: ;
	}
	break;
	default:
	{
	}
	break;
	}
	BeforeRet: ;
	popFrame();
	return result;
}
Ejemplo n.º 25
0
N_NIMCALL(NI, npuParseBiggestFloat)(NimStringDesc* s, NF* number, NI start) {
	NI result;
	NF esign;
	NF sign;
	NI i;
	NI exponent;
	NI flags;
	NF hd;
	NI TMP1865;
	nimfr("parseBiggestFloat", "parseutils.nim")
	result = 0;
	nimln(251, "parseutils.nim");
	esign = 1.0000000000000000e+000;
	nimln(252, "parseutils.nim");
	sign = 1.0000000000000000e+000;
	nimln(253, "parseutils.nim");
	i = start;
	exponent = 0;
	flags = 0;
	nimln(256, "parseutils.nim");
	(*number) = 0.0;
	nimln(257, "parseutils.nim");
	{
		nimln(257, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!((NU8)(s->data[i]) == (NU8)(43))) goto LA3;
		nimln(257, "parseutils.nim");
		i = addInt(i, 1);
	}
	goto LA1;
	LA3: ;
	{
		nimln(258, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!((NU8)(s->data[i]) == (NU8)(45))) goto LA6;
		nimln(259, "parseutils.nim");
		sign = -1.0000000000000000e+000;
		nimln(260, "parseutils.nim");
		i = addInt(i, 1);
	}
	goto LA1;
	LA6: ;
	LA1: ;
	nimln(261, "parseutils.nim");
	{
		NIM_BOOL LOC10;
		nimln(261, "parseutils.nim");
		LOC10 = 0;
		nimln(261, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		LOC10 = ((NU8)(s->data[i]) == (NU8)(78));
		if (LOC10) goto LA11;
		nimln(261, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		LOC10 = ((NU8)(s->data[i]) == (NU8)(110));
		LA11: ;
		if (!LOC10) goto LA12;
		nimln(262, "parseutils.nim");
		{
			NIM_BOOL LOC16;
			NI TMP1846;
			NI TMP1847;
			nimln(262, "parseutils.nim");
			LOC16 = 0;
			nimln(262, "parseutils.nim");
			nimln(262, "parseutils.nim");
			TMP1846 = addInt(i, 1);
			if ((NU)((NI32)(TMP1846)) > (NU)(s->Sup.len)) raiseIndexError();
			LOC16 = ((NU8)(s->data[(NI32)(TMP1846)]) == (NU8)(65));
			if (LOC16) goto LA17;
			nimln(262, "parseutils.nim");
			nimln(262, "parseutils.nim");
			TMP1847 = addInt(i, 1);
			if ((NU)((NI32)(TMP1847)) > (NU)(s->Sup.len)) raiseIndexError();
			LOC16 = ((NU8)(s->data[(NI32)(TMP1847)]) == (NU8)(97));
			LA17: ;
			if (!LOC16) goto LA18;
			nimln(263, "parseutils.nim");
			{
				NIM_BOOL LOC22;
				NI TMP1848;
				NI TMP1849;
				nimln(263, "parseutils.nim");
				LOC22 = 0;
				nimln(263, "parseutils.nim");
				nimln(263, "parseutils.nim");
				TMP1848 = addInt(i, 2);
				if ((NU)((NI32)(TMP1848)) > (NU)(s->Sup.len)) raiseIndexError();
				LOC22 = ((NU8)(s->data[(NI32)(TMP1848)]) == (NU8)(78));
				if (LOC22) goto LA23;
				nimln(263, "parseutils.nim");
				nimln(263, "parseutils.nim");
				TMP1849 = addInt(i, 2);
				if ((NU)((NI32)(TMP1849)) > (NU)(s->Sup.len)) raiseIndexError();
				LOC22 = ((NU8)(s->data[(NI32)(TMP1849)]) == (NU8)(110));
				LA23: ;
				if (!LOC22) goto LA24;
				nimln(264, "parseutils.nim");
				{
					NI TMP1850;
					NI TMP1851;
					NI TMP1852;
					nimln(264, "parseutils.nim");
					nimln(264, "parseutils.nim");
					nimln(264, "parseutils.nim");
					TMP1850 = addInt(i, 3);
					if ((NU)((NI32)(TMP1850)) > (NU)(s->Sup.len)) raiseIndexError();
					if (!!((((NU8)(s->data[(NI32)(TMP1850)])) >= ((NU8)(97)) && ((NU8)(s->data[(NI32)(TMP1850)])) <= ((NU8)(122)) || ((NU8)(s->data[(NI32)(TMP1850)])) >= ((NU8)(65)) && ((NU8)(s->data[(NI32)(TMP1850)])) <= ((NU8)(90)) || ((NU8)(s->data[(NI32)(TMP1850)])) >= ((NU8)(48)) && ((NU8)(s->data[(NI32)(TMP1850)])) <= ((NU8)(57)) || ((NU8)(s->data[(NI32)(TMP1850)])) == ((NU8)(95))))) goto LA28;
					nimln(265, "parseutils.nim");
					(*number) = NAN;
					nimln(266, "parseutils.nim");
					nimln(266, "parseutils.nim");
					nimln(266, "parseutils.nim");
					nimln(266, "parseutils.nim");
					TMP1851 = addInt(i, 3);
					TMP1852 = subInt((NI32)(TMP1851), start);
					result = (NI32)(TMP1852);
					goto BeforeRet;
				}
				LA28: ;
			}
			LA24: ;
		}
		LA18: ;
		nimln(267, "parseutils.nim");
		nimln(267, "parseutils.nim");
		result = 0;
		goto BeforeRet;
	}
	LA12: ;
	nimln(268, "parseutils.nim");
	{
		NIM_BOOL LOC32;
		nimln(268, "parseutils.nim");
		LOC32 = 0;
		nimln(268, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		LOC32 = ((NU8)(s->data[i]) == (NU8)(73));
		if (LOC32) goto LA33;
		nimln(268, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		LOC32 = ((NU8)(s->data[i]) == (NU8)(105));
		LA33: ;
		if (!LOC32) goto LA34;
		nimln(269, "parseutils.nim");
		{
			NIM_BOOL LOC38;
			NI TMP1853;
			NI TMP1854;
			nimln(269, "parseutils.nim");
			LOC38 = 0;
			nimln(269, "parseutils.nim");
			nimln(269, "parseutils.nim");
			TMP1853 = addInt(i, 1);
			if ((NU)((NI32)(TMP1853)) > (NU)(s->Sup.len)) raiseIndexError();
			LOC38 = ((NU8)(s->data[(NI32)(TMP1853)]) == (NU8)(78));
			if (LOC38) goto LA39;
			nimln(269, "parseutils.nim");
			nimln(269, "parseutils.nim");
			TMP1854 = addInt(i, 1);
			if ((NU)((NI32)(TMP1854)) > (NU)(s->Sup.len)) raiseIndexError();
			LOC38 = ((NU8)(s->data[(NI32)(TMP1854)]) == (NU8)(110));
			LA39: ;
			if (!LOC38) goto LA40;
			nimln(270, "parseutils.nim");
			{
				NIM_BOOL LOC44;
				NI TMP1855;
				NI TMP1856;
				nimln(270, "parseutils.nim");
				LOC44 = 0;
				nimln(270, "parseutils.nim");
				nimln(270, "parseutils.nim");
				TMP1855 = addInt(i, 2);
				if ((NU)((NI32)(TMP1855)) > (NU)(s->Sup.len)) raiseIndexError();
				LOC44 = ((NU8)(s->data[(NI32)(TMP1855)]) == (NU8)(70));
				if (LOC44) goto LA45;
				nimln(270, "parseutils.nim");
				nimln(270, "parseutils.nim");
				TMP1856 = addInt(i, 2);
				if ((NU)((NI32)(TMP1856)) > (NU)(s->Sup.len)) raiseIndexError();
				LOC44 = ((NU8)(s->data[(NI32)(TMP1856)]) == (NU8)(102));
				LA45: ;
				if (!LOC44) goto LA46;
				nimln(271, "parseutils.nim");
				{
					NI TMP1857;
					NI TMP1858;
					NI TMP1859;
					nimln(271, "parseutils.nim");
					nimln(271, "parseutils.nim");
					nimln(271, "parseutils.nim");
					TMP1857 = addInt(i, 3);
					if ((NU)((NI32)(TMP1857)) > (NU)(s->Sup.len)) raiseIndexError();
					if (!!((((NU8)(s->data[(NI32)(TMP1857)])) >= ((NU8)(97)) && ((NU8)(s->data[(NI32)(TMP1857)])) <= ((NU8)(122)) || ((NU8)(s->data[(NI32)(TMP1857)])) >= ((NU8)(65)) && ((NU8)(s->data[(NI32)(TMP1857)])) <= ((NU8)(90)) || ((NU8)(s->data[(NI32)(TMP1857)])) >= ((NU8)(48)) && ((NU8)(s->data[(NI32)(TMP1857)])) <= ((NU8)(57)) || ((NU8)(s->data[(NI32)(TMP1857)])) == ((NU8)(95))))) goto LA50;
					nimln(272, "parseutils.nim");
					nimln(272, "parseutils.nim");
					(*number) = ((NF)(INF) * (NF)(sign));
					nimln(273, "parseutils.nim");
					nimln(273, "parseutils.nim");
					nimln(273, "parseutils.nim");
					nimln(273, "parseutils.nim");
					TMP1858 = addInt(i, 3);
					TMP1859 = subInt((NI32)(TMP1858), start);
					result = (NI32)(TMP1859);
					goto BeforeRet;
				}
				LA50: ;
			}
			LA46: ;
		}
		LA40: ;
		nimln(274, "parseutils.nim");
		nimln(274, "parseutils.nim");
		result = 0;
		goto BeforeRet;
	}
	LA34: ;
	nimln(275, "parseutils.nim");
	while (1) {
		NI TMP1860;
		nimln(275, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!(((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57)))) goto LA52;
		nimln(277, "parseutils.nim");
		nimln(277, "parseutils.nim");
		flags = (NI)(flags | 1);
		nimln(278, "parseutils.nim");
		nimln(278, "parseutils.nim");
		nimln(278, "parseutils.nim");
		nimln(278, "parseutils.nim");
		nimln(278, "parseutils.nim");
		nimln(278, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		TMP1860 = subInt(((NI) (((NU8)(s->data[i])))), 48);
		(*number) = ((NF)(((NF)((*number)) * (NF)(1.0000000000000000e+001))) + (NF)(((double) (((NI) ((NI32)(TMP1860)))))));
		nimln(279, "parseutils.nim");
		i = addInt(i, 1);
		nimln(280, "parseutils.nim");
		while (1) {
			nimln(280, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!((NU8)(s->data[i]) == (NU8)(95))) goto LA53;
			nimln(280, "parseutils.nim");
			i = addInt(i, 1);
		} LA53: ;
	} LA52: ;
	nimln(282, "parseutils.nim");
	{
		NF hd;
		nimln(282, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!((NU8)(s->data[i]) == (NU8)(46))) goto LA56;
		nimln(283, "parseutils.nim");
		hd = 1.0000000000000000e+000;
		nimln(284, "parseutils.nim");
		i = addInt(i, 1);
		nimln(285, "parseutils.nim");
		while (1) {
			NI TMP1861;
			nimln(285, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!(((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57)))) goto LA58;
			nimln(287, "parseutils.nim");
			nimln(287, "parseutils.nim");
			flags = (NI)(flags | 2);
			nimln(288, "parseutils.nim");
			nimln(288, "parseutils.nim");
			nimln(288, "parseutils.nim");
			nimln(288, "parseutils.nim");
			nimln(288, "parseutils.nim");
			nimln(288, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			TMP1861 = subInt(((NI) (((NU8)(s->data[i])))), 48);
			(*number) = ((NF)(((NF)((*number)) * (NF)(1.0000000000000000e+001))) + (NF)(((double) (((NI) ((NI32)(TMP1861)))))));
			nimln(289, "parseutils.nim");
			nimln(289, "parseutils.nim");
			hd = ((NF)(hd) * (NF)(1.0000000000000000e+001));
			nimln(290, "parseutils.nim");
			i = addInt(i, 1);
			nimln(291, "parseutils.nim");
			while (1) {
				nimln(291, "parseutils.nim");
				if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
				if (!((NU8)(s->data[i]) == (NU8)(95))) goto LA59;
				nimln(291, "parseutils.nim");
				i = addInt(i, 1);
			} LA59: ;
		} LA58: ;
		nimln(292, "parseutils.nim");
		nimln(292, "parseutils.nim");
		(*number) = ((NF)((*number)) / (NF)(hd));
	}
	LA56: ;
	nimln(294, "parseutils.nim");
	{
		nimln(294, "parseutils.nim");
		if (!(flags == 0)) goto LA62;
		nimln(294, "parseutils.nim");
		nimln(294, "parseutils.nim");
		result = 0;
		goto BeforeRet;
	}
	LA62: ;
	nimln(296, "parseutils.nim");
	{
		nimln(296, "parseutils.nim");
		if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
		if (!(((NU8)(s->data[i])) == ((NU8)(101)) || ((NU8)(s->data[i])) == ((NU8)(69)))) goto LA66;
		nimln(297, "parseutils.nim");
		i = addInt(i, 1);
		nimln(298, "parseutils.nim");
		{
			nimln(298, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!((NU8)(s->data[i]) == (NU8)(43))) goto LA70;
			nimln(299, "parseutils.nim");
			i = addInt(i, 1);
		}
		goto LA68;
		LA70: ;
		{
			nimln(300, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!((NU8)(s->data[i]) == (NU8)(45))) goto LA73;
			nimln(301, "parseutils.nim");
			esign = -1.0000000000000000e+000;
			nimln(302, "parseutils.nim");
			i = addInt(i, 1);
		}
		goto LA68;
		LA73: ;
		LA68: ;
		nimln(303, "parseutils.nim");
		{
			nimln(303, "parseutils.nim");
			nimln(303, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!!((((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57))))) goto LA77;
			nimln(304, "parseutils.nim");
			nimln(304, "parseutils.nim");
			result = 0;
			goto BeforeRet;
		}
		LA77: ;
		nimln(305, "parseutils.nim");
		while (1) {
			NI TMP1862;
			NI TMP1863;
			NI TMP1864;
			nimln(305, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			if (!(((NU8)(s->data[i])) >= ((NU8)(48)) && ((NU8)(s->data[i])) <= ((NU8)(57)))) goto LA79;
			nimln(306, "parseutils.nim");
			nimln(306, "parseutils.nim");
			nimln(306, "parseutils.nim");
			nimln(306, "parseutils.nim");
			TMP1862 = mulInt(exponent, 10);
			nimln(306, "parseutils.nim");
			if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
			TMP1863 = addInt((NI32)(TMP1862), ((NI) (((NU8)(s->data[i])))));
			TMP1864 = subInt((NI32)(TMP1863), 48);
			exponent = (NI32)(TMP1864);
			nimln(307, "parseutils.nim");
			i = addInt(i, 1);
			nimln(308, "parseutils.nim");
			while (1) {
				nimln(308, "parseutils.nim");
				if ((NU)(i) > (NU)(s->Sup.len)) raiseIndexError();
				if (!((NU8)(s->data[i]) == (NU8)(95))) goto LA80;
				nimln(308, "parseutils.nim");
				i = addInt(i, 1);
			} LA80: ;
		} LA79: ;
	}
	LA66: ;
	nimln(310, "parseutils.nim");
	hd = tentothepowerof_86712(exponent);
	nimln(311, "parseutils.nim");
	{
		nimln(311, "parseutils.nim");
		if (!(0.0 < esign)) goto LA83;
		nimln(311, "parseutils.nim");
		nimln(311, "parseutils.nim");
		(*number) = ((NF)((*number)) * (NF)(hd));
	}
	goto LA81;
	LA83: ;
	{
		nimln(312, "parseutils.nim");
		nimln(312, "parseutils.nim");
		(*number) = ((NF)((*number)) / (NF)(hd));
	}
	LA81: ;
	nimln(314, "parseutils.nim");
	nimln(314, "parseutils.nim");
	(*number) = ((NF)((*number)) * (NF)(sign));
	nimln(315, "parseutils.nim");
	nimln(315, "parseutils.nim");
	TMP1865 = subInt(i, start);
	result = (NI32)(TMP1865);
	BeforeRet: ;
	popFrame();
	return result;
}
Ejemplo n.º 26
0
N_NIMCALL(void, annotatetype_416194)(tnode187813* n, ttype187847* t) {
	ttype187847* x;
	nimfr("annotateType", "semmacrosanity.nim")
	nimln(37, "semmacrosanity.nim");
	x = skiptypes_191793(t, IL64(211106232576256));
	nimln(40, "semmacrosanity.nim");
	switch ((*n).Kind) {
	case ((NU8) 37):
	{
		nimln(42, "semmacrosanity.nim");
		{
			NI i_416229;
			NI HEX3Atmp_416404;
			NI LOC6;
			NI res_416406;
			nimln(42, "semmacrosanity.nim");
			if (!((*x).Kind == ((NU8) 17))) goto LA4;
			nimln(43, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			i_416229 = 0;
			HEX3Atmp_416404 = 0;
			nimln(44, "semmacrosanity.nim");
			nimln(44, "semmacrosanity.nim");
			nimln(44, "semmacrosanity.nim");
			LOC6 = 0;
			LOC6 = len_188274(n);
			HEX3Atmp_416404 = subInt(LOC6, 1);
			nimln(1457, "system.nim");
			res_416406 = 0;
			nimln(1458, "system.nim");
			while (1) {
				tsym187843* field;
				nimln(1458, "system.nim");
				if (!(res_416406 <= HEX3Atmp_416404)) goto LA7;
				nimln(1457, "system.nim");
				i_416229 = res_416406;
				nimln(45, "semmacrosanity.nim");
				field = ithfield_416007((*x).N, i_416229);
				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_416229);
					LOC12 = rawNewString(LOC13->Sup.len + 23);
appendString(LOC12, ((NimStringDesc*) &TMP5682));
appendString(LOC12, LOC13);
					globalerror_165565((*n).Info, LOC12);
				}
				goto LA8;
				LA10: ;
				{
					nimln(47, "semmacrosanity.nim");
					if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
					if ((NU)(i_416229) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
					annotatetype_416194((*n).kindU.S6.Sons->data[i_416229], (*field).Typ);
				}
				LA8: ;
				nimln(1460, "system.nim");
				res_416406 = addInt(res_416406, 1);
			} LA7: ;
		}
		goto LA2;
		LA4: ;
		{
			NI i_416286;
			NI HEX3Atmp_416408;
			NI LOC18;
			NI res_416410;
			nimln(48, "semmacrosanity.nim");
			if (!((*x).Kind == ((NU8) 18))) goto LA16;
			nimln(49, "semmacrosanity.nim");
			asgnRefNoCycle((void**) &(*n).Typ, t);
			i_416286 = 0;
			HEX3Atmp_416408 = 0;
			nimln(50, "semmacrosanity.nim");
			nimln(50, "semmacrosanity.nim");
			nimln(50, "semmacrosanity.nim");
			LOC18 = 0;
			LOC18 = len_188274(n);
			HEX3Atmp_416408 = subInt(LOC18, 1);
			nimln(1457, "system.nim");
			res_416410 = 0;
			nimln(1458, "system.nim");
			while (1) {
				nimln(1458, "system.nim");
				if (!(res_416410 <= HEX3Atmp_416408)) goto LA19;
				nimln(1457, "system.nim");
				i_416286 = res_416410;
				nimln(51, "semmacrosanity.nim");
				{
					NI LOC22;
					NimStringDesc* LOC25;
					NimStringDesc* LOC26;
					nimln(51, "semmacrosanity.nim");
					nimln(51, "semmacrosanity.nim");
					LOC22 = 0;
					LOC22 = len_191569(x);
					if (!(LOC22 <= i_416286)) goto LA23;
					nimln(51, "semmacrosanity.nim");
					nimln(51, "semmacrosanity.nim");
					LOC25 = 0;
					nimln(51, "semmacrosanity.nim");
					LOC26 = 0;
					LOC26 = nimIntToStr(i_416286);
					LOC25 = rawNewString(LOC26->Sup.len + 23);
appendString(LOC25, ((NimStringDesc*) &TMP5682));
appendString(LOC25, LOC26);
					globalerror_165565((*n).Info, LOC25);
				}
				goto LA20;
				LA23: ;
				{
					nimln(52, "semmacrosanity.nim");
					if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
					if ((NU)(i_416286) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
					if ((NU)(i_416286) >= (NU)((*x).Sons->Sup.len)) raiseIndexError();
					annotatetype_416194((*n).kindU.S6.Sons->data[i_416286], (*x).Sons->data[i_416286]);
				}
				LA20: ;
				nimln(1460, "system.nim");
				res_416410 = addInt(res_416410, 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_165565((*n).Info, ((NimStringDesc*) &TMP5683));
		}
		LA2: ;
	}
	break;
	case ((NU8) 41):
	{
		nimln(58, "semmacrosanity.nim");
		{
			tnode187813* m_416333;
			NI i_416413;
			NI HEX3Atmp_416415;
			NI LOC39;
			NI res_416417;
			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_416333 = 0;
			i_416413 = 0;
			HEX3Atmp_416415 = 0;
			nimln(1522, "ast.nim");
			nimln(1522, "ast.nim");
			nimln(1522, "ast.nim");
			LOC39 = 0;
			LOC39 = len_188274(n);
			HEX3Atmp_416415 = subInt(LOC39, 1);
			nimln(1457, "system.nim");
			res_416417 = 0;
			nimln(1458, "system.nim");
			while (1) {
				ttype187847* LOC41;
				nimln(1458, "system.nim");
				if (!(res_416417 <= HEX3Atmp_416415)) goto LA40;
				nimln(1457, "system.nim");
				i_416413 = res_416417;
				nimln(1522, "ast.nim");
				if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
				if ((NU)(i_416413) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				m_416333 = (*n).kindU.S6.Sons->data[i_416413];
				nimln(60, "semmacrosanity.nim");
				nimln(60, "semmacrosanity.nim");
				LOC41 = 0;
				LOC41 = elemtype_223559(x);
				annotatetype_416194(m_416333, LOC41);
				nimln(1460, "system.nim");
				res_416417 = addInt(res_416417, 1);
			} LA40: ;
		}
		goto LA35;
		LA37: ;
		{
			nimln(62, "semmacrosanity.nim");
			globalerror_165565((*n).Info, ((NimStringDesc*) &TMP5684));
		}
		LA35: ;
	}
	break;
	case ((NU8) 39):
	{
		nimln(64, "semmacrosanity.nim");
		{
			tnode187813* m_416348;
			NI i_416419;
			NI HEX3Atmp_416421;
			NI LOC48;
			NI res_416423;
			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_416348 = 0;
			i_416419 = 0;
			HEX3Atmp_416421 = 0;
			nimln(1522, "ast.nim");
			nimln(1522, "ast.nim");
			nimln(1522, "ast.nim");
			LOC48 = 0;
			LOC48 = len_188274(n);
			HEX3Atmp_416421 = subInt(LOC48, 1);
			nimln(1457, "system.nim");
			res_416423 = 0;
			nimln(1458, "system.nim");
			while (1) {
				ttype187847* LOC50;
				nimln(1458, "system.nim");
				if (!(res_416423 <= HEX3Atmp_416421)) goto LA49;
				nimln(1457, "system.nim");
				i_416419 = res_416423;
				nimln(1522, "ast.nim");
				if (((TMP5670[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5671));
				if ((NU)(i_416419) >= (NU)((*n).kindU.S6.Sons->Sup.len)) raiseIndexError();
				m_416348 = (*n).kindU.S6.Sons->data[i_416419];
				nimln(66, "semmacrosanity.nim");
				nimln(66, "semmacrosanity.nim");
				LOC50 = 0;
				LOC50 = elemtype_223559(x);
				annotatetype_416194(m_416348, LOC50);
				nimln(1460, "system.nim");
				res_416423 = addInt(res_416423, 1);
			} LA49: ;
		}
		goto LA44;
		LA46: ;
		{
			nimln(68, "semmacrosanity.nim");
			globalerror_165565((*n).Info, ((NimStringDesc*) &TMP5685));
		}
		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_165565((*n).Info, ((NimStringDesc*) &TMP5686));
		}
		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_165565((*n).Info, ((NimStringDesc*) &TMP5687));
		}
		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_165565((*n).Info, ((NimStringDesc*) &TMP5688));
		}
		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_165565((*n).Info, ((NimStringDesc*) &TMP5689));
		}
		LA71: ;
	}
	break;
	default:
	{
	}
	break;
	}
	popFrame();
}
Ejemplo n.º 27
0
N_NIMCALL(tident141017*, getident_141202)(NCSTRING identifier, NI length, NI h) {
	tident141017* result;
	NI idx;
	tident141017* last;
	NI id;
	NI i_141422;
	NI HEX3Atmp_141435;
	NI TMP891;
	NI res_141437;
	nimfr("getIdent", "idents.nim")
	result = 0;
	nimln(69, "idents.nim");
	nimln(69, "idents.nim");
	idx = (NI)(h & 8191);
	nimln(70, "idents.nim");
	result = buckets_141031[(idx)- 0];
	nimln(71, "idents.nim");
	last = NIM_NIL;
	nimln(72, "idents.nim");
	id = 0;
	nimln(73, "idents.nim");
	while (1) {
		nimln(698, "system.nim");
		nimln(698, "system.nim");
		if (!!((result == NIM_NIL))) goto LA1;
		nimln(74, "idents.nim");
		{
			NI LOC4;
			nimln(74, "idents.nim");
			nimln(74, "idents.nim");
			LOC4 = 0;
			LOC4 = cmpexact_141152((*result).S->data, identifier, length);
			if (!(LOC4 == 0)) goto LA5;
			nimln(75, "idents.nim");
			{
				nimln(698, "system.nim");
				nimln(698, "system.nim");
				if (!!((last == NIM_NIL))) goto LA9;
				nimln(77, "idents.nim");
				asgnRefNoCycle((void**) &(*last).Next, (*result).Next);
				nimln(78, "idents.nim");
				asgnRefNoCycle((void**) &(*result).Next, buckets_141031[(idx)- 0]);
				nimln(79, "idents.nim");
				asgnRefNoCycle((void**) &buckets_141031[(idx)- 0], result);
			}			LA9: ;
			nimln(80, "idents.nim");
			goto BeforeRet;
		}		goto LA2;
		LA5: ;
		{
			NI LOC12;
			nimln(81, "idents.nim");
			nimln(81, "idents.nim");
			LOC12 = 0;
			LOC12 = cmpignorestyle_141034((*result).S->data, identifier, length);
			if (!(LOC12 == 0)) goto LA13;
			nimln(82, "idents.nim");
			{
				NIM_BOOL LOC17;
				nimln(82, "idents.nim");
				nimln(82, "idents.nim");
				LOC17 = 0;
				nimln(82, "idents.nim");
				LOC17 = (id == 0);
				if (LOC17) goto LA18;
				nimln(82, "idents.nim");
				LOC17 = (id == (*result).Sup.Id);
				LA18: ;
				if (!!(LOC17)) goto LA19;
				nimln(82, "idents.nim");
				hiddenraiseassert_76217(((NimStringDesc*) &TMP888));			}			LA19: ;
			nimln(83, "idents.nim");
			id = (*result).Sup.Id;
		}		goto LA2;
		LA13: ;
		LA2: ;
		nimln(84, "idents.nim");
		last = result;
		nimln(85, "idents.nim");
		result = (*result).Next;
	} LA1: ;
	nimln(86, "idents.nim");
	result = (tident141017*) newObj((&NTI141015), sizeof(tident141017));
	(*result).Sup.Sup.m_type = (&NTI141017);
	nimln(87, "idents.nim");
	(*result).H = h;
	nimln(88, "idents.nim");
	nimln(88, "idents.nim");
	asgnRefNoCycle((void**) &(*result).S, mnewString(length));
	i_141422 = 0;
	HEX3Atmp_141435 = 0;
	nimln(89, "idents.nim");
	nimln(89, "idents.nim");
	TMP891 = subInt(length, 1);
	HEX3Atmp_141435 = (NI32)(TMP891);
	nimln(1301, "system.nim");
	res_141437 = 0;
	nimln(1302, "system.nim");
	while (1) {
		nimln(1302, "system.nim");
		if (!(res_141437 <= HEX3Atmp_141435)) goto LA21;
		nimln(1301, "system.nim");
		i_141422 = res_141437;
		nimln(89, "idents.nim");
		if ((NU)(i_141422) > (NU)((*result).S->Sup.len)) raiseIndexError();
		(*result).S->data[i_141422] = identifier[i_141422];
		nimln(1304, "system.nim");
		res_141437 = addInt(res_141437, 1);
	} LA21: ;
	nimln(90, "idents.nim");
	asgnRefNoCycle((void**) &(*result).Next, buckets_141031[(idx)- 0]);
	nimln(91, "idents.nim");
	asgnRefNoCycle((void**) &buckets_141031[(idx)- 0], result);
	nimln(92, "idents.nim");
	{
		nimln(92, "idents.nim");
		if (!(id == 0)) goto LA24;
		nimln(93, "idents.nim");
		wordcounter_141200 = addInt(wordcounter_141200, 1);
		nimln(94, "idents.nim");
		nimln(94, "idents.nim");
		if (wordcounter_141200 == (-2147483647 -1)) raiseOverflow();
		(*result).Sup.Id = ((NI32)-(wordcounter_141200));
	}	goto LA22;
	LA24: ;
	{
		nimln(96, "idents.nim");
		(*result).Sup.Id = id;
	}	LA22: ;
	BeforeRet: ;	popFrame();
	return result;
}
Ejemplo n.º 28
0
N_NIMCALL(NI, llreadfromstdin_179733)(tllstream179204* s, void* buf, NI buflen) {
	NI result;
	NimStringDesc* LOC1;
	NimStringDesc* line;
	NI triples;
	NI TMP1640;
	nimfr("llReadFromStdin", "llstream.nim")
	result = 0;
	nimln(115, "llstream.nim");
	LOC1 = 0;
	LOC1 = (*s).S; (*s).S = copyStringRC1(((NimStringDesc*) &TMP1631));
	if (LOC1) nimGCunrefNoCycle(LOC1);
	nimln(116, "llstream.nim");
	(*s).Rd = 0;
	nimln(117, "llstream.nim");
	nimln(117, "llstream.nim");
	line = rawNewString(120);
	nimln(118, "llstream.nim");
	triples = 0;
	nimln(119, "llstream.nim");
	while (1) {
		NimStringDesc* LOC3;
		NIM_BOOL LOC9;
		NI LOC10;
		nimln(119, "llstream.nim");
		LOC3 = 0;
		nimln(119, "llstream.nim");
		{
			nimln(119, "llstream.nim");
			nimln(119, "llstream.nim");
			if (!((*s).S->Sup.len == 0)) goto LA6;
			LOC3 = copyString(((NimStringDesc*) &TMP1637));
		}
		goto LA4;
		LA6: ;
		{
			LOC3 = copyString(((NimStringDesc*) &TMP1638));
		}
		LA4: ;
		LOC9 = 0;
		LOC9 = readlinefromstdin_179396(LOC3, &line);
		if (!LOC9) goto LA2;
		nimln(120, "llstream.nim");
		(*s).S = resizeString((*s).S, line->Sup.len + 0);
appendString((*s).S, line);
		nimln(121, "llstream.nim");
		(*s).S = resizeString((*s).S, 2);
appendString((*s).S, ((NimStringDesc*) &TMP1639));
		nimln(122, "llstream.nim");
		nimln(122, "llstream.nim");
		LOC10 = 0;
		LOC10 = counttriples_179676(line);
		triples = addInt(triples, LOC10);
		nimln(123, "llstream.nim");
		{
			NIM_BOOL LOC13;
			nimln(123, "llstream.nim");
			nimln(123, "llstream.nim");
			nimln(123, "llstream.nim");
			nimln(123, "llstream.nim");
			LOC13 = 0;
			LOC13 = continueline_179652(line, (((NI) ((NI)(triples & 1))) == 1));
			if (!!(LOC13)) goto LA14;
			nimln(123, "llstream.nim");
			goto LA2;
		}
		LA14: ;
	} LA2: ;
	nimln(124, "llstream.nim");
	(*s).Lineoffset = addInt((*s).Lineoffset, 1);
	nimln(125, "llstream.nim");
	nimln(125, "llstream.nim");
	nimln(125, "llstream.nim");
	nimln(125, "llstream.nim");
	TMP1640 = subInt((*s).S->Sup.len, (*s).Rd);
	result = ((buflen <= (NI32)(TMP1640)) ? buflen : (NI32)(TMP1640));
	nimln(126, "llstream.nim");
	{
		nimln(126, "llstream.nim");
		if (!(0 < result)) goto LA18;
		nimln(127, "llstream.nim");
		if ((NU)((*s).Rd) > (NU)((*s).S->Sup.len)) raiseIndexError();
		memcpy(buf, ((void*) (&(*s).S->data[(*s).Rd])), result);
		nimln(128, "llstream.nim");
		(*s).Rd = addInt((*s).Rd, result);
	}
	LA18: ;
	popFrame();
	return result;
}
Ejemplo n.º 29
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 TMP5022;
		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);
		TMP5022 = subInt(LOC2, 1);
		HEX3Atmp_325271 = (NI64)(TMP5022);
		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 (((TMP5020[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5021));
			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 TMP5024;
		NI res_325277;
		nimln(29, "aliases.nim");
		{
			nimln(29, "aliases.nim");
			nimln(29, "aliases.nim");
			if (((TMP5020[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5021));
			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*) &TMP5023));		}		LA11: ;
		nimln(30, "aliases.nim");
		if (((TMP5020[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5021));
		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);
		TMP5024 = subInt(LOC17, 1);
		HEX3Atmp_325275 = (NI64)(TMP5024);
		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 (((TMP5020[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5021));
			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 (((TMP5020[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0)) raiseFieldError(((NimStringDesc*) &TMP5021));
				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*) &TMP5026));			}			break;
			}
			nimln(1304, "system.nim");
			res_325277 = addInt(res_325277, 1);
		} LA18: ;
	}	break;
	case ((NU8) 3):
	{
		nimln(39, "aliases.nim");
		if (!(((TMP5027[(*n).Kind/8] &(1<<((*n).Kind%8)))!=0))) raiseFieldError(((NimStringDesc*) &TMP5028));
		result = ispartofaux_325012((*(*n).kindU.S4.Sym).Typ, b, marker);
	}	break;
	default:
	{
		nimln(40, "aliases.nim");
		internalerror_138369((*n).Info, ((NimStringDesc*) &TMP5029));	}	break;
	}
	BeforeRet: ;	popFrame();
	return result;
}
Ejemplo n.º 30
0
N_NIMCALL(NIM_BOOL, HEX3CHEX2E_150044)(NimStringDesc* a, NimStringDesc* b) {
	NIM_BOOL result;
	NI i;
	NI j;
	NI vera;
	NI verb;
	nimfr("<.", "babelcmd.nim")
	result = 0;
	nimln(28, "babelcmd.nim");
	{
		nimln(28, "babelcmd.nim");
		if (!eqStrings(a, ((NimStringDesc*) &TMP1397))) goto LA3;
		nimln(28, "babelcmd.nim");
		nimln(28, "babelcmd.nim");
		result = NIM_FALSE;
		goto BeforeRet;
	}	LA3: ;
	nimln(29, "babelcmd.nim");
	i = 0;
	nimln(30, "babelcmd.nim");
	j = 0;
	nimln(31, "babelcmd.nim");
	vera = 0;
	nimln(32, "babelcmd.nim");
	verb = 0;
	nimln(33, "babelcmd.nim");
	while (1) {
		NI ii;
		NI jj;
		nimln(34, "babelcmd.nim");
		ii = npuParseInt(a, &vera, i);
		nimln(35, "babelcmd.nim");
		jj = npuParseInt(b, &verb, j);
		nimln(37, "babelcmd.nim");
		{
			NIM_BOOL LOC8;
			nimln(37, "babelcmd.nim");
			LOC8 = 0;
			nimln(37, "babelcmd.nim");
			LOC8 = (ii <= 0);
			if (LOC8) goto LA9;
			nimln(37, "babelcmd.nim");
			LOC8 = (jj <= 0);
			LA9: ;
			if (!LOC8) goto LA10;
			nimln(37, "babelcmd.nim");
			nimln(37, "babelcmd.nim");
			nimln(706, "system.nim");
			result = (0 < jj);
			goto BeforeRet;
		}		LA10: ;
		nimln(38, "babelcmd.nim");
		{
			nimln(38, "babelcmd.nim");
			if (!(vera < verb)) goto LA14;
			nimln(38, "babelcmd.nim");
			nimln(38, "babelcmd.nim");
			result = NIM_TRUE;
			goto BeforeRet;
		}		goto LA12;
		LA14: ;
		{
			nimln(706, "system.nim");
			if (!(verb < vera)) goto LA17;
			nimln(39, "babelcmd.nim");
			nimln(39, "babelcmd.nim");
			result = NIM_FALSE;
			goto BeforeRet;
		}		goto LA12;
		LA17: ;
		LA12: ;
		nimln(41, "babelcmd.nim");
		i = addInt(i, ii);
		nimln(42, "babelcmd.nim");
		j = addInt(j, jj);
		nimln(43, "babelcmd.nim");
		{
			nimln(43, "babelcmd.nim");
			if ((NU)(i) > (NU)(a->Sup.len)) raiseIndexError();
			if (!((NU8)(a->data[i]) == (NU8)(46))) goto LA21;
			nimln(43, "babelcmd.nim");
			i = addInt(i, 1);
		}		LA21: ;
		nimln(44, "babelcmd.nim");
		{
			nimln(44, "babelcmd.nim");
			if ((NU)(j) > (NU)(b->Sup.len)) raiseIndexError();
			if (!((NU8)(b->data[j]) == (NU8)(46))) goto LA25;
			nimln(44, "babelcmd.nim");
			j = addInt(j, 1);
		}		LA25: ;
	}	BeforeRet: ;	popFrame();
	return result;
}