Coro-MP/t/00_load.t

BEGIN { $| = 1; print "1..1\n"; }

my $idx;

for my $module (qw(
   Coro::MP
)) {
   eval "use $module";
   print $@ ? "not " : "", "ok ", ++$idx, " # $module ($@)\n";
}

Revision:	1.1
Committed:	Thu Oct 1 23:56:31 2009 UTC (17 years ago) by root
Content type:	application/x-troff
Branch:	MAIN
CVS Tags:	rel-0_1, HEAD
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.1	BEGIN { $\| = 1; print "1..1\n"; }
2
3			my $idx;
4
5			for my $module (qw(
6			Coro::MP
7			)) {
8			eval "use $module";
9			print $@ ? "not " : "", "ok ", ++$idx, " # $module ($@)\n";
10			}
11