Take care that file.txt is cleaned up in test scripts.

bschmalhofer · Mar 1, 2009 · 72b0d61 · 72b0d61
1 parent 3ac61cc
commit 72b0d61
Show file tree

Hide file tree

Showing 6 changed files with 8 additions and 6 deletions.
diff --git a/build/templates/Makefile.in b/build/templates/Makefile.in
@@ -298,8 +298,7 @@ clean-test:
   t/php/*.pir \
   t/php/*.out \
   t/pmc/*.pir \
-  pipp_test_run.tar.gz \
-  file.txt
+  pipp_test_run.tar.gz
 
 clean-hash:
 	$(RM_F) "$(HASH_OBJS)"

diff --git a/t/php/builtin.t b/t/php/builtin.t
@@ -106,6 +106,7 @@ CODE
 bool(false)
 OUT
 
+unlink 'file.txt' if -f 'file.txt';
 
 # Local Variables:
 #   mode: cperl

diff --git a/t/php/file.t b/t/php/file.t
@@ -26,8 +26,8 @@ use lib "$FindBin::Bin/../../../../lib", "$FindBin::Bin/../../lib";
 use Test::More     tests => 10;
 use Parrot::Test;
 
-
 unlink 'file.txt' if -f 'file.txt';
+
 open my $X, '>', 'file.txt';
 binmode $X, ':raw';
 print {$X} "line 1\n";

diff --git a/t/php/filestat.t b/t/php/filestat.t
@@ -60,7 +60,7 @@ CODE
 21
 OUT
 
-unlink 'file.txt' if (-f 'file.txt');
+unlink 'file.txt' if -f 'file.txt';
 
 
 # Local Variables:

diff --git a/t/php/gmp.t b/t/php/gmp.t
@@ -287,6 +287,8 @@ CODE
 -1
 OUT
 
+unlink 'file.txt' if -f 'file.txt';
+
 # Local Variables:
 #   mode: cperl
 #   cperl-indent-level: 4

diff --git a/t/php/sha1.t b/t/php/sha1.t
@@ -67,8 +67,6 @@ CODE
 c12252ceda8be8994d5fa0290a47231c1d16aae3
 OUT
 
-unlink 'file.txt' if -f 'file.txt';
-
 language_output_is( 'Pipp', <<'CODE', <<'OUT', 'sha1_file(nofile)' );
 <?php
   echo sha1_file('nofile.txt'), "\n";
@@ -77,6 +75,8 @@ CODE
 
 OUT
 
+unlink 'file.txt' if -f 'file.txt';
+
 # Local Variables:
 #   mode: cperl
 #   cperl-indent-level: 4