Remaining nit in the deparsing of reversed foreach loops

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

diff --git a/ext/B/t/bytecode.t b/ext/B/t/bytecode.t
index 2066105..831dae8 100644 (file)
--- a/ext/B/t/bytecode.t
+++ b/ext/B/t/bytecode.t
@@ -10,6 +10,10 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = qw(../lib);
     use Config;
+    if (($Config{'extensions'} !~ /\bB\b/) ){
+        print "1..0 # Skip -- Perl configured without B module\n";
+        exit 0;
+    }
     if ($Config{ccflags} =~ /-DPERL_COPY_ON_WRITE/) {
        print "1..0 # skip - no COW for now\n";
        exit 0;