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.