diag.t: Skip x2p

diff --git a/t/porting/diag.t b/t/porting/diag.t
index b71c94d..f34a77f 100644 (file)
--- a/t/porting/diag.t
+++ b/t/porting/diag.t
@@ -183,7 +183,7 @@ while (my $file = <$fh>) {
     $file =~ s/\s+.*//;
     next unless $file =~ /\.(?:c|cpp|h|xs|y)\z/ or $file =~ /^perly\./;
     # OS/2 extensions have never been migrated to ext/, hence the special case:
-    next if $file =~ m!\A(?:ext|dist|cpan|lib|t|os2/OS2)/!
+    next if $file =~ m!\A(?:ext|dist|cpan|lib|t|os2/OS2|x2p)/!
             && $file !~ m!\Aext/DynaLoader/!;
     check_file($file);
 }