diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 1996-02-21 10:49:46 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 1996-02-21 10:49:46 +0000 |
commit | c5483309b52f01b6275d1cb68a48219ed666cf17 (patch) | |
tree | b37b4247b069556db2c4eb1b7ad79a16921dee6d /testasmcomp/mainarith.c | |
parent | a76589a552b694b3888cd8853e7d2d469f51ac43 (diff) |
Portage Windows NT/95.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@650 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'testasmcomp/mainarith.c')
-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 5290c35a5..af233c889 100644 --- a/testasmcomp/mainarith.c +++ b/testasmcomp/mainarith.c @@ -284,9 +284,9 @@ int main(argc, argv) } } weird[0] = 0.0; - weird[1] = 1.0 / 0.0; /* +infty */ - weird[2] = -1.0 / 0.0; /* -infty */ - weird[3] = 0.0 / 0.0; /* NaN */ + weird[1] = 1.0 / weird[0]; /* +infty */ + weird[2] = -1.0 / weird[0]; /* -infty */ + weird[3] = 0.0 / weird[0]; /* NaN */ for (x = 0; x < 4; x++) { for (y = 0; y < 4; y++) { f = weird[x]; g = weird[y]; do_test(); |