mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
22 lines
419 B
Plaintext
22 lines
419 B
Plaintext
puts "========"
|
|
puts "OCC26016"
|
|
puts "========"
|
|
puts ""
|
|
##@@###########################
|
|
# BRepPrimAPI_MakeRevol crash
|
|
###############################
|
|
|
|
smallview
|
|
|
|
restore [locate_data_file OCC26016-revolve-crash.brep] a
|
|
revol r a 0 0 0 0 1 0 90
|
|
set bug_info [checkshape r]
|
|
|
|
if {[string compare $bug_info "This shape seems to be valid"] != 0} {
|
|
puts "ERROR: OCC26016 is reproduced"
|
|
}
|
|
|
|
donly r
|
|
fit
|
|
set only_screen_axo 1
|