Re: Initial Devel::UncheckedOps, a macro for perl

[diotalevi]

This is a patch to B::Generate 1.07 so that the instantiation of the various B::SPECIAL objects don't trigger segfaults (B got it right - B::Generate just forgot to include this). http://rt.cpan.org/NoAuth/Bug.html?id=6595

--- .cpan/build/B-Generate-1.06/lib/B/Generate.xs    2002-07-28 11:45:
+48.000000000 -0500
+++ .cpan/build/B-Generate-1.06-fix/lib/B/Generate.xs    2004-06-11 13
+:34:27.000000000 -0500
@@ -425,6 +425,18 @@
 
 MODULE = B::Generate    PACKAGE = B    PREFIX = B_
 
+BOOT:
+{
+    specialsv_list[0] = Nullsv;
+    specialsv_list[1] = &PL_sv_undef;
+    specialsv_list[2] = &PL_sv_yes;
+    specialsv_list[3] = &PL_sv_no;
+    specialsv_list[4] = pWARN_ALL;
+    specialsv_list[5] = pWARN_NONE;
+    specialsv_list[6] = pWARN_STD;
+}
+
+
 void
 B_fudge()
     CODE: