0025901: Incorrect work of command OCC181 in test-cases bugs fclasses bug181_1 and...

Modified test cases

diff --git a/tests/bugs/fclasses/bug181_1 b/tests/bugs/fclasses/bug181_1
index bf9f5675a9a66208ad36a545b65de1f85562b0bd..b7c434131c686490781fa13aa8761a9bee4adef0 100644 (file)
--- a/tests/bugs/fclasses/bug181_1
+++ b/tests/bugs/fclasses/bug181_1
@@ -15,8 +15,6 @@ set tmp ${imagedir}
 
 pload QAcommands
 
-file delete -force ${tmp}/1
-
 set log [OCC181 OCC181 ${imagedir} ${tmp}/1 0]
 
 set list [split ${log}]
@@ -29,3 +27,4 @@ if { ${status} == "TRUE"} then {
    puts "OCC181: Error"
 }
 
+file delete -force ${tmp}/1

diff --git a/tests/bugs/fclasses/bug181_2 b/tests/bugs/fclasses/bug181_2
index 42c74d77d4b10416c1201f7be74ffed26050ba66..c07ff4f7fd924698a4bdda594c4dded254c69478 100644 (file)
--- a/tests/bugs/fclasses/bug181_2
+++ b/tests/bugs/fclasses/bug181_2
@@ -17,8 +17,6 @@ set tmp ${imagedir}
 
 pload QAcommands
 
-file delete -force ${tmp}/2
-
 set log [OCC181 OCC181 ${imagedir} ${tmp}/2/2/3 0]
 
 set list [split ${log}]
@@ -31,3 +29,4 @@ if { ${status} == "TRUE"} then {
     puts "OCC181: Error"
 }
 
+file delete -force ${tmp}/2