[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