Re: [PATCH t/lib/1_compile.t] Skipping known tested libraries

Message-ID: <20010421223500.N2946@blackrider.blackstar.co.uk>

p4raw-id: //depot/perl@9816

diff --git a/t/lib/1_compile.t b/t/lib/1_compile.t
index f6e2ad0..333d19f 100644 (file)
--- a/t/lib/1_compile.t
+++ b/t/lib/1_compile.t
@@ -76,6 +76,14 @@ unless (using_feature('threads') && has_extension('Thread')) {
 delete_by_prefix('unicode::');
 add_by_name('unicode::distinct');      # put this back
 
+
+# Delete all modules which have their own tests.  This makes
+# this test alot faster.
+foreach my $mod (<DATA>) {
+    chomp $mod;
+    delete_by_name($mod);
+}
+
 # Okay, this is the list.
 
 my @Core_Modules = sort keys %Core_Modules;
@@ -97,3 +105,138 @@ sub compile_module {
     
     return scalar `$^X "-Ilib" t/lib/compmod.pl $module` =~ /^ok/;
 }
+
+
+__DATA__
+AnyDBM_File
+AutoLoader
+B
+B::Debug
+B::Deparse
+B::ShowLex
+B::Stash
+Benchmark
+CGI
+CGI::Pretty
+CGI::Util
+Carp
+Class::ISA
+Class::Struct
+Cwd
+DB_File
+Data::Dumper
+Devel::DProf
+Devel::Peek
+Digest
+Digest::MD5
+DirHandle
+Dumpvalue
+Encode
+English
+Env
+Errno
+Exporter
+Exporter::Heavy
+Fatal
+Fcntl
+File::Basename
+File::CheckTree
+File::Copy
+File::DosGlob
+File::Find
+File::Glob
+File::Path
+File::Spec
+File::Spec::Functions
+File::Temp
+FileCache
+FileHandle
+Filter::Util::Call
+FindBin
+GDBM_File
+Getopt::Long
+Getopt::Std
+IO::Dir
+IO::File
+IO::Handle
+IO::Pipe
+IO::Poll
+IO::Seekable
+IO::Select
+IO::Socket
+IO::Socket::INET
+IO::Socket::UNIX
+IPC::Open2
+IPC::Open3
+IPC::SysV
+List::Util
+Locale::Constants
+Locale::Country
+Locale::Currency
+Locale::Language
+MIME::Base64
+MIME::QuotedPrint
+Math::BigFloat
+Math::BigInt
+Math::Complex
+Math::Trig
+NDBM_File
+Net::hostent
+ODBM_File
+Opcode
+POSIX
+Pod::Checker
+Pod::Find
+Pod::Text
+Pod::Usage
+SDBM_File
+Safe
+Scalar::Util
+Search::Dict
+SelectSaver
+SelfLoader
+Socket
+Storable
+Switch
+Symbol
+Sys::Hostname
+Sys::Syslog
+Term::ANSIColor
+Test
+Test::Harness
+Test::ParseWords
+Text::Abbrev
+Text::Balanced
+Text::ParseWords
+Text::Soundex
+Text::Tabs
+Text::Wrap
+Thread
+Tie::Array
+Tie::Handle
+Tie::Hash
+Tie::RefHash
+Tie::Scalar
+Tie::SubstrHash
+Time::HiRes
+Time::Local
+Time::Piece
+UNIVERSAL
+XS::Typemap
+attrs
+base
+bytes
+charnames
+constant
+diagnostics
+fields
+integer
+locale
+ops
+overload
+strict
+subs
+utf8
+vars
+warnings
+warnings::register