mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
25 lines
710 B
Plaintext
Executable File
25 lines
710 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC25693"
|
|
puts "============"
|
|
puts ""
|
|
###############################
|
|
## Wire of BSplines fails bopcheck
|
|
###############################
|
|
|
|
restore [locate_data_file bug25693_path3039.brep] path3039
|
|
|
|
prism Extrude_path3039 path3039 0 0 50
|
|
|
|
set log1 [string trim [bopcheck path3039]]
|
|
if {$log1 != "This shape seems to be OK."} {
|
|
puts "Error : bad shape"
|
|
}
|
|
|
|
set log2 [string trim [bopcheck Extrude_path3039]]
|
|
if {$log2 != "This shape seems to be OK."} {
|
|
puts "Error : Wire of BSplines fails bopcheck"
|
|
}
|
|
|
|
checkview -display path3039 -2d -path ${imagedir}/${test_image}-path3039-2d.png
|
|
checkview -display Extrude_path3039 -2d -path ${imagedir}/${test_image}-Extrude_path3039-2d.png
|