In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/0f24672021c6c5d7f398a81ee24305ae45c32779?hp=f2756cbb47e4bb872c6b9acc9ee0f67b30167864>
- Log -----------------------------------------------------------------
commit 0f24672021c6c5d7f398a81ee24305ae45c32779
Author: Tony Cook <t...@develop-help.com>
Date: Tue Nov 19 09:50:25 2013 +1100
[perl #120543] work around a C++ library bug in VC 2003
VC 2003 makes overloaded versions of ldexp() available when including
<math.h> which should only be visible when including <cmath>.
The cast ensures the ldexp(double, int) signature is used.
-----------------------------------------------------------------------
Summary of changes:
util.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/util.c b/util.c
index c68bb90..68893c4 100644
--- a/util.c
+++ b/util.c
@@ -6252,7 +6252,7 @@ Perl_drand48_r(perl_drand48_t *random_state)
*random_state = (*random_state * DRAND48_MULT + DRAND48_ADD)
& DRAND48_MASK;
- return ldexp(*random_state, -48);
+ return ldexp((double)*random_state, -48);
#else
{
U32 accu;
--
Perl5 Master Repository
