OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
Code Packages Releases Activity

Updated test case so that the output of each "dump" is checked against toroidal surface type (SurfaceOfRevolution is considered as an error).

Browse Source
This commit is contained in:
apn 2015-04-24 13:18:48 +03:00 committed by bugmaster
parent 38a0206f60
commit 08f906ff37
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
tests/bugs/modalg_5/bug23954
View File

@ -1,3 +1,5 @@
puts "TODO OCC23954 ALL: Error: result is not Toroidal surface"
puts "============" puts "============"
puts "OCC23954" puts "OCC23954"
puts "============" puts "============"
@ -12,8 +14,11 @@ circle c_3 0 100 0 1 0 0 0 -1 0 100
circle c_4 0 100 0 1 0 0 0 0 1 10 circle c_4 0 100 0 1 0 0 0 0 1 10
circle c_5 0 100 0 1 0 0 0 0 1 120 circle c_5 0 100 0 1 0 0 0 0 1 120
for { set i 1 } { $i <= 5 } { incr i } { for { set i 1 } { $i <= 5 } { incr i } {
mkedge e c_$i mkedge e c_$i
revol r e 0 0 0 0 0 1 90 revol r e 0 0 0 0 0 1 90
mksurface s_$i r mksurface s_$i r
dump s_$i set info [dump s_$i]
if { [regexp "SurfaceOfRevolution" $info] == 1 } {
puts "Error: result is not Toroidal surface"
}
} }