| 1 | puts "TODO OCC23343 ALL: \\*\\* Exception \\*\\*.*" |
| 2 | puts "TODO OCC23343 ALL: An exception was caught" |
| 3 | puts "TODO OCC23343 ALL: Faulty OCC23343" |
| 4 | |
| 5 | puts "============" |
| 6 | puts "OCC23343" |
| 7 | puts "============" |
| 8 | puts "" |
| 9 | ####################################################################### |
| 10 | # Crash (ACCESS VIOLATION) in GeomPlate_BuildPlateSurface / MakeApprox if init Surface is set |
| 11 | ####################################################################### |
| 12 | |
| 13 | restore [locate_data_file bug23343_initFace.brep] initFace |
| 14 | restore [locate_data_file bug23343_edge_constraint.brep] edge_constraint |
| 15 | |
| 16 | point p1 30 -33.4729635533385 49.7661550602442 |
| 17 | point p2 30 -49.6961550602442 33.3929635533386 |
| 18 | point p3 23.3333333333333 -50 30.07 |
| 19 | point p4 -30 -33.4729635533386 49.6161550602442 |
| 20 | |
| 21 | if [catch {gplate result 1 4 initFace edge_constraint 0 p1 p2 p3 p4} catch_result] { |
| 22 | puts "Faulty OCC23343: there is crash (ACCESS VIOLATION) in GeomPlate_BuildPlateSurface" |
| 23 | } else { |
| 24 | puts "OK OCC23343: there is not crash (ACCESS VIOLATION) in GeomPlate_BuildPlateSurface" |
| 25 | } |
| 26 | |
| 27 | checkview -display result -2d -path ${imagedir}/${test_image}.png |