ref: 9e087145195fb50d06a87732399aebda067a3d42
parent: ba2b09fbebe31ae4f226b5a3fc01428c281f80c9
author: Ori Bernstein <ori@eigenstate.org>
date: Sun Jun 10 21:03:58 EDT 2012
Make fatal() print to stdout Allows us to grep errors. They're not actually program failures after all.
--- a/8/isel.c
+++ b/8/isel.c
@@ -401,6 +401,9 @@
switch (exprop(n)) {
case Oadd: r = binop(s, Iadd, args[0], args[1]); break;
case Osub: r = binop(s, Isub, args[0], args[1]); break;
+ case Obor: r = binop(s, Ior, args[0], args[1]); break;
+ case Oband: r = binop(s, Iand, args[0], args[1]); break;
+ case Obxor: r = binop(s, Ixor, args[0], args[1]); break;
case Omul:
/* these get clobbered by the mul insn */
@@ -439,9 +442,6 @@
g(s, Ineg, &r, NULL);
break;
- case Obor: r = binop(s, Ior, args[0], args[1]); break;
- case Oband: r = binop(s, Iand, args[0], args[1]); break;
- case Obxor: r = binop(s, Ixor, args[0], args[1]); break;
case Obsl:
case Obsr:
claimreg(s, Rcl); /* shift requires cl as it's arg. stupid. */
--- a/parse/util.c
+++ b/parse/util.c
@@ -68,9 +68,9 @@
va_list ap;
va_start(ap, msg);
- fprintf(stderr, "%s:%d: ", filename, line);
- vfprintf(stderr, msg, ap);
- fprintf(stderr, "\n");
+ fprintf(stdout, "%s:%d: ", filename, line);
+ vfprintf(stdout, msg, ap);
+ fprintf(stdout, "\n");
va_end(ap);
exit(1);
}
--- a/test/test.sh
+++ b/test/test.sh
@@ -37,7 +37,7 @@
done
for i in `awk '/^F/{print $2}' tests`; do
- build $i > /dev/null
+ (build $i) > /dev/null
if [ $? -eq '1' ]; then
echo "PASS: $i"
else
--- a/test/tests
+++ b/test/tests
@@ -32,3 +32,4 @@
B log-or E 1
F declmismatch
F infermismatch
+F flow
--
⑨