This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix C++ build for Fcntl.xs.
authorNicholas Clark <nick@ccl4.org>
Tue, 19 Oct 2010 07:42:25 +0000 (08:42 +0100)
committerNicholas Clark <nick@ccl4.org>
Tue, 19 Oct 2010 07:44:12 +0000 (08:44 +0100)
96d24b8ce2ce0411 wasn't C++ friendly.

ext/Fcntl/Fcntl.xs

index a66f66e..33c3cf9 100644 (file)
@@ -33,9 +33,8 @@
    --AD  October 16, 1995
 */
 
-static XS(XS_Fcntl_S_ISREG); /* prototype to pass -Wmissing-prototypes */
-static
-XS(XS_Fcntl_S_ISREG)
+static void
+XS_Fcntl_S_ISREG(pTHX_ CV* cv)
 {
     dVAR;
     dXSARGS;