This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Enable POSIX::strtold() on Windows (GCC) USE_LONG_DOUBLE builds
authorSteve Hay <steve.m.hay@googlemail.com>
Thu, 27 Nov 2014 09:08:56 +0000 (09:08 +0000)
committerSteve Hay <steve.m.hay@googlemail.com>
Thu, 27 Nov 2014 14:11:19 +0000 (14:11 +0000)
ext/POSIX/POSIX.xs

index ed788b8..aecbd67 100644 (file)
@@ -1134,7 +1134,9 @@ char *tzname[] = { "" , "" };
 #  define setuid(a)            not_here("setuid")
 #  define setgid(a)            not_here("setgid")
 #endif /* NETWARE */
+#ifndef USE_LONG_DOUBLE
 #  define strtold(s1,s2)       not_here("strtold")
+#endif  /* USE_LONG_DOUBLE */
 #else
 
 #  ifndef HAS_MKFIFO