summaryrefslogtreecommitdiff
path: root/tests/tsqr.c
diff options
context:
space:
mode:
authorvlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2008-08-21 10:17:19 +0000
committervlefevre <vlefevre@280ebfd0-de03-0410-8827-d642c229c3f4>2008-08-21 10:17:19 +0000
commit00b4e5add3ec5d4040fe450aa9cc076fbe0bbde9 (patch)
tree8db6ba6a4a89484342a5dac95be06fa6e5cf9d94 /tests/tsqr.c
parentfd6c37a6f1ac7ec4bd4f55ee1364f958895f6013 (diff)
downloadmpfr-00b4e5add3ec5d4040fe450aa9cc076fbe0bbde9.tar.gz
tests/tsqr.c: corrected function definitions.
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@5582 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'tests/tsqr.c')
-rw-r--r--tests/tsqr.c42
1 files changed, 21 insertions, 21 deletions
diff --git a/tests/tsqr.c b/tests/tsqr.c
index 3c9a4d2eb..2e8fab578 100644
--- a/tests/tsqr.c
+++ b/tests/tsqr.c
@@ -25,28 +25,9 @@ MA 02110-1301, USA. */
#include "mpfr-test.h"
-void check_special (void);
-void check_random (mpfr_prec_t p);
-
#define TEST_FUNCTION mpfr_sqr
#include "tgeneric.c"
-int main(void)
-{
- mpfr_prec_t p;
-
- tests_start_mpfr ();
-
- check_special ();
- for(p = 2 ; p < 200 ; p++)
- check_random (p);
-
- test_generic (2, 200, 15);
-
- tests_end_mpfr ();
- return 0;
-}
-
static int
inexact_sign (int x)
{
@@ -75,7 +56,8 @@ error2 (mp_rnd_t rnd, mpfr_prec_t prec, mpfr_t in, mpfr_t out,
exit(1);
}
-void check_random(mpfr_prec_t p)
+static void
+check_random (mpfr_prec_t p)
{
mpfr_t x,y,z;
int r;
@@ -99,7 +81,8 @@ void check_random(mpfr_prec_t p)
mpfr_clears (x, y, z, (mpfr_ptr) 0);
}
-void check_special(void)
+static void
+check_special (void)
{
mpfr_t x, y;
mp_exp_t emin;
@@ -135,3 +118,20 @@ void check_special(void)
mpfr_clear (y);
mpfr_clear (x);
}
+
+int
+main (void)
+{
+ mpfr_prec_t p;
+
+ tests_start_mpfr ();
+
+ check_special ();
+ for (p = 2; p < 200; p++)
+ check_random (p);
+
+ test_generic (2, 200, 15);
+
+ tests_end_mpfr ();
+ return 0;
+}