-MO=C falls over on package <none>

[p5sagit/p5-mst-13.2.git] / ext / B / B.xs

diff --git a/ext/B/B.xs b/ext/B/B.xs
index df5267e..f1f0e65 100644 (file)
--- a/ext/B/B.xs
+++ b/ext/B/B.xs
@@ -408,8 +408,10 @@ B_init_av()
 
 B::AV
 B_begin_av()
+
 B::AV
 B_end_av()
+
 B::CV
 B_main_cv()
 
@@ -527,6 +529,7 @@ void
 save_BEGINs()
     CODE:
        PL_minus_c |= 0x10;
+
 SV *
 cstring(sv)
        SV *    sv
@@ -705,8 +708,8 @@ PMOP_precomp(o)
        if (rx)
            sv_setpvn(ST(0), rx->precomp, rx->prelen);
 
-#define SVOP_sv(o)     cSVOPo_sv
-#define SVOP_gv(o)     cGVOPo_gv
+#define SVOP_sv(o)     cSVOPo->op_sv
+#define SVOP_gv(o)     ((GV*)cSVOPo->op_sv)
 
 MODULE = B     PACKAGE = B::SVOP               PREFIX = SVOP_
 
@@ -1222,7 +1225,7 @@ CvXSUBANY(cv)
 
 MODULE = B    PACKAGE = B::CV
 
-U8
+U16
 CvFLAGS(cv)
       B::CV   cv