diff --git a/tests/boolean/bfuse_complex/R9 b/tests/boolean/bfuse_complex/R9
index 11fbb6ea90..2a595539da 100644
--- a/tests/boolean/bfuse_complex/R9
+++ b/tests/boolean/bfuse_complex/R9
@@ -5,12 +5,13 @@ puts "PRO18457"
 puts "Fuse"
 puts ""
 
-puts "TODO #22911 ALL: Faulty shapes in variables faulty_1 to faulty_"
-puts "TODO #22911 ALL: Error : The area of the resulting shape is"
+puts "TODO ?OCC22911 ALL: Faulty shapes in variables faulty_1 to faulty_"
+puts "TODO ?OCC22911 ALL: Error : The area of the resulting shape is"
 
 restore [locate_data_file pro18457a.rle] f1
 restore [locate_data_file pro18457b.rle] f2
 
 bfuse result f1 f2
 
-set square 0
+set square 996.98
+
diff --git a/tests/bugs/modalg/bug23716 b/tests/bugs/modalg/bug23716
index a2c306b849..720ebab897 100755
--- a/tests/bugs/modalg/bug23716
+++ b/tests/bugs/modalg/bug23716
@@ -11,6 +11,6 @@ explode b
 bop b_1 b_3
 bopfuse result
 
-set square 4844.63
+set square 45605.9
 
 set 2dviewer 1
diff --git a/tests/bugs/moddata/bug956_1 b/tests/bugs/moddata/bug956_1
index dbb943901f..76fda06ebf 100755
--- a/tests/bugs/moddata/bug956_1
+++ b/tests/bugs/moddata/bug956_1
@@ -1,4 +1,4 @@
-puts "TODO OCC12345 ALL: Faulty OCC956"
+puts "TODO ?OCC12345 ALL: Faulty OCC956"
 
 puts "========="
 puts " OCC956 "
diff --git a/tests/bugs/moddata/bug956_2 b/tests/bugs/moddata/bug956_2
index ef6fae634e..3e045b22cb 100755
--- a/tests/bugs/moddata/bug956_2
+++ b/tests/bugs/moddata/bug956_2
@@ -1,4 +1,4 @@
-puts "TODO OCC12345 ALL: Faulty OCC956"
+puts "TODO ?OCC12345 ALL: Faulty OCC956"
 
 puts "========="
 puts " OCC956 "
diff --git a/tests/chamfer/data/complex/B5 b/tests/chamfer/data/complex/B5
index d235d1d378..41c42ef183 100644
--- a/tests/chamfer/data/complex/B5
+++ b/tests/chamfer/data/complex/B5
@@ -13,7 +13,7 @@ if { [string compare $command chamf] == 0 } {
     set os $env(os_type)
   }
   if {[string compare $group dist_angle] == 0} {
-    puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
+    puts "TODO ?OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
   }
   if {[string compare $group equal_dist] == 0} {
     puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
diff --git a/tests/chamfer/data/complex/B7 b/tests/chamfer/data/complex/B7
index 4c3b77ef77..f6710116a1 100644
--- a/tests/chamfer/data/complex/B7
+++ b/tests/chamfer/data/complex/B7
@@ -11,7 +11,7 @@ if { [string compare $command chamf] == 0 } {
     set os $env(os_type)
   }
   if {[string compare $group dist_angle] == 0} {
-    puts "TODO OCC22909 All:Faulty shapes in variables faulty_1 to faulty_"
+    puts "TODO ?OCC22909 All:Faulty shapes in variables faulty_1 to faulty_"
   } else {
     puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_"
   }
diff --git a/tests/heal/data/advanced/C6 b/tests/heal/data/advanced/C6
index 3be9be6af3..20ebe59445 100644
--- a/tests/heal/data/advanced/C6
+++ b/tests/heal/data/advanced/C6
@@ -1,5 +1,5 @@
 if {[string compare $command "SplitAngle"] == 0 } {
-    puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2 "
+    puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2 "
 }
 restore [locate_data_file FRA61952.rle] a
 
diff --git a/tests/heal/data/advanced/C8 b/tests/heal/data/advanced/C8
index 5f9b180541..02422dceb9 100644
--- a/tests/heal/data/advanced/C8
+++ b/tests/heal/data/advanced/C8
@@ -1,5 +1,5 @@
 if {[string compare $command "SplitAngle"] == 0 } {
-    puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_4 "
+    puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_4 "
 }
 restore [locate_data_file FRA61955.rle] a
 
diff --git a/tests/heal/data/advanced/D2 b/tests/heal/data/advanced/D2
index f1f21371b5..60f390f716 100644
--- a/tests/heal/data/advanced/D2
+++ b/tests/heal/data/advanced/D2
@@ -1,5 +1,5 @@
 if {[string compare $command "SplitAngle"] == 0 } {
-    puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_10 "
+    puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_10 "
 }
 restore [locate_data_file FRA61958.rle] a
 
diff --git a/tests/heal/data/advanced/ZF1 b/tests/heal/data/advanced/ZF1
index 98303687f9..fddef1abbb 100644
--- a/tests/heal/data/advanced/ZF1
+++ b/tests/heal/data/advanced/ZF1
@@ -8,7 +8,7 @@ if {[string compare $command "SplitAngle"] == 0 } {
 	||  [string compare $os "Mandriva2008"] == 0
 	||  [string compare $os "Mandriva2010"] == 0
        } {
-  puts "TODO OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
+  puts "TODO ?OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
     }
 }
 
diff --git a/tests/heal/data/advanced/ZF2 b/tests/heal/data/advanced/ZF2
index d76fa6d3df..4d1cb5c72b 100644
--- a/tests/heal/data/advanced/ZF2
+++ b/tests/heal/data/advanced/ZF2
@@ -8,7 +8,7 @@ if {[string compare $command "SplitAngle"] == 0 } {
 	||  [string compare $os "Mandriva2008"] == 0
 	||  [string compare $os "Mandriva2010"] == 0
        } {
-  puts "TODO OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
+  puts "TODO ?OCC23127 $os: Faulty shapes in variables faulty_1 to faulty_2"
     }
 }