Updating test cases for 23828 issue to mark them as known on Mac OS X platform.
authordbv <dbv@opencascade.com>
Mon, 15 Apr 2013 09:57:08 +0000 (13:57 +0400)
committerdbv <dbv@opencascade.com>
Mon, 15 Apr 2013 09:57:08 +0000 (13:57 +0400)
src/DrawResources/TestCommands.tcl
tests/boolean/bopfuse_complex/E5
tests/bugs/modalg_4/bug62
tests/bugs/vis/bug288_6

index f924833..b6d4f07 100644 (file)
@@ -1517,7 +1517,7 @@ proc _tests_platform_def {} {
 
     # use detailed mapping for various versions of Lunix
     # (note that mapping is rather non-uniform, for historical reasons)
-    if { $env(os_type) == "unix" && ! [catch {exec cat /etc/issue} issue] } {
+    if { $tcl_platform(os) == "Linux" && ! [catch {exec cat /etc/issue} issue] } {
        if { [regexp {Mandriva[ \tA-Za-z]+([0-9]+)} $issue res num] } {
            set env(os_type) Mandriva$num
        } elseif { [regexp {Red Hat[ \tA-Za-z]+([0-9]+)} $issue res num] } {
@@ -1534,6 +1534,8 @@ proc _tests_platform_def {} {
        if { [exec uname -m] == "x86_64" } {
            set env(os_type) "$env(os_type)-64"
        }
+    } elseif { $tcl_platform(os) == "Darwin" } {
+        set env(os_type) MacOS
     }
 }
 _tests_platform_def
index a4dc4b7..77ee7c5 100644 (file)
@@ -1,3 +1,6 @@
+puts "TODO #23828 MacOS: Tcl Exception:  null shapes are not allowed"
+puts "TODO #23828 MacOS: TEST INCOMPLETE"
+
 restore [locate_data_file OCC62.brep] sh
 explode sh
 
index f8cb4e9..fd9c32a 100755 (executable)
@@ -1,5 +1,16 @@
-puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
-puts "TODO OCC12345 ALL: Error : The square of result shape is"
+set os "ALL"
+
+if {[array get env os_type] != ""} {
+  set os $env(os_type)
+}
+
+if {[string compare $os "MacOS"] == 0} {
+  puts "TODO #23828 MacOS: Tcl Exception: sh is not a topological shape!!!"
+  puts "TODO #23828 MacOS: TEST INCOMPLETE"
+} else {
+  puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
+  puts "TODO OCC12345 ALL: Error : The square of result shape is"
+}
 
 puts "================"
 puts "OCC62"
index 6161bd2..ccf0cfc 100755 (executable)
@@ -2,6 +2,9 @@ puts "================"
 puts "OCC288"
 puts "================"
 puts ""
+puts "TODO #23828 MacOS: Tcl Exception: result is not a topological shape!!!"
+puts "TODO #23828 MacOS: TEST INCOMPLETE"
+
 #######################################################################################
 # Currently meshing (for shading) of some shapes looks incorrect
 ######################################################################################