From: Craig A. Berry <craigberry@mac.com>
Date: Mon, 28 Jan 2002 16:30:30 +0000 (-0600)
Subject: skip assembler.t when there is no ByteLoader
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ff924b364b62b114075d2b8d3ef58cbf7413ddde;p=p5sagit%2Fp5-mst-13.2.git

skip assembler.t when there is no ByteLoader
Message-Id: <5.1.0.14.2.20020128162440.01ae7868@exchi01>

p4raw-id: //depot/perl@14482
---

diff --git a/ext/B/t/assembler.t b/ext/B/t/assembler.t
index 3e987e0..6640082 100644
--- a/ext/B/t/assembler.t
+++ b/ext/B/t/assembler.t
@@ -154,6 +154,13 @@ use strict;
 use Test::More;
 use Config qw(%Config);
 
+BEGIN {
+  if (($Config{'extensions'} !~ /\bByteLoader\b/) ){
+    print "1..0 # Skip -- Perl configured without ByteLoader module\n";
+    exit 0;
+  }
+}
+
 use B::Asmdata      qw( %insn_data );
 use B::Assembler    qw( &assemble_fh );
 use B::Disassembler qw( &disassemble_fh &get_header );