From: Matt Birkholz <matt@birchwood-abbey.net>
Date: Mon, 19 Mar 2018 18:38:17 +0000 (-0700)
Subject: planetarium/mit-compile.sh: Output CREF warnings in Emacs format.
X-Git-Tag: mit-scheme-pucked-x11-0.2.2~5
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a14c18884344d6cb757c2682d0f98fc28aff419e;p=mit-scheme.git

planetarium/mit-compile.sh: Output CREF warnings in Emacs format.
---

diff --git a/src/planetarium/mit-compile.sh b/src/planetarium/mit-compile.sh
index 9572c49b2..17198bcf7 100755
--- a/src/planetarium/mit-compile.sh
+++ b/src/planetarium/mit-compile.sh
@@ -81,9 +81,13 @@ ${MIT_SCHEME_EXE} --batch-mode <<\EOF
 	(cref/generate-constructors "mit-3d")))
   )
 EOF
-SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
+suffix=`echo "(display (microcode-id/operating-system-suffix))" \
 	| ${MIT_SCHEME_EXE} --batch-mode`
-REPORT=mit-$SUFFIX.crf
-if [ -s "$REPORT" ]; then echo "$REPORT:1: warning: not empty"; fi
-REPORT=mit-3d-$SUFFIX.crf
-if [ -s "$REPORT" ]; then echo "$REPORT:1: warning: not empty"; fi
+report=mit-$suffix.crf
+if [ -s "$report" ]; then
+    awk "{printf \"$report:%d: %s\\n\",NR,\$0}" $report
+fi
+report=mit-3d-$suffix.crf
+if [ -s "$report" ]; then
+    awk "{printf \"$report:%d: %s\\n\",NR,\$0}" $report
+fi