N_NIMCALL(NimStringDesc*, Tocchar_155007)(NIM_CHAR C_155009) {
NimStringDesc* Result_155176;
NimStringDesc* LOC1;
NimStringDesc* LOC2;
NimStringDesc* LOC3;
Result_155176 = 0;
switch (((NU8)(C_155009))) {
case 0 ... 31:
case 128 ... 255:
LOC1 = 0;
LOC2 = 0;
LOC2 = nsuToOctal(C_155009);
LOC1 = rawNewString(LOC2->Sup.len + 1);
appendChar(LOC1, 92);
appendString(LOC1, LOC2);
Result_155176 = LOC1;
break;
case 39:
case 34:
case 92:
LOC3 = 0;
LOC3 = rawNewString(2);
appendChar(LOC3, 92);
appendChar(LOC3, C_155009);
Result_155176 = LOC3;
break;
default:
Result_155176 = nimCharToStr(C_155009);
break;
}
return Result_155176;
}
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_80421(((NimStringDesc*) &TMP545));
}
LA40: ;
popFrame();
return result;
}
N_NIMCALL(Ropeobj172006*, HEX25_172905)(NimStringDesc* frmt, Ropeobj172006** args, NI argsLen0) {
Ropeobj172006* result;
NI i;
NI length;
NI num;
result = 0;
i = ((NI) 0);
length = (frmt ? frmt->Sup.len : 0);
result = NIM_NIL;
num = ((NI) 0);
{
while (1) {
NI start;
if (!(i < length)) goto LA2;
{
if (!((NU8)(frmt->data[i]) == (NU8)(36))) goto LA5;
i += ((NI) 1);
switch (((NU8)(frmt->data[i]))) {
case 36:
{
add_172487(&result, ((NimStringDesc*) &TMP3761));
i += ((NI) 1);
}
break;
case 35:
{
i += ((NI) 1);
add_172482(&result, args[num]);
num += ((NI) 1);
}
break;
case 48 ... 57:
{
NI j;
j = ((NI) 0);
{
while (1) {
j = (NI)((NI)((NI)(j * ((NI) 10)) + ((NI) (((NU8)(frmt->data[i]))))) - ((NI) 48));
i += ((NI) 1);
{
if (!!((((NU8)(frmt->data[i])) >= ((NU8)(48)) && ((NU8)(frmt->data[i])) <= ((NU8)(57))))) goto LA14;
goto LA10;
}
LA14: ;
}
} LA10: ;
num = j;
{
NimStringDesc* LOC20;
if (!((NI)((argsLen0-1) + ((NI) 1)) < j)) goto LA18;
LOC20 = 0;
LOC20 = nimIntToStr(j);
errorhandler_172022.ClEnv? errorhandler_172022.ClPrc(((NU8) 1), LOC20, NIM_FALSE, errorhandler_172022.ClEnv):((TMP3762)(errorhandler_172022.ClPrc))(((NU8) 1), LOC20, NIM_FALSE);
}
goto LA16;
LA18: ;
{
add_172482(&result, args[(NI)(j - ((NI) 1))]);
}
LA16: ;
}
break;
case 123:
{
NI j;
i += ((NI) 1);
j = ((NI) 0);
{
while (1) {
if (!(((NU8)(frmt->data[i])) >= ((NU8)(48)) && ((NU8)(frmt->data[i])) <= ((NU8)(57)))) goto LA24;
j = (NI)((NI)((NI)(j * ((NI) 10)) + ((NI) (((NU8)(frmt->data[i]))))) - ((NI) 48));
i += ((NI) 1);
} LA24: ;
}
num = j;
{
if (!((NU8)(frmt->data[i]) == (NU8)(125))) goto LA27;
i += ((NI) 1);
}
goto LA25;
LA27: ;
{
NimStringDesc* LOC30;
LOC30 = 0;
LOC30 = nimCharToStr(frmt->data[i]);
errorhandler_172022.ClEnv? errorhandler_172022.ClPrc(((NU8) 1), LOC30, NIM_FALSE, errorhandler_172022.ClEnv):((TMP3763)(errorhandler_172022.ClPrc))(((NU8) 1), LOC30, NIM_FALSE);
}
LA25: ;
{
NimStringDesc* LOC35;
if (!((NI)((argsLen0-1) + ((NI) 1)) < j)) goto LA33;
LOC35 = 0;
LOC35 = nimIntToStr(j);
errorhandler_172022.ClEnv? errorhandler_172022.ClPrc(((NU8) 1), LOC35, NIM_FALSE, errorhandler_172022.ClEnv):((TMP3764)(errorhandler_172022.ClPrc))(((NU8) 1), LOC35, NIM_FALSE);
}
goto LA31;
LA33: ;
{
add_172482(&result, args[(NI)(j - ((NI) 1))]);
}
LA31: ;
}
break;
case 110:
{
add_172482(&result, softrnl_172904);
i += ((NI) 1);
}
break;
case 78:
{
add_172482(&result, rnl_172903);
i += ((NI) 1);
}
break;
default:
{
NimStringDesc* LOC40;
LOC40 = 0;
LOC40 = nimCharToStr(frmt->data[i]);
errorhandler_172022.ClEnv? errorhandler_172022.ClPrc(((NU8) 1), LOC40, NIM_FALSE, errorhandler_172022.ClEnv):((TMP3765)(errorhandler_172022.ClPrc))(((NU8) 1), LOC40, NIM_FALSE);
}
break;
}
}
LA5: ;
start = i;
{
while (1) {
if (!(i < length)) goto LA42;
{
if (!!(((NU8)(frmt->data[i]) == (NU8)(36)))) goto LA45;
i += ((NI) 1);
}
goto LA43;
LA45: ;
{
goto LA41;
}
LA43: ;
} LA42: ;
} LA41: ;
{
NimStringDesc* LOC52;
if (!(start <= (NI)(i - ((NI) 1)))) goto LA50;
LOC52 = 0;
LOC52 = copyStrLast(frmt, start, (NI)(i - ((NI) 1)));
add_172487(&result, LOC52);
}
LA50: ;
} LA2: ;
}
return result;
}
