mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-31 11:15:31 +03:00
352ffd7358
Test case tests/bugs/modalg/dxf906 was renamed to bug889 Adding test cases to tests/bugs/moddata Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx Modified test case bugs vis buc60738 Added test cases to modalg and moddata Added test cases to caf and fclasses Added test cases to group heal
60 lines
1.1 KiB
Plaintext
Executable File
60 lines
1.1 KiB
Plaintext
Executable File
if { [array get env os_type] != "" } {
|
|
set os $env(os_type)
|
|
}
|
|
if { [string compare $os "windows"] != 0 } {
|
|
puts "TODO OCC12345 ALL: An exception was caught"
|
|
puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*"
|
|
puts "TODO OCC12345 ALL: TEST INCOMPLETE"
|
|
}
|
|
|
|
puts "=================================="
|
|
puts "BUC60569"
|
|
puts "OCC597"
|
|
puts "=================================="
|
|
puts ""
|
|
puts "=================================="
|
|
puts "It takes visual check for this BUG"
|
|
puts "=================================="
|
|
puts ""
|
|
|
|
restore [locate_data_file buc60569a.rle] result
|
|
tclean result
|
|
vinit
|
|
|
|
checkshape result
|
|
|
|
BUC60569 result
|
|
vfit
|
|
QAMoveTo 250 190
|
|
QASelect 250 190
|
|
QAShiftSelect 180 350
|
|
QAMoveTo 250 190
|
|
QAMoveTo 180 350
|
|
QASelect 390 390
|
|
QAShiftSelect 250 190
|
|
QAUpdateLights
|
|
|
|
set x_coord 335
|
|
set y_coord 331
|
|
|
|
checkcolor $x_coord $y_coord 0.8 0.8 0.8
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : The right face is NOT Selected by Shift Select command"
|
|
}
|
|
|
|
QAShiftSelect 180 350
|
|
QAUpdateLights
|
|
|
|
set x_coord 101
|
|
set y_coord 347
|
|
|
|
checkcolor $x_coord $y_coord 0.8 0.8 0.8
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : The left face is Selected by Shift Select command"
|
|
}
|
|
|
|
set only_screen 1
|
|
|