Change 33658 by [EMAIL PROTECTED] on 2008/04/07 17:36:41

        Tidy up compiler warning spotted by Jerry Hedden.

Affected files ...

... //depot/perl/ext/B/B.pm#90 edit
... //depot/perl/ext/B/B.xs#152 edit

Differences ...

==== //depot/perl/ext/B/B.pm#90 (text) ====
Index: perl/ext/B/B.pm
--- perl/ext/B/B.pm#89~33653~   2008-04-06 13:11:52.000000000 -0700
+++ perl/ext/B/B.pm     2008-04-07 10:36:41.000000000 -0700
@@ -7,7 +7,7 @@
 #
 package B;
 
-our $VERSION = '1.20';
+our $VERSION = '1.21';
 
 use XSLoader ();
 require Exporter;

==== //depot/perl/ext/B/B.xs#152 (text) ====
Index: perl/ext/B/B.xs
--- perl/ext/B/B.xs#151~33653~  2008-04-06 13:11:52.000000000 -0700
+++ perl/ext/B/B.xs     2008-04-07 10:36:41.000000000 -0700
@@ -1211,10 +1211,20 @@
 
 MODULE = B     PACKAGE = B::COP                PREFIX = COP_
 
+#if PERL_VERSION >= 11
+
+const char *
+COP_label(o)
+       B::COP  o
+
+#else
+
 char *
 COP_label(o)
        B::COP  o
 
+#endif
+
 char *
 COP_stashpv(o)
        B::COP  o
End of Patch.

Reply via email to