From: ceriel <none@none>
Date: Fri, 22 Jul 1988 20:58:48 +0000 (+0000)
Subject: Added some prints
X-Git-Tag: release-5-5~3006
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=b09805786d93a38f7437cab798b002af24e5c6c6;p=ack.git

Added some prints
---

diff --git a/lang/cem/libcc/math/test.c b/lang/cem/libcc/math/test.c
index a12f19f33..eeadd872f 100644
--- a/lang/cem/libcc/math/test.c
+++ b/lang/cem/libcc/math/test.c
@@ -38,6 +38,8 @@ testsqrt()
 	double x, val;
 	extern double sqrt();
 
+	printf("testing sqrt ... \n");
+
 	dotest("sqrt(%.1f)", 2.0, sqrt(2.0), SQRT2);
 	dotest("sqrt(%.1f)", 10.0, sqrt(10.0), SQRT10);
 
@@ -61,6 +63,8 @@ testtrig()
 	double x;
 	extern double sin(), cos(), tan(), asin(), acos(), atan(), fabs();
 
+	printf("testing sin, cos, tan, asin, acos, atan ... \n");
+
 	dotest("sin(0)", 0.0, sin(0.0), SIN0);
 	dotest("sin(pi/24)", M_PI/24 , sin(M_PI/24), SINPI_24);
 	dotest("sin(pi/16)", M_PI/16 , sin(M_PI/16), SINPI_16);
@@ -129,6 +133,7 @@ testexplog()
 	extern double exp(), log();
 	double x;
 
+	printf("testing exp and log ...\n");
 	dotest("exp(%.2f)", -1.0, exp(-1.0), EXPMIN1);
 	dotest("exp(%.2f)", -0.25, exp(-0.25), EXPMIN1_4);
 	dotest("exp(%.2f)", 0.0, exp(0.0), EXP0);
@@ -151,6 +156,7 @@ testgamma()
 	double x, xfac;
 	extern double gamma(), exp();
 
+	printf("testing gamma ...\n");
 	for (x = 1.0, xfac = 1.0; x < 30.0; x += 1.0) {
 		dotest("exp(gamma(%.2f))", x, exp(gamma(x)), xfac);
 		xfac *= x;
@@ -172,6 +178,8 @@ testbessel()
 	extern char *sprintf();
 	char buf[100];
 
+	printf("testing bessel ...\n");
+
 	dotest("j0(pi/4)", M_PI_4, j0(M_PI_4), J0__PI_4);
 	dotest("j0(pi/2)", M_PI_2, j0(M_PI_2), J0__PI_2);
 	dotest("j1(pi/4)", M_PI_4, j1(M_PI_4), J1__PI_4);