Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
unlink the file from the subjob
authorMartin Quinson <martin.quinson@loria.fr>
Sat, 3 Sep 2016 16:38:27 +0000 (18:38 +0200)
committerMartin Quinson <martin.quinson@loria.fr>
Sat, 3 Sep 2016 16:41:44 +0000 (18:41 +0200)
- This test often fails because the main job does find the file to cleanup
- I suspect synchronization issue, so try to remove it from perl to ease things
- Also have perl close the file before removing it, some OS don't like
  multiple access to the same file

tools/tesh/background.tesh

index 3fbabd3..74332e7 100644 (file)
@@ -4,12 +4,14 @@ $ mkdir temp_testdir_background
 $ cd temp_testdir_background
 
 < use strict; 
-< sleep(2);
+< sleep(1);
 < open (FILE, "<tmp_fich") || die "Cannot open tmp_fich: $!\n";
 < 
 < while (<FILE>) {
 <   print;
 < }
+< close(FILE);
+< unlink("tmp_fich");
 < exit 0;
 <
 $ mkfile delayed_cat.pl
@@ -22,4 +24,3 @@ $ mkfile tmp_fich
 
 $ sleep 2
 $ cd ..
-$ cmake -E remove_directory temp_testdir_background