Test for 0026030: Offset of a lofted body fails after long time

diff --git a/tests/bugs/modalg_7/bug26030 b/tests/bugs/modalg_7/bug26030
new file mode 100644 (file)
index 0000000..6bd103a
--- /dev/null
+++ b/tests/bugs/modalg_7/bug26030
@@ -0,0 +1,21 @@
+puts "TODO OCC26030 ALL: An exception was caught"
+puts "TODO OCC26030 ALL: \\*\\* Exception \\*\\*.*"
+puts "TODO OCC26030 ALL: TEST INCOMPLETE"
+
+puts "========"
+puts "OCC26030"
+puts "========"
+puts ""
+#################################################
+# Offset of a lofted body fails after long time
+#################################################
+
+restore [locate_data_file bug26030_thickness-crash1-tcl-Loft001-00-section.brep] Loft001-00-section
+restore [locate_data_file bug26030_thickness-crash1-tcl-Loft001-01-section.brep] Loft001-01-section
+
+thrusections Loft001 1 0 Loft001-00-section Loft001-01-section
+explode Loft001 F
+offsetparameter 1e-7 p i
+offsetload Loft001 1
+
+offsetperform Offset