X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=tests%2Fall.T;h=2677813d5bcd91cea24be45bf5eff49aa3a1afa1;hb=1a0d5188a95335014a69ad0115c32466799dde8e;hp=217eeb39c8115d58b40befda21c323f0630912fa;hpb=9cb3b43b84d858efaa5a21a2f737880d94d586ac;p=haskell-directory.git

diff --git a/tests/all.T b/tests/all.T
index 217eeb3..2677813 100644
--- a/tests/all.T
+++ b/tests/all.T
@@ -5,13 +5,17 @@ test('doesDirectoryExist001',   normal, compile_and_run, [''])
 # This test is a bit bogus.  Disable for GHCi.
 test('getDirContents001', omit_ways(['ghci']), compile_and_run, ['-fno-gen-manifest'])
 
+test('getDirContents002', exit_code(1), compile_and_run, [''])
+
 # Depends on binary from previous run, which gets removed by the driver way=ghci
 test('getPermissions001', omit_ways(['ghci']), compile_and_run, ['-cpp'])
 
-test('copyFile001',  normal, compile_and_run, [''])
-test('copyFile002',  normal, compile_and_run, [''])
+test('copyFile001',  extra_clean(['copyFile/target']), compile_and_run, [''])
+test('copyFile002',  extra_clean(['copyFile/target']), compile_and_run, [''])
 
 test('renameFile001', extra_clean(['renameFile001.tmp1','renameFile001.tmp2']),
       compile_and_run, [''])
 
 test('createDirectory001',  normal, compile_and_run, [''])
+
+test('createDirectoryIfMissing001',  normal, compile_and_run, [''])