예제 #1
0
파일: nimconf.c 프로젝트: ddlsmurf/Nimrod
N_NIMCALL(void, Loadconfig_80004)(NimStringDesc* Project_80006) {
NimStringDesc* Conffile_80520;
NimStringDesc* Prefix_80521;
NIM_BOOL LOC10;
NIM_BOOL LOC15;
Conffile_80520 = 0;
Prefix_80521 = 0;
if (!((Libpath_46112) && (Libpath_46112)->Sup.len == 0)) goto LA2;
Prefix_80521 = Getprefixdir_46109();
if (!eqStrings(Prefix_80521, ((NimStringDesc*) &TMP195677))) goto LA5;
asgnRefNoCycle((void**) &Libpath_46112, copyString(((NimStringDesc*) &TMP195678)));
goto LA4;
LA5: ;
if (!eqStrings(Prefix_80521, ((NimStringDesc*) &TMP195679))) goto LA7;
asgnRefNoCycle((void**) &Libpath_46112, copyString(((NimStringDesc*) &TMP195680)));
goto LA4;
LA7: ;
asgnRefNoCycle((void**) &Libpath_46112, nosJoinPath(Prefix_80521, ((NimStringDesc*) &TMP195681)));
LA4: ;
LA2: ;
Loadspecialconfig_80007(((NimStringDesc*) &TMP195723));
LOC10 = !(((Gglobaloptions_46079 &(1<<((((NU8) 17))&31)))!=0));
if (!(LOC10)) goto LA11;
LOC10 = !(((Project_80006) && (Project_80006)->Sup.len == 0));
LA11: ;
if (!LOC10) goto LA12;
Conffile_80520 = nosChangeFileExt(Project_80006, ((NimStringDesc*) &TMP195724));
LOC15 = nosexistsFile(Conffile_80520);
if (!LOC15) goto LA16;
Readconfigfile_80434(Conffile_80520);
LA16: ;
LA12: ;
}
예제 #2
0
파일: lists.c 프로젝트: Varriount/csources
N_NIMCALL(void, excludestr_119803)(tlinkedlist119023* list, NimStringDesc* data) {
	tlistentry119017* it;
	nimfr("excludeStr", "lists.nim")
	nimln(107, "lists.nim");
	it = (*list).Head;
	nimln(108, "lists.nim");
	while (1) {
		tlistentry119017* nxt;
		nimln(108, "lists.nim");
		nimln(108, "lists.nim");
		if (!!((it == NIM_NIL))) goto LA1;
		nimln(109, "lists.nim");
		nxt = (*it).Next;
		nimln(110, "lists.nim");
		{
			nimln(110, "lists.nim");
			if (it) chckObj((*it).Sup.m_type, (&NTI119019));
			if (!eqStrings((*((tstrentry119019*) (it))).Data, data)) goto LA4;
			nimln(110, "lists.nim");
			remove_119669(list, it);
		}
		LA4: ;
		nimln(111, "lists.nim");
		it = nxt;
	} LA1: ;
	popFrame();
}
예제 #3
0
N_NIMCALL(void, parsepath_201121)(NimStringDesc* uri, NI* i, Uri201012* result) {
	NI LOC1;
	LOC1 = 0;
	LOC1 = parseuntil_96981(uri, (&(*result).path), TMP1164, (*i));
	(*i) += LOC1;
	{
		NimStringDesc* LOC4;
		LOC4 = 0;
		LOC4 = nsuToLowerStr((*result).scheme);
		if (!eqStrings(LOC4, ((NimStringDesc*) &TMP1165))) goto LA5;
		parseauthority_201072((*result).path, result);
		(*result).path = setLengthStr((*result).path, ((NI) 0));
	}
	LA5: ;
	{
		NI LOC11;
		if (!((NU8)(uri->data[(*i)]) == (NU8)(63))) goto LA9;
		(*i) += ((NI) 1);
		LOC11 = 0;
		LOC11 = parseuntil_96981(uri, (&(*result).query), TMP1166, (*i));
		(*i) += LOC11;
	}
	LA9: ;
	{
		NI LOC16;
		if (!((NU8)(uri->data[(*i)]) == (NU8)(35))) goto LA14;
		(*i) += ((NI) 1);
		LOC16 = 0;
		LOC16 = parseuntil_96981(uri, (&(*result).anchor), TMP1167, (*i));
		(*i) += LOC16;
	}
	LA14: ;
}
예제 #4
0
N_LIB_PRIVATE N_NIMCALL(void, nep1CheckDefImpl_6AhukMkhQSFShlHi9bHQBWw)(tyObject_ConfigRefcolonObjectType__LaK09ayL9alwKUad7rts0rTw* conf, tyObject_TLineInfo_WGx4rAexNXnczy1Avn646Q info, tyObject_TSym_JpsEh5i1AcKChGYbg7aV4w* s, tyEnum_TSymKind_cNCW9acsSznmEccl1fgQwkw k) {
	NimStringDesc* beau;
{	{
		NIM_BOOL T3_;
		T3_ = (NIM_BOOL)0;
		T3_ = ((2080 &(1U<<((NU)(k)&31U)))!=0);
		if (T3_) goto LA4_;
		T3_ = !((((NU8)((*(*s).name).s->data[((NI) 0)])) >= ((NU8)(97)) && ((NU8)((*(*s).name).s->data[((NI) 0)])) <= ((NU8)(122)) || ((NU8)((*(*s).name).s->data[((NI) 0)])) >= ((NU8)(65)) && ((NU8)((*(*s).name).s->data[((NI) 0)])) <= ((NU8)(90)) || ((NU8)((*(*s).name).s->data[((NI) 0)])) >= ((NU8)(48)) && ((NU8)((*(*s).name).s->data[((NI) 0)])) <= ((NU8)(57)) || ((NU8)((*(*s).name).s->data[((NI) 0)])) >= ((NU8)(128)) && ((NU8)((*(*s).name).s->data[((NI) 0)])) <= ((NU8)(255)) || ((NU8)((*(*s).name).s->data[((NI) 0)])) == ((NU8)(95))));
		LA4_: ;
		if (!T3_) goto LA5_;
		goto BeforeRet_;
	}
	LA5_: ;
	{
		NIM_BOOL T9_;
		T9_ = (NIM_BOOL)0;
		T9_ = ((144 &(1U<<((NU)(k)&31U)))!=0);
		if (!(T9_)) goto LA10_;
		T9_ = (((*s).flags &((NU64)1<<((NU)(((tyEnum_TSymFlag_K9ay6LWMat9bUiT9bIbMxpDHw) 30))&63U)))!=0);
		LA10_: ;
		if (!T9_) goto LA11_;
		goto BeforeRet_;
	}
	LA11_: ;
	beau = beautifyName_fOdwioWHjTwKHWAVS9bR9cng((*(*s).name).s, k);
	{
		if (!!(eqStrings((*(*s).name).s, beau))) goto LA15_;
		message_mMj7lrOf3zBP9bl69amiKu5g(conf, info, ((tyEnum_TMsgKind_29cbg2fC1z5iM1PAI28kR5w) 57), beau);
	}
	LA15_: ;
	}BeforeRet_: ;
}
예제 #5
0
static N_INLINE(NI, rawgetknownhc_321404)(Table321033 t, NimStringDesc* key, NI hc) {
	NI result;
	NI h;
{	result = 0;
	h = (NI)(hc & (t.data ? (t.data->Sup.len-1) : -1));
	{
		while (1) {
			NIM_BOOL LOC3;
			LOC3 = 0;
			LOC3 = isfilled_154281(t.data->data[h].Field0);
			if (!LOC3) goto LA2;
			{
				NIM_BOOL LOC6;
				LOC6 = 0;
				LOC6 = (t.data->data[h].Field0 == hc);
				if (!(LOC6)) goto LA7;
				LOC6 = eqStrings(t.data->data[h].Field1, key);
				LA7: ;
				if (!LOC6) goto LA8;
				result = h;
				goto BeforeRet;
			}
			LA8: ;
			h = nexttry_154404(h, (t.data ? (t.data->Sup.len-1) : -1));
		} LA2: ;
	}
	result = (NI)(((NI) -1) - h);
	}BeforeRet: ;
	return result;
}
예제 #6
0
N_NIMCALL(NIM_BOOL, contains_109215)(tlinkedlist109020 list, NimStringDesc* data) {
	NIM_BOOL result;
	tlistentry109014* it;
	nimfr("Contains", "lists.nim")
	result = 0;
	nimln(43, "lists.nim");
	it = list.Head;
	nimln(44, "lists.nim");
	while (1) {
		nimln(698, "system.nim");
		nimln(698, "system.nim");
		if (!!((it == NIM_NIL))) goto LA1;
		nimln(45, "lists.nim");
		{
			nimln(45, "lists.nim");
			if (it) chckObj((*it).Sup.m_type, (&NTI109016));
			if (!eqStrings((*((tstrentry109016*) (it))).Data, data)) goto LA4;
			nimln(46, "lists.nim");
			nimln(46, "lists.nim");
			result = NIM_TRUE;
			goto BeforeRet;
		}		LA4: ;
		nimln(47, "lists.nim");
		it = (*it).Next;
	} LA1: ;
	BeforeRet: ;	popFrame();
	return result;
}N_NIMCALL(void, TMP263)(void* p, NI op) {
예제 #7
0
파일: lists.c 프로젝트: Varriount/csources
N_NIMCALL(NIM_BOOL, contains_119237)(tlinkedlist119023* list, NimStringDesc* data) {
	NIM_BOOL result;
	tlistentry119017* it;
	nimfr("contains", "lists.nim")
	result = 0;
	nimln(43, "lists.nim");
	it = (*list).Head;
	nimln(44, "lists.nim");
	while (1) {
		nimln(44, "lists.nim");
		nimln(44, "lists.nim");
		if (!!((it == NIM_NIL))) goto LA1;
		nimln(45, "lists.nim");
		{
			nimln(45, "lists.nim");
			if (it) chckObj((*it).Sup.m_type, (&NTI119019));
			if (!eqStrings((*((tstrentry119019*) (it))).Data, data)) goto LA4;
			nimln(46, "lists.nim");
			nimln(46, "lists.nim");
			result = NIM_TRUE;
			goto BeforeRet;
		}
		LA4: ;
		nimln(47, "lists.nim");
		it = (*it).Next;
	} LA1: ;
	BeforeRet: ;
	popFrame();
	return result;
}
예제 #8
0
N_NIMCALL(Ropeobj172006*, insertincache_172241)(NimStringDesc* s) {
	Ropeobj172006* result;
	NI h;
	NI LOC1;
	result = 0;
	gcachetries_172238 += ((NI) 1);
	LOC1 = 0;
	LOC1 = hash_140827(s);
	h = (NI)(LOC1 & ((NI) 4095));
	result = cache_172073[(h)- 0];
	{
		NIM_BOOL LOC4;
		LOC4 = 0;
		LOC4 = result == 0;
		if (LOC4) goto LA5;
		LOC4 = !(eqStrings((*result).data, s));
		LA5: ;
		if (!LOC4) goto LA6;
		gcachemisses_172239 += ((NI) 1);
		result = newrope_172041(s);
		asgnRefNoCycle((void**) (&cache_172073[(h)- 0]), result);
	}
	LA6: ;
	return result;
}
예제 #9
0
N_NIMCALL(Ropeobj161009*, insertincache_161280)(NimStringDesc* s) {
	Ropeobj161009* result;
	NI h;
	NI LOC1;
	result = 0;
	gcachetries_161268 += ((NI) 1);
	LOC1 = 0;
	LOC1 = hash_131839(s);
	h = (NI)(LOC1 & ((NI) 4095));
	result = cache_161106[(h)- 0];
	{
		NIM_BOOL LOC4;
		LOC4 = 0;
		LOC4 = result == 0;
		if (LOC4) goto LA5;
		LOC4 = !(eqStrings((*result).data, s));
		LA5: ;
		if (!LOC4) goto LA6;
		gcachemisses_161272 += ((NI) 1);
		result = newrope_161056(s);
		asgnRefNoCycle((void**) (&cache_161106[(h)- 0]), result);
	}
	LA6: ;
	return result;
}
예제 #10
0
N_NIMCALL(NI, countdefinedsymbols_167042)(void) {
    NI result;
    NimStringDesc* key_167045;
    NimStringDesc* val_167046;
    NI h_167064;
    NI HEX3Atmp_167066;
    NI res_167068;
    nimfr("countDefinedSymbols", "condsyms.nim")
    result = 0;
    nimln(36, "condsyms.nim");
    result = 0;
    key_167045 = 0;
    val_167046 = 0;
    h_167064 = 0;
    HEX3Atmp_167066 = 0;
    nimln(40, "strtabs.nim");
    nimln(40, "strtabs.nim");
    HEX3Atmp_167066 = ((*gsymbols_167003).Data->Sup.len-1);
    nimln(1457, "system.nim");
    res_167068 = 0;
    nimln(1458, "system.nim");
    while (1) {
        nimln(1458, "system.nim");
        if (!(res_167068 <= HEX3Atmp_167066)) goto LA1;
        nimln(1457, "system.nim");
        h_167064 = res_167068;
        nimln(41, "strtabs.nim");
        {
            nimln(41, "strtabs.nim");
            nimln(41, "strtabs.nim");
            if ((NU)(h_167064) >= (NU)((*gsymbols_167003).Data->Sup.len)) raiseIndexError();
            if (!!((*gsymbols_167003).Data->data[h_167064].Field0 == 0)) goto LA4;
            nimln(42, "strtabs.nim");
            if ((NU)(h_167064) >= (NU)((*gsymbols_167003).Data->Sup.len)) raiseIndexError();
            key_167045 = (*gsymbols_167003).Data->data[h_167064].Field0;
            nimln(42, "strtabs.nim");
            if ((NU)(h_167064) >= (NU)((*gsymbols_167003).Data->Sup.len)) raiseIndexError();
            val_167046 = (*gsymbols_167003).Data->data[h_167064].Field1;
            nimln(38, "condsyms.nim");
            {
                nimln(38, "condsyms.nim");
                if (!eqStrings(val_167046, ((NimStringDesc*) &TMP974))) goto LA8;
                nimln(38, "condsyms.nim");
                result = addInt(result, 1);
            }
LA8:
            ;
        }
LA4:
        ;
        nimln(1460, "system.nim");
        res_167068 = addInt(res_167068, 1);
    }
LA1:
    ;
    popFrame();
    return result;
}
예제 #11
0
N_NIMCALL(NI, countdefinedsymbols_166211)(void) {
	NI result;
	nimfr("countDefinedSymbols", "condsyms.nim")
	result = 0;
	nimln(70, "condsyms.nim");
	result = ((NI) 0);
	{
		NimStringDesc* key_166214;
		NimStringDesc* val_166215;
		key_166214 = 0;
		val_166215 = 0;
		{
			NI h_166229;
			NI HEX3Atmp_166231;
			NI res_166233;
			h_166229 = 0;
			HEX3Atmp_166231 = 0;
			nimln(43, "strtabs.nim");
			HEX3Atmp_166231 = ((*gsymbols_166004).data ? ((*gsymbols_166004).data->Sup.len-1) : -1);
			nimln(1598, "system.nim");
			res_166233 = ((NI) 0);
			{
				nimln(1599, "system.nim");
				while (1) {
					NI TMP1344;
					if (!(res_166233 <= HEX3Atmp_166231)) goto LA4;
					nimln(1600, "system.nim");
					h_166229 = res_166233;
					nimln(44, "strtabs.nim");
					{
						if ((NU)(h_166229) >= (NU)((*gsymbols_166004).data->Sup.len)) raiseIndexError();
						if (!!((*gsymbols_166004).data->data[h_166229].Field0 == 0)) goto LA7;
						nimln(45, "strtabs.nim");
						if ((NU)(h_166229) >= (NU)((*gsymbols_166004).data->Sup.len)) raiseIndexError();
						key_166214 = (*gsymbols_166004).data->data[h_166229].Field0;
						if ((NU)(h_166229) >= (NU)((*gsymbols_166004).data->Sup.len)) raiseIndexError();
						val_166215 = (*gsymbols_166004).data->data[h_166229].Field1;
						nimln(72, "condsyms.nim");
						{
							NI TMP1343;
							if (!!(eqStrings(val_166215, ((NimStringDesc*) &TMP1318)))) goto LA11;
							TMP1343 = addInt(result, ((NI) 1));
							result = (NI)(TMP1343);
						}
						LA11: ;
					}
					LA7: ;
					nimln(1619, "system.nim");
					TMP1344 = addInt(res_166233, ((NI) 1));
					res_166233 = (NI)(TMP1344);
				} LA4: ;
			}
		}
	}
	popFrame();
	return result;
}
예제 #12
0
파일: nimconf.c 프로젝트: ddlsmurf/Nimrod
N_NIMCALL(void, Conftok_80317)(TY77267* L_80320, TY77263* Tok_80321) {
NIM_BOOL LOC2;
Ppgettok_80010(L_80320, Tok_80321);
while (1) {
LOC2 = !(((*Tok_80321).Ident == NIM_NIL));
if (!(LOC2)) goto LA3;
LOC2 = eqStrings((*(*Tok_80321).Ident).S, ((NimStringDesc*) &TMP195709));
LA3: ;
if (!LOC2) goto LA1;
Parsedirective_80288(L_80320, Tok_80321);
} LA1: ;
}
예제 #13
0
N_NIMCALL(NI, countdefinedsymbols_142041)(void) {
	NI result;
	NimStringDesc* key_142044;
	NimStringDesc* val_142045;
	NI h_142057;
	NI HEX3Atmp_142059;
	NI res_142061;
	nimfr("countDefinedSymbols", "condsyms.nim")
	result = 0;
	nimln(36, "condsyms.nim");
	result = 0;
	key_142044 = 0;
	val_142045 = 0;
	h_142057 = 0;
	HEX3Atmp_142059 = 0;
	nimln(40, "strtabs.nim");
	nimln(40, "strtabs.nim");
	HEX3Atmp_142059 = ((*gsymbols_142003).Data->Sup.len-1);
	nimln(1308, "system.nim");
	res_142061 = 0;
	nimln(1309, "system.nim");
	while (1) {
		nimln(1309, "system.nim");
		if (!(res_142061 <= HEX3Atmp_142059)) goto LA1;
		nimln(1308, "system.nim");
		h_142057 = res_142061;
		nimln(41, "strtabs.nim");
		{
			nimln(41, "strtabs.nim");
			nimln(41, "strtabs.nim");
			if ((NU)(h_142057) >= (NU)((*gsymbols_142003).Data->Sup.len)) raiseIndexError();
			if (!!((*gsymbols_142003).Data->data[h_142057].Field0 == 0)) goto LA4;
			nimln(42, "strtabs.nim");
			if ((NU)(h_142057) >= (NU)((*gsymbols_142003).Data->Sup.len)) raiseIndexError();
			key_142044 = (*gsymbols_142003).Data->data[h_142057].Field0;
			nimln(42, "strtabs.nim");
			if ((NU)(h_142057) >= (NU)((*gsymbols_142003).Data->Sup.len)) raiseIndexError();
			val_142045 = (*gsymbols_142003).Data->data[h_142057].Field1;
			nimln(38, "condsyms.nim");
			{
				nimln(38, "condsyms.nim");
				if (!eqStrings(val_142045, ((NimStringDesc*) &TMP897))) goto LA8;
				nimln(38, "condsyms.nim");
				result = addInt(result, 1);
			}			LA8: ;
		}		LA4: ;
		nimln(1311, "system.nim");
		res_142061 = addInt(res_142061, 1);
	} LA1: ;
	popFrame();
	return result;
}
예제 #14
0
N_NIMCALL(NI, rawget_167744)(ttable167560 t_167751, NimStringDesc* key_167754) {
	NI result;
	NI h;
	NI LOC1;
	nimfr("rawGet", "tables.nim")
	result = 0;
	nimln(115, "tables.nim");
	nimln(115, "tables.nim");
	nimln(115, "tables.nim");
	LOC1 = 0;
	LOC1 = hash_120827(key_167754);
	nimln(115, "tables.nim");
	h = (NI)(LOC1 & (t_167751.Data->Sup.len-1));
	nimln(116, "tables.nim");
	while (1) {
		nimln(116, "tables.nim");
		nimln(116, "tables.nim");
		if ((NU)(h) >= (NU)(t_167751.Data->Sup.len)) raiseIndexError();
		if (!!((t_167751.Data->data[h].Field0 == ((NU8) 0)))) goto LA2;
		nimln(117, "tables.nim");
		{
			NIM_BOOL LOC5;
			nimln(117, "tables.nim");
			LOC5 = 0;
			nimln(117, "tables.nim");
			if ((NU)(h) >= (NU)(t_167751.Data->Sup.len)) raiseIndexError();
			LOC5 = eqStrings(t_167751.Data->data[h].Field1, key_167754);
			if (!(LOC5)) goto LA6;
			nimln(117, "tables.nim");
			if ((NU)(h) >= (NU)(t_167751.Data->Sup.len)) raiseIndexError();
			LOC5 = (t_167751.Data->data[h].Field0 == ((NU8) 1));
			LA6: ;
			if (!LOC5) goto LA7;
			nimln(118, "tables.nim");
			nimln(118, "tables.nim");
			result = h;
			goto BeforeRet;
		}
		LA7: ;
		nimln(119, "tables.nim");
		nimln(119, "tables.nim");
		h = nexttry_141606(h, (t_167751.Data->Sup.len-1));
	} LA2: ;
	nimln(120, "tables.nim");
	result = -1;
	BeforeRet: ;
	popFrame();
	return result;
}
예제 #15
0
N_NIMCALL(void, conftok_291274_930198375)(Tlexer286174* L0, Ttoken286170* tok0) {
	ppgettok_291002_930198375(L0, tok0);
	{
		while (1) {
			NIM_BOOL LOC3;
			LOC3 = (NIM_BOOL)0;
			LOC3 = !(((*tok0).ident == NIM_NIL));
			if (!(LOC3)) goto LA4;
			LOC3 = eqStrings((*(*tok0).ident).s, ((NimStringDesc*) &T930198375_4));
			LA4: ;
			if (!LOC3) goto LA2;
			parsedirective_291245_930198375(L0, tok0);
		} LA2: ;
	}
}
예제 #16
0
N_NIMCALL(void, conftok_210275)(Tlexer205173* L, Ttoken205169* tok) {
	ppgettok_210003(L, tok);
	{
		while (1) {
			NIM_BOOL LOC3;
			LOC3 = 0;
			LOC3 = !(((*tok).ident == NIM_NIL));
			if (!(LOC3)) goto LA4;
			LOC3 = eqStrings((*(*tok).ident).s, ((NimStringDesc*) &TMP2035));
			LA4: ;
			if (!LOC3) goto LA2;
			parsedirective_210246(L, tok);
		} LA2: ;
	}
}
예제 #17
0
N_NIMCALL(void, conftok_185379)(Tlexer180185* L, Ttoken180181* tok) {
	ppgettok_185009(L, tok);
	{
		while (1) {
			NIM_BOOL LOC3;
			LOC3 = 0;
			LOC3 = !(((*tok).ident == NIM_NIL));
			if (!(LOC3)) goto LA4;
			LOC3 = eqStrings((*(*tok).ident).s, ((NimStringDesc*) &TMP1877));
			LA4: ;
			if (!LOC3) goto LA2;
			parsedirective_185344(L, tok);
		} LA2: ;
	}
}
예제 #18
0
N_NIMCALL(NI, rawget_137724)(ttable137540 t, NimStringDesc* key) {
	NI result;
	NI h;
	NI LOC1;
	nimfr("RawGet", "tables.nim")
	result = 0;
	nimln(73, "tables.nim");
	nimln(73, "tables.nim");
	nimln(73, "tables.nim");
	LOC1 = 0;
	LOC1 = hash_111826(key);
	nimln(73, "tables.nim");
	h = (NI)(LOC1 & (t.Data->Sup.len-1));
	nimln(74, "tables.nim");
	while (1) {
		nimln(698, "system.nim");
		nimln(698, "system.nim");
		if ((NU)(h) >= (NU)(t.Data->Sup.len)) raiseIndexError();
		if (!!((t.Data->data[h].Field0 == ((NU8) 0)))) goto LA2;
		nimln(75, "tables.nim");
		{
			NIM_BOOL LOC5;
			nimln(75, "tables.nim");
			LOC5 = 0;
			nimln(75, "tables.nim");
			if ((NU)(h) >= (NU)(t.Data->Sup.len)) raiseIndexError();
			LOC5 = eqStrings(t.Data->data[h].Field1, key);
			if (!(LOC5)) goto LA6;
			nimln(75, "tables.nim");
			if ((NU)(h) >= (NU)(t.Data->Sup.len)) raiseIndexError();
			LOC5 = (t.Data->data[h].Field0 == ((NU8) 1));
			LA6: ;
			if (!LOC5) goto LA7;
			nimln(76, "tables.nim");
			nimln(76, "tables.nim");
			result = h;
			goto BeforeRet;
		}		LA7: ;
		nimln(77, "tables.nim");
		nimln(77, "tables.nim");
		h = nexttry_118405(h, (t.Data->Sup.len-1));
	} LA2: ;
	nimln(78, "tables.nim");
	result = -1;
	BeforeRet: ;	popFrame();
	return result;
}
예제 #19
0
파일: lists.c 프로젝트: ddlsmurf/Nimrod
N_NIMCALL(NIM_BOOL, Contains_38159)(TY38019* List_38161, NimStringDesc* Data_38162) {
NIM_BOOL Result_38163;
TY38013* It_38164;
Result_38163 = 0;
It_38164 = 0;
It_38164 = (*List_38161).Head;
while (1) {
if (!!((It_38164 == NIM_NIL))) goto LA1;
if (!eqStrings((*((TY38015*) (It_38164))).Data, Data_38162)) goto LA3;
Result_38163 = NIM_TRUE;
goto BeforeRet;
LA3: ;
It_38164 = (*It_38164).Next;
} LA1: ;
BeforeRet: ;
return Result_38163;
}
예제 #20
0
static N_INLINE(NI, rawget_313086)(Table312052 t, NimStringDesc* key, NI* hc) {
    NI result;
    NI h;
    {   result = 0;
        (*hc) = hash_133839(key);
        {
            if (!((*hc) == ((NI) 0))) goto LA3;
            (*hc) = ((NI) 314159265);
        }
LA3:
        ;
        h = (NI)((*hc) & (t.data ? (t.data->Sup.len-1) : -1));
        {
            while (1) {
                NIM_BOOL LOC7;
                LOC7 = 0;
                LOC7 = isfilled_157211(t.data->data[h].Field0);
                if (!LOC7) goto LA6;
                {
                    NIM_BOOL LOC10;
                    LOC10 = 0;
                    LOC10 = (t.data->data[h].Field0 == (*hc));
                    if (!(LOC10)) goto LA11;
                    LOC10 = eqStrings(t.data->data[h].Field1, key);
LA11:
                    ;
                    if (!LOC10) goto LA12;
                    result = h;
                    goto BeforeRet;
                }
LA12:
                ;
                h = nexttry_157420(h, (t.data ? (t.data->Sup.len-1) : -1));
            }
LA6:
            ;
        }
        result = (NI)(((NI) -1) - h);
    }
BeforeRet:
    ;
    return result;
}
예제 #21
0
N_NIMCALL(trope144007*, insertincache_144262)(NimStringDesc* s) {
    trope144007* result;
    NI h;
    NI LOC1;
    nimfr("insertInCache", "ropes.nim")
    result = 0;
    nimln(147, "ropes.nim");
    gcachetries_144256 = addInt(gcachetries_144256, 1);
    nimln(148, "ropes.nim");
    nimln(148, "ropes.nim");
    nimln(148, "ropes.nim");
    LOC1 = 0;
    LOC1 = hash_118827(s);
    h = (NI)(LOC1 & 4095);
    nimln(149, "ropes.nim");
    result = cache_144189[(h)- 0];
    nimln(150, "ropes.nim");
    {
        NIM_BOOL LOC4;
        nimln(150, "ropes.nim");
        LOC4 = 0;
        nimln(150, "ropes.nim");
        LOC4 = result == 0;
        if (LOC4) goto LA5;
        nimln(150, "ropes.nim");
        nimln(150, "ropes.nim");
        LOC4 = !(eqStrings((*result).Data, s));
LA5:
        ;
        if (!LOC4) goto LA6;
        nimln(151, "ropes.nim");
        gcachemisses_144258 = addInt(gcachemisses_144258, 1);
        nimln(152, "ropes.nim");
        result = newrope_144135(s);
        nimln(153, "ropes.nim");
        asgnRefNoCycle((void**) &cache_144189[(h)- 0], result);
    }
LA6:
    ;
    popFrame();
    return result;
}
예제 #22
0
N_NIMCALL(NIM_BOOL, contains_147213_3771138726)(Tlinkedlist147013* list0, NimStringDesc* data0) {
	NIM_BOOL result0;
	Tlistentry147007* it0;
{	result0 = (NIM_BOOL)0;
	it0 = (*list0).head;
	{
		while (1) {
			if (!!((it0 == NIM_NIL))) goto LA2;
			{
				if (!eqStrings((*((Tstrentry147009*) (it0))).data, data0)) goto LA5;
				result0 = NIM_TRUE;
				goto BeforeRet;
			}
			LA5: ;
			it0 = (*it0).next;
		} LA2: ;
	}
	}BeforeRet: ;
	return result0;
}
예제 #23
0
N_NIMCALL(void, conftok_186377)(Tlexer181185* L, Ttoken181181* tok) {
	nimfr("confTok", "nimconf.nim")
	nimln(150, "nimconf.nim");
	ppgettok_186009(L, tok);
	{
		nimln(151, "nimconf.nim");
		while (1) {
			NIM_BOOL LOC3;
			LOC3 = 0;
			LOC3 = !(((*tok).ident == NIM_NIL));
			if (!(LOC3)) goto LA4;
			LOC3 = eqStrings((*(*tok).ident).s, ((NimStringDesc*) &TMP2482));
			LA4: ;
			if (!LOC3) goto LA2;
			nimln(152, "nimconf.nim");
			parsedirective_186342(L, tok);
		} LA2: ;
	}
	popFrame();
}
예제 #24
0
N_NIMCALL(NIM_BOOL, contains_129219)(Tlinkedlist129028 list, NimStringDesc* data) {
	NIM_BOOL result;
	Tlistentry129022* it;
{	result = 0;
	it = list.head;
	{
		while (1) {
			if (!!((it == NIM_NIL))) goto LA2;
			{
				if (!eqStrings((*((Tstrentry129024*) (it))).data, data)) goto LA5;
				result = NIM_TRUE;
				goto BeforeRet;
			}
			LA5: ;
			it = (*it).next;
		} LA2: ;
	}
	}BeforeRet: ;
	return result;
}
예제 #25
0
N_NIMCALL(NIM_BOOL, contains_3NRZAjGu9bLiJruVlzBLQAw)(Tlinkedlist_9aBiIjAa4z2zTLjp4yMUvLw list0, NimStringDesc* data0) {
	NIM_BOOL result0;
	Tlistentry_U4JkVlrJQaACKZ9a9cwCla3Q* it0;
{	result0 = (NIM_BOOL)0;
	it0 = list0.head;
	{
		while (1) {
			if (!!((it0 == NIM_NIL))) goto LA2;
			{
				if (!eqStrings((*((Tstrentry_3m9czjBTF9ccwc2UyFTPCO8Q*) (it0))).data, data0)) goto LA5;
				result0 = NIM_TRUE;
				goto BeforeRet;
			}
			LA5: ;
			it0 = (*it0).next;
		} LA2: ;
	}
	}BeforeRet: ;
	return result0;
}
예제 #26
0
N_NIMCALL(void, conftok_182348)(tlexer178176* l, ttoken178174* tok) {
	nimfr("confTok", "nimconf.nim")
	nimln(149, "nimconf.nim");
	ppgettok_182008(l, tok);
	nimln(150, "nimconf.nim");
	while (1) {
		NIM_BOOL LOC2;
		nimln(150, "nimconf.nim");
		LOC2 = 0;
		nimln(150, "nimconf.nim");
		nimln(150, "nimconf.nim");
		LOC2 = !(((*tok).Ident == NIM_NIL));
		if (!(LOC2)) goto LA3;
		nimln(150, "nimconf.nim");
		LOC2 = eqStrings((*(*tok).Ident).S, ((NimStringDesc*) &TMP1906));
		LA3: ;
		if (!LOC2) goto LA1;
		nimln(151, "nimconf.nim");
		parsedirective_182309(l, tok);
	} LA1: ;
	popFrame();
}
예제 #27
0
N_NIMCALL(NI, countdefinedsymbols_168211)(void) {
	NI result;
	result = 0;
	result = ((NI) 0);
	{
		NimStringDesc* key_168214;
		NimStringDesc* val_168215;
		key_168214 = 0;
		val_168215 = 0;
		{
			NI h_168229;
			NI HEX3Atmp_168231;
			NI res_168233;
			h_168229 = 0;
			HEX3Atmp_168231 = 0;
			HEX3Atmp_168231 = ((*gsymbols_168004).data ? ((*gsymbols_168004).data->Sup.len-1) : -1);
			res_168233 = ((NI) 0);
			{
				while (1) {
					if (!(res_168233 <= HEX3Atmp_168231)) goto LA4;
					h_168229 = res_168233;
					{
						if (!!((*gsymbols_168004).data->data[h_168229].Field0 == 0)) goto LA7;
						key_168214 = (*gsymbols_168004).data->data[h_168229].Field0;
						val_168215 = (*gsymbols_168004).data->data[h_168229].Field1;
						{
							if (!!(eqStrings(val_168215, ((NimStringDesc*) &TMP1461)))) goto LA11;
							result += ((NI) 1);
						}
						LA11: ;
					}
					LA7: ;
					res_168233 += ((NI) 1);
				} LA4: ;
			}
		}
	}
	return result;
}
예제 #28
0
N_NIMCALL(NI, countdefinedsymbols_0PZoTF9cuNqw59bHjttVR3uw)(void) {
	NI result0;
	result0 = (NI)0;
	result0 = ((NI) 0);
	{
		NimStringDesc* key_FqDPT1t58HtHSzzDcBmBew;
		NimStringDesc* val_DTtEvybLZ4yehx2dHqVhBA;
		key_FqDPT1t58HtHSzzDcBmBew = (NimStringDesc*)0;
		val_DTtEvybLZ4yehx2dHqVhBA = (NimStringDesc*)0;
		{
			NI h_ruCOIrC9bCsuUxlxavFVvgA;
			NI HEX3Atmp_gkyXSwBnv8SgdIPRvtXZGA;
			NI res_G8gHZEgHIDpy9bwAgg4BQdQ;
			h_ruCOIrC9bCsuUxlxavFVvgA = (NI)0;
			HEX3Atmp_gkyXSwBnv8SgdIPRvtXZGA = (NI)0;
			HEX3Atmp_gkyXSwBnv8SgdIPRvtXZGA = ((*gsymbols_tS4f2TwBfIz6zIuFAktH6g).data ? ((*gsymbols_tS4f2TwBfIz6zIuFAktH6g).data->Sup.len-1) : -1);
			res_G8gHZEgHIDpy9bwAgg4BQdQ = ((NI) 0);
			{
				while (1) {
					if (!(res_G8gHZEgHIDpy9bwAgg4BQdQ <= HEX3Atmp_gkyXSwBnv8SgdIPRvtXZGA)) goto LA4;
					h_ruCOIrC9bCsuUxlxavFVvgA = res_G8gHZEgHIDpy9bwAgg4BQdQ;
					{
						if (!!(((*gsymbols_tS4f2TwBfIz6zIuFAktH6g).data->data[h_ruCOIrC9bCsuUxlxavFVvgA].Field0 == 0))) goto LA7;
						key_FqDPT1t58HtHSzzDcBmBew = (*gsymbols_tS4f2TwBfIz6zIuFAktH6g).data->data[h_ruCOIrC9bCsuUxlxavFVvgA].Field0;
						val_DTtEvybLZ4yehx2dHqVhBA = (*gsymbols_tS4f2TwBfIz6zIuFAktH6g).data->data[h_ruCOIrC9bCsuUxlxavFVvgA].Field1;
						{
							if (!!(eqStrings(val_DTtEvybLZ4yehx2dHqVhBA, ((NimStringDesc*) &T_UpH3CWy69aOHB2xkQBDirlg_3)))) goto LA11;
							result0 += ((NI) 1);
						}
						LA11: ;
					}
					LA7: ;
					res_G8gHZEgHIDpy9bwAgg4BQdQ += ((NI) 1);
				} LA4: ;
			}
		}
	}
	return result0;
}
예제 #29
0
N_NIMCALL(NI, countdefinedsymbols_191159)(void) {
	NI result;
	result = 0;
	result = ((NI) 0);
	{
		NimStringDesc* key_191162;
		NimStringDesc* val_191163;
		key_191162 = 0;
		val_191163 = 0;
		{
			NI h_191177;
			NI HEX3Atmp_191179;
			NI res_191181;
			h_191177 = 0;
			HEX3Atmp_191179 = 0;
			HEX3Atmp_191179 = ((*gsymbols_191001).data ? ((*gsymbols_191001).data->Sup.len-1) : -1);
			res_191181 = ((NI) 0);
			{
				while (1) {
					if (!(res_191181 <= HEX3Atmp_191179)) goto LA4;
					h_191177 = res_191181;
					{
						if (!!((*gsymbols_191001).data->data[h_191177].Field0 == 0)) goto LA7;
						key_191162 = (*gsymbols_191001).data->data[h_191177].Field0;
						val_191163 = (*gsymbols_191001).data->data[h_191177].Field1;
						{
							if (!!(eqStrings(val_191163, ((NimStringDesc*) &TMP1591)))) goto LA11;
							result += ((NI) 1);
						}
						LA11: ;
					}
					LA7: ;
					res_191181 += ((NI) 1);
				} LA4: ;
			}
		}
	}
	return result;
}
예제 #30
0
N_NIMCALL(NIM_BOOL, isdefined_142016)(NimStringDesc* symbol) {
	NIM_BOOL result;
	nimfr("isDefined", "condsyms.nim")
	result = 0;
	nimln(26, "condsyms.nim");
	{
		NIM_BOOL LOC3;
		NimStringDesc* LOC6;
		nimln(26, "condsyms.nim");
		LOC3 = 0;
		LOC3 = nsthasKey(gsymbols_142003, symbol);
		if (!LOC3) goto LA4;
		nimln(27, "condsyms.nim");
		nimln(27, "condsyms.nim");
		nimln(27, "condsyms.nim");
		LOC6 = 0;
		LOC6 = nstGet(gsymbols_142003, symbol);
		result = eqStrings(LOC6, ((NimStringDesc*) &TMP897));
	}	LA4: ;
	popFrame();
	return result;
}