a874a4a0 |
1 | puts "============" |
2 | puts "CR24800" |
3 | puts "===========" |
4 | puts "" |
5 | ############################################################################### |
6 | # Point of intersection was not found for 2d offset curve. |
7 | ############################################################################### |
8 | |
76e92222 |
9 | restore [locate_data_file bug24800_curve2.draw] c2 |
a874a4a0 |
10 | |
11 | set inter1 [2dintersect c2] |
12 | |
13 | set int1 [regexp {Intersection point 1} ${inter1}] |
14 | |
15 | if { ${int1} == 0 } { |
16 | puts "Error : Intersection is not found" |
17 | } |
18 | |
19 | av2d |
20 | 2dfit |
21 | |
22 | xwd ${imagedir}/${test_image}.png |