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