If we're going to prototype modfl(), it needs extern "C" linkage.

p4raw-id: //depot/perl@24174

diff --git a/perl.h b/perl.h
index 410846ec2556b44e13bedf7658b90f9705e56f48..84d73fcb419adb87431e7c72dabddef2c6276d04 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -1531,7 +1531,7 @@ typedef NVTYPE NV;
 /* eg glibc 2.2 series seems to provide modfl on ppc and arm, but has no
    prototype in <math.h> */
 #       ifndef HAS_MODFL_PROTO
-long double modfl(long double, long double *);
+EXTERN_C long double modfl(long double, long double *);
 #      endif
 #   else
 #       if defined(HAS_AINTL) && defined(HAS_COPYSIGNL)