[svn:parrot] r42351 - branches/pmc_headers_move/t/tools/pmc2cutils
bacek at svn.parrot.org
bacek at svn.parrot.org
Sun Nov 8 02:11:45 UTC 2009
Author: bacek
Date: Sun Nov 8 02:11:44 2009
New Revision: 42351
URL: https://trac.parrot.org/parrot/changeset/42351
Log:
[t] Make include and include/pmc directories during test.
Modified:
branches/pmc_headers_move/t/tools/pmc2cutils/05-gen_c.t
Modified: branches/pmc_headers_move/t/tools/pmc2cutils/05-gen_c.t
==============================================================================
--- branches/pmc_headers_move/t/tools/pmc2cutils/05-gen_c.t Sun Nov 8 01:52:38 2009 (r42350)
+++ branches/pmc_headers_move/t/tools/pmc2cutils/05-gen_c.t Sun Nov 8 02:11:44 2009 (r42351)
@@ -19,7 +19,7 @@
}
unshift @INC, qq{$topdir/lib};
}
-use Test::More tests => 44;
+use Test::More tests => 52;
use Carp;
use File::Basename;
use File::Copy;
@@ -44,7 +44,7 @@
ok( chdir $tdir, 'changed to temp directory for testing' );
my $temppmcdir = qq{$tdir/src/pmc};
- for ( qq{$tdir/src}, $temppmcdir ) {
+ for ( qq{$tdir/src}, qq{$tdir/include}, qq{$tdir/include/pmc}, $temppmcdir ) {
ok( mkdir($_), "created $_ under tempdir" );
}
@@ -87,6 +87,8 @@
ok( chdir $tdir, 'changed to temp directory for testing' );
my $pmcdir = q{src/pmc};
ok( ( mkdir qq{$tdir/src} ), "created src/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include} ), "created include/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include/pmc} ), "created include/pmc/ under tempdir" );
my $temppmcdir = qq{$tdir/src/pmc};
ok( ( mkdir $temppmcdir ), "created src/pmc/ under tempdir" );
@@ -139,6 +141,8 @@
ok( chdir $tdir, 'changed to temp directory for testing' );
my $pmcdir = q{src/pmc};
ok( ( mkdir qq{$tdir/src} ), "created src/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include} ), "created include/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include/pmc} ), "created include/pmc/ under tempdir" );
my $temppmcdir = qq{$tdir/src/pmc};
ok( ( mkdir $temppmcdir ), "created src/pmc/ under tempdir" );
@@ -190,6 +194,8 @@
ok( chdir $tdir, 'changed to temp directory for testing' );
my $pmcdir = q{src/pmc};
ok( ( mkdir qq{$tdir/src} ), "created src/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include} ), "created include/ under tempdir" );
+ ok( ( mkdir qq{$tdir/include/pmc} ), "created include/pmc/ under tempdir" );
my $temppmcdir = qq{$tdir/src/pmc};
ok( ( mkdir $temppmcdir ), "created src/pmc/ under tempdir" );
More information about the parrot-commits
mailing list