nonreg test : use /tmp/lus2lic-test dir instead of /tmp, and clean it before the test.

Indeed, starting from a clean /tmp dir changed the result of the non reg test...

test/lus2lic.tests/non-reg.exp

@@ -6,11 +6,9 @@ set ok_files [glob should_work/*.lus]
 set id [should_work "Unit tests" "$lus2lic" "-unit"]
 wait -i $id
 
-set tmp /tmp/
-#set tmp /tmp/lus2lic-test/
-#eval spawn "rm -f $tmp"
-#eval spawn "mkdir $tmp"
-#eval spawn "echo '$tmp dir created'"
+# should be a fresh dir...
+set tmp ./tmp/
+eval file delete [glob -nocomplain $tmp*]
 
 foreach f $ok_files {
     set basef [file rootname $f]

test/lus2lic.tests/progression.exp

@@ -2,6 +2,7 @@
 # Timeout reduced to 3 seconds
 set timeout 20
 
+set tmp ./tmp/
 
 #set command_line "~/lus2lic/objlinux/lus2lic"
 
@@ -11,7 +12,7 @@ set files [glob  -nocomplain should_work/broken/*.lus]
 
 foreach f $files {
     set bf [file rootname $f]
-    set bf /tmp/[file tail $bf]
+    set bf $tmp[file tail $bf]
     should_work "without any option" "$lus2lic" "    -o $bf.out $f"
     should_work "Generate ec code  " "$lus2lic" "-ec -o $bf.ec  $f"
 }
@@ -19,12 +20,12 @@ foreach f $files {
 
 # Programs that should fail, but that do not
 proc iter_should_fail { fail_kind } {
-    global lus2lic
+    global lus2lic tmp
 
     set files  [glob -nocomplain should_fail/$fail_kind/broken/*.lus]
     foreach f $files {
         set bf [file rootname $f]
-        set bf /tmp/[file tail $bf]
+        set bf $tmp[file tail $bf]
         should_fail "Test bad programs" "$fail_kind" "$lus2lic" "-o $bf.lic $f"
     }
 }

test/lus2lic.time

-testcase ./lus2lic.tests/non-reg.exp completed in 257 seconds
+testcase ./lus2lic.tests/non-reg.exp completed in 262 seconds
 testcase ./lus2lic.tests/progression.exp completed in 0 seconds