diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2000-07-18 12:06:06 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2000-07-18 12:06:06 +0000 |
| commit | a4eaaaa301b148b65a42bfaa0be81db4d63f4877 (patch) | |
| tree | 5cf3de6a648d4b20ec32a60dc013d1f06abd4de4 | |
| parent | 9ea62fea55fb35e625f7b0bc88d4dc84ad3b7c9d (diff) | |
Afficher plus de chiffres significatifs en cas d'erreur
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3239 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | testasmcomp/mainarith.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/testasmcomp/mainarith.c b/testasmcomp/mainarith.c index b5c180b59..5a6d8d5bf 100644 --- a/testasmcomp/mainarith.c +++ b/testasmcomp/mainarith.c @@ -35,19 +35,19 @@ double F, G; #define INTFLOATTEST(arg,res) \ { long result = (res); \ if (arg != result) \ - printf("Failed test \"%s == %s\" for F=%g and G=%g: result %ld, expected %ld\n", \ + printf("Failed test \"%s == %s\" for F=%.15g and G=%.15g: result %ld, expected %ld\n", \ #arg, #res, F, G, arg, result); \ } #define FLOATTEST(arg,res) \ { double result = (res); \ if (arg < result || arg > result) \ - printf("Failed test \"%s == %s\" for F=%g and G=%g: result %e, expected %e\n", \ + printf("Failed test \"%s == %s\" for F=%.15g and G=%.15g: result %.15g, expected %.15g\n", \ #arg, #res, F, G, arg, result); \ } #define FLOATINTTEST(arg,res) \ { double result = (res); \ if (arg < result || arg > result) \ - printf("Failed test \"%s == %s\" for X=%ld and Y=%ld: result %e, expected %e\n", \ + printf("Failed test \"%s == %s\" for X=%ld and Y=%ld: result %.15g, expected %.15g\n", \ #arg, #res, X, Y, arg, result); \ } |