0023375: (OCC 6.5.3 regression) BRepBuilderAPI_Sewing returns wrong result

[occt.git] / tests / bugs / modalg_5 / bug23375_1

diff --git a/tests/bugs/modalg_5/bug23375_1 b/tests/bugs/modalg_5/bug23375_1
new file mode 100755 (executable)
index 0000000..654e1d4
--- /dev/null
+++ b/tests/bugs/modalg_5/bug23375_1
@@ -0,0 +1,33 @@
+puts "========================"
+puts "OCC23375"
+puts "========================" 
+puts ""
+#######################################################################
+# (OCC 6.5.3 regression) BRepBuilderAPI_Sewing returns wrong result
+#######################################################################
+
+restore [locate_data_file bug23375_Pump1.brep] p
+
+sewing result 0.1 p
+
+checkshape result
+
+set whatis_result [whatis result]
+
+if { [regexp {SHELL} ${whatis_result}] != 1 } {
+  puts "Error: invalid result shape; SHELL"
+}
+if { [regexp {FORWARD} ${whatis_result}] != 1 } {
+  puts "Error: invalid result shape; FORWARD"
+}
+if { [regexp {Modified} ${whatis_result}] != 1 } {
+  puts "Error: invalid result shape; Modified"
+}
+if { [regexp {Orientable} ${whatis_result}] != 1 } {
+  puts "Error: invalid result shape; Orientable"
+}
+if { [regexp {Closed} ${whatis_result}] != 1 } {
+  puts "Error: invalid result shape; Closed"
+}
+
+set 2dviewer 1