mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
42 lines
1.4 KiB
Plaintext
42 lines
1.4 KiB
Plaintext
set chamf_shape 4_L1(hlacg03).draw
|
|
set chamf_edge_face [list " 6 1" " 5 1" " 9 2"]
|
|
set chamf_dist_angle [list "1.2 30" " 1 30" " 1 30"]
|
|
set chamf_dist_dist [list "1.1 1" " 1 1.2" " 1 1.4"]
|
|
set chamf_equal_dist [list "1 " "1.1 " "1.2 "]
|
|
dset SCALE 100
|
|
if { [string compare $command chamf_sequence] == 0 } {
|
|
#puts "TODO #22909 ALL: Error: The tests should be reviewed"
|
|
puts "TODO ?22909 ALL: Error : chamfer is not done."
|
|
#puts "Error: The tests should be reviewed."
|
|
set os "ALL"
|
|
if {[array get env os_type] != ""} {
|
|
set os $env(os_type)
|
|
}
|
|
|
|
if { [string compare ${os} "Windows-64-VC9"] != 0 && [string compare ${os} "Windows-64-VC10"] != 0} {
|
|
set nf 0
|
|
if { [string compare $group equal_dist] == 0 } {
|
|
if {[string compare $os "Debian40"] == 0 || [string compare $os "Mandriva2008"] == 0 || [string compare $os "Mandriva2010"] == 0 } {
|
|
set nf 4
|
|
}
|
|
}
|
|
if { [string compare $group dist_dist] == 0 } {
|
|
if {[string compare $os "Mandriva2010"] == 0} {
|
|
set nf 2
|
|
##set nf 0
|
|
}
|
|
}
|
|
}
|
|
|
|
if { [string compare ${os} "windows"] == 0} {
|
|
if {[string compare $group dist_dist] == 0 || [string compare $group equal_dist] == 0 } {
|
|
set nf 2
|
|
}
|
|
}
|
|
|
|
if { $nf != 0 } {
|
|
#puts "TODO OCC22909 $os:Faulty shapes in variables faulty_1 to faulty_$nf"
|
|
puts "TODO OCC22909 $os:Faulty shapes in variables faulty_1 to faulty_"
|
|
}
|
|
}
|