[svn:ExtUtils-ParseXS] r12965 - in ExtUtils-ParseXS/trunk: . t

Author: dagolden
Date: Mon Jun 29 08:47:35 2009
New Revision: 12965

Modified:
   ExtUtils-ParseXS/trunk/Changes
   ExtUtils-ParseXS/trunk/t/usage.t

Log:
skip usage.t for perl < 5.8

Modified: ExtUtils-ParseXS/trunk/Changes
==============================================================================
--- ExtUtils-ParseXS/trunk/Changes	(original)
+++ ExtUtils-ParseXS/trunk/Changes	Mon Jun 29 08:47:35 2009
@@ -6,6 +6,8 @@
 
  - Some tests skip if no compiler or if no dynamic loading
 
+ - INTERFACE keyword tests skipped for perl < 5.8
+
 2.19_03 - Sat Jun 27 22:51:18 EDT 2009
 
  - Released to see updated results from smoke testers

Modified: ExtUtils-ParseXS/trunk/t/usage.t
==============================================================================
--- ExtUtils-ParseXS/trunk/t/usage.t	(original)
+++ ExtUtils-ParseXS/trunk/t/usage.t	Mon Jun 29 08:47:35 2009
@@ -14,7 +14,12 @@
 use DynaLoader;
 use ExtUtils::CBuilder;
 
-plan tests => 24;
+if ( $] < 5.008 ) {
+  plan skip_all => "INTERFACE keyword support broken before 5.8";
+}
+else {
+  plan tests => 24;
+}
 
 my ($source_file, $obj_file, $lib_file, $module);