From: Martin Mares <mj@ucw.cz>
Date: Thu, 5 Jul 2007 09:13:54 +0000 (+0200)
Subject: Translate signal numbers to readable strings.
X-Git-Tag: python-dummy-working~304
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=11186a847caaa8904ecd26f65d5fdc5bcdb2096a;p=eval.git

Translate signal numbers to readable strings.
---

diff --git a/bin/lib b/bin/lib
index f85e523..6f5c476 100644
--- a/bin/lib
+++ b/bin/lib
@@ -209,6 +209,13 @@ function test-result
 		rm $TDIR/$TEST.pts
 	fi
 
+	# Translate signal numbers to readable strings
+	SG=${M#Caught fatal signal }
+	if [ "$SG" != "$M" ] ; then
+		SG=`perl -MConfig -e '@s=split / /,$Config{sig_name}; print $s[$ARGV[0]]' $SG`
+		[ -z "$SG" ] || M="$M (SIG$SG)"
+	fi
+
 	# Translate Free Pascal runtime errors to readable strings
 	RE=${M#Exited with error status }
 	if [ "$FREE_PASCAL_RTE" == 1 -a "$RE" != "$M" ] ; then