diff options
| author | Charles Lane <lane@DUPHY4.Physics.Drexel.Edu> | 2001-10-19 13:45:23 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-19 21:09:27 +0000 |
| commit | 96e176bf068724d05d4927c116d41d2f78a2560d (patch) | |
| tree | e18e87ee8dc36dca37fb10687567e52e5db9cd78 /configure.com | |
| parent | b8d190ff31df6d51464475a3b67820d11d6c9f06 (diff) | |
| download | perl-96e176bf068724d05d4927c116d41d2f78a2560d.tar.gz | |
vmsish fix, ieee rand() cleanup
Message-Id: <011019174427.d749b@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12513
Diffstat (limited to 'configure.com')
| -rw-r--r-- | configure.com | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/configure.com b/configure.com index 82fa3ed4a0..2c4f1be9d2 100644 --- a/configure.com +++ b/configure.com @@ -4514,7 +4514,6 @@ $! $! Check rand48 and its ilk $! $ echo4 "Looking for a random number function..." -$ d_use_rand = "undef" $ OS $ WS "#if defined(__DECC) || defined(__DECCXX)" $ WS "#include <stdlib.h>" @@ -4555,10 +4554,9 @@ $ IF compile_status .EQ. good_compile .AND. link_status .EQ. good_link $ THEN $ echo4 "OK, found random()." $ ELSE -$ drand01="(((float)rand())*PL_my_inv_rand_max)" +$ drand01="(((float)rand())*MY_INV_RAND_MAX)" $ randseedtype = "unsigned" $ seedfunc = "srand" -$ d_use_rand = "define" $ echo4 "Yick, looks like I have to use rand()." $ ENDIF $ ENDIF @@ -5732,7 +5730,6 @@ $ THEN $! Alas this does not help to build Fcntl $! WC "#define PERL_IGNORE_FPUSIG SIGFPE" $ ENDIF -$ if d_use_rand .EQS. "define" then WC "#define Drand01_is_rand" $ CLOSE CONFIG $! $ echo4 "Doing variable substitutions on .SH files..." |