a9e4846f |
1 | puts "==========" |
2 | puts "OCC24022" |
3 | puts "==========" |
4 | puts "" |
5 | ##################################### |
6 | # Slow meshing in BRepMesh |
7 | ##################################### |
8 | |
9 | restore [locate_data_file bug24022_hung_mesh.brep] result |
10 | tclean result |
11 | dchrono h reset |
12 | dchrono h start |
13 | incmesh result 0.1 |
14 | dchrono h stop |
15 | set info [dchrono h show] |
16 | regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time |
17 | if { $cpu_time > 3. } { |
18 | puts "Error : meshing is slow" |
19 | } else { |
20 | puts "OK: meshing is quite fast" |
21 | } |
22 | vinit |
23 | vdisplay result |
24 | vfit |
25 | vsetdispmode 1 |
26 | |
27 | set only_screen 1 |
28 | |
29 | |
30 | |