[svn:Module-Build] r12887 - in Module-Build/trunk: . t

Author: dagolden
Date: Tue Jun 23 09:37:36 2009
New Revision: 12887

Modified:
   Module-Build/trunk/Changes
   Module-Build/trunk/t/ppm.t
   Module-Build/trunk/t/xs.t

Log:
skips xs.t and ppm.t when !Config{usedl} (RT#46178)

Since Module::Buld does not (yet) support static linking, we must skip 
these tests.


Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes	(original)
+++ Module-Build/trunk/Changes	Tue Jun 23 09:37:36 2009
@@ -2,6 +2,10 @@
 
 0.33_04 - 
 
+ Other
+ - skips xs.t and ppm.t when perl was not compiled with dynamic loading
+   since Module::Buld does not support static linking (RT#46178)
+
 0.33_03 - Mon Jun 22 17:22:56 EDT 2009
 
  Bug-fixes:

Modified: Module-Build/trunk/t/ppm.t
==============================================================================
--- Module-Build/trunk/t/ppm.t	(original)
+++ Module-Build/trunk/t/ppm.t	Tue Jun 23 09:37:36 2009
@@ -6,6 +6,7 @@
 
 use Module::Build;
 use Module::Build::ConfigData;
+use Config;
 
 my $manpage_support = Module::Build::ConfigData->feature('manpage_support');
 my $HTML_support = Module::Build::ConfigData->feature('HTML_support');
@@ -16,6 +17,8 @@
     plan skip_all => 'C_support not enabled';
   } elsif ( ! $have_c_compiler ) {
     plan skip_all => 'C_support enabled, but no compiler found';
+  } elsif ( !$Config{usedl} ) {
+    plan skip_all => 'Perl not compiled for dynamic loading'
   } elsif ( ! eval {require Archive::Tar} ) {
     plan skip_all => "Archive::Tar not installed to read archives.";
   } elsif ( ! eval {IO::Zlib->VERSION(1.01)} ) {

Modified: Module-Build/trunk/t/xs.t
==============================================================================
--- Module-Build/trunk/t/xs.t	(original)
+++ Module-Build/trunk/t/xs.t	Tue Jun 23 09:37:36 2009
@@ -4,6 +4,7 @@
 use lib $ENV{PERL_CORE} ? '../lib/Module/Build/t/lib' : 't/lib';
 use MBTest;
 use Module::Build;
+use Config;
 
 {
   my ($have_c_compiler, $C_support_feature) = check_compiler();
@@ -14,6 +15,8 @@
     plan skip_all => 'C_support enabled, but no compiler found';
   } elsif ( $^O eq 'VMS' ) {
     plan skip_all => 'Child test output confuses harness';
+  } elsif ( !$Config{usedl} ) {
+    plan skip_all => 'Perl not compiled for dynamic loading'
   } else {
     plan tests => 23;
   }