mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
23 lines
552 B
Plaintext
23 lines
552 B
Plaintext
puts "=========="
|
|
puts "0031711: Data Exchange - STEPCAFControl_Reader hangs on attached file in an infinite loop"
|
|
puts "=========="
|
|
puts ""
|
|
|
|
# to prevent loops limit to 2 minute
|
|
cpulimit 120
|
|
|
|
set path_first [locate_data_file bug31711.stp]
|
|
regsub -all {/} $path_first {\\} path_second
|
|
|
|
ReadStep D_First $path_first
|
|
|
|
XGetOneShape result D_First
|
|
checkshape result
|
|
checknbshapes result -solid 1 -shell 1 -face 3687 -wire 4020
|
|
|
|
if { [regexp -nocase "Windows" $tcl_platform(os)] != 0 } {
|
|
ReadStep D_Second $path_second
|
|
}
|
|
|
|
# return cpu limit
|
|
cpulimit 1000 |