From 96a52f7a6fa8d69df6b9977b23784e84230218cb Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Mon, 19 Jun 1989 09:49:22 +0000
Subject: [PATCH] fixed exit status of test program

---
 lang/cem/libcc/math/test.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lang/cem/libcc/math/test.c b/lang/cem/libcc/math/test.c
index eeadd872f..e681f092e 100644
--- a/lang/cem/libcc/math/test.c
+++ b/lang/cem/libcc/math/test.c
@@ -8,6 +8,8 @@
 #include <math.h>
 #include <stdio.h>
 
+int nerrors;
+
 #define EPS_D	5.0e-14
 main()
 {
@@ -16,6 +18,7 @@ main()
 	testexplog();
 	testgamma();
 	testbessel();
+	exit(nerrors);
 }
 
 dotest(s, x, d, v)
@@ -27,6 +30,7 @@ dotest(s, x, d, v)
 	if (fabs((v - d) / (fabs(v) < EPS_D ? 1.0 : v)) > EPS_D) {
 		printf(s, x);
 		printf(" = %.16e, should be %.16e\n", d, v);
+		nerrors++;
 	}
 }
 
-- 
2.34.1