mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
b55bd02353
Restriction line can correspond to a degenerated edge. In this case we shall return null-curve (instead of Null-length curve).
22 lines
560 B
Plaintext
22 lines
560 B
Plaintext
puts "============"
|
|
puts "OCC27325"
|
|
puts "============"
|
|
puts ""
|
|
###############################
|
|
## [Regression to 6.9.1] geom/revolution_00/A1: BOPTools_AlgoTools2D::AttachExistingPCurve doesn't work
|
|
###############################
|
|
|
|
restore [locate_data_file bug27325_edge.brep] en
|
|
restore [locate_data_file bug27325_face.brep] f
|
|
explode f e
|
|
attachpcurve f_3 en f
|
|
|
|
#Check attached p-curve
|
|
pcurve result en f
|
|
#whatis result
|
|
set ind [string first "2d curve" [whatis result]]
|
|
if {${ind} < 0} {
|
|
puts "Error: PCurve has not been attached"
|
|
} else {
|
|
dump result
|
|
} |