0030346: Modeling Algorithms - BRepPrimAPI_MakeRevol throws "BRepSweep_Translation...

[occt.git] / tests / bugs / modalg_7 / bug30346_1

diff --git a/tests/bugs/modalg_7/bug30346_1 b/tests/bugs/modalg_7/bug30346_1
new file mode 100644 (file)
index 0000000..3d94d53
--- /dev/null
+++ b/tests/bugs/modalg_7/bug30346_1
@@ -0,0 +1,21 @@
+puts "========"
+puts "0030346: Modeling Algorithms - BRepPrimAPI_MakeRevol throws BRepSweep_Translation::MakeEmptyVertex"
+puts "========"
+puts ""
+
+pload MODELING 
+
+plane f 0 0 0 0 1 0
+mkface f f 0 1 0 1
+revol r1 f 0 0 0 0 0 1 60
+savehistory h1
+set s1 [dump h1]
+if { !([regexp "0 Deleted" $s1] && [regexp "6 Generated" $s1])} {
+  puts "Error: wrong history h1"
+}
+revol r2 f 0 0 0 0 0 1 360
+savehistory h2
+set s2 [dump h2]
+if { !([regexp "6 Deleted" $s2] && [regexp "3 Generated" $s2])} {
+  puts "Error: wrong history h2"
+}