"table changed during a forin loop",
};
-static int errdo;
+static bool errdo;
/* stack information */
typedef struct sinfo_t {
int i1, i2, res;
tailrec:
- errdo = TRUE;
+ errdo = true;
v1o = NULL;
ctype = TCgettype(co, ci);
switch (ctype) {
sinfoi = ownsinfoi;
Mpopmark(m);
lrtno = rtno, rtno = NULL;
- errdo = TRUE;
+ errdo = true;
return lrtno;
}
}
if (Estackdepth == 1) {
fprintf(stderr, "\n");
- errdo = FALSE;
+ errdo = false;
}
for (i = si; i >= 0; i--) {
if (sinfop[i].fco) {
printbody(s, Eshowbody), free(s);
}
fprintf(stderr, "\n");
- errdo = FALSE;
+ errdo = false;
}
static void printbody(char *s, int mode)
"table changed during a forin loop",
};
-static int errdo;
+static bool errdo;
/* stack information */
typedef struct sinfo_t {
tailrec:
m1 = 0;
- errdo = TRUE;
+ errdo = true;
v1o = NULL;
ctype = TCgettype (co, ci);
switch (ctype) {
sinfoi = ownsinfoi;
Mpopmark (m);
lrtno = rtno, rtno = NULL;
- errdo = TRUE;
+ errdo = true;
return lrtno;
}
}
if (Estackdepth == 1) {
fprintf (stderr, "\n");
- errdo = FALSE;
+ errdo = false;
}
for (i = si; i >= 0; i--) {
if (sinfop[i].fco) {
printbody (s, Eshowbody), free (s);
}
fprintf (stderr, "\n");
- errdo = FALSE;
+ errdo = false;
}
static void printbody (char *s, int mode) {