1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-21 10:13:43 +03:00
miv 34dd4990ed 0023438: Update test cases for new organization of data files
Modifications:
1.Test cases
2. locate_data_file from DrawResources/TestCommands.tcl
Fix for mesh end
Adjusting testing cases for current state of master using new organization of data files
2012-10-11 14:24:12 +04:00

13 lines
538 B
Plaintext

set chamf_shape 8_B1.draw
set chamf_edge_face [list " 1 1" " 2 1" " 7 2"]
set chamf_dist_angle [list "0.08 30" "0.06 30" "0.1 30"]
set chamf_dist_dist [list "0.05 0.05" "0.05 0.09" "0.1 0.08"]
set chamf_equal_dist [list "0.05 " "0.05 " "0.2 "]
if { [string compare $command chamf_sequence] == 0 && [string compare $group equal_dist] == 0 } {
set os "ALL"
if {[array get env os_type] != ""} {
set os $env(os_type)
}
puts "TODO OCC22909 ${os}:Faulty shapes in variables faulty_1 to faulty_3"
}