1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

32 lines
724 B
Plaintext
Executable File

pload QAcommands
puts "========"
puts "OCC22736"
puts "========"
puts ""
###########################################################
# Incorrect Transformation
###########################################################
set BugNumber OCC22736
set X_mirrorFirstPoint 2.0
set Y_mirrorFirstPoint 1.0
set X_mirrorSecondPoint 3.0
set Y_mirrorSecondPoint 1.0
set X_p1 1.0
set Y_p1 0.0
set X_p2 1.0
set Y_p2 2.0
set result_info [OCC22736 ${X_mirrorFirstPoint} ${Y_mirrorFirstPoint} ${X_mirrorSecondPoint} ${Y_mirrorSecondPoint} ${X_p1} {$Y_p1} ${X_p2} ${Y_p2}]
regexp {Status = ([-0-9.+eE]+)} $result_info full status
# Resume
puts ""
if { ${status} != 0 } {
puts "Faulty ${BugNumber}"
} else {
puts "OK ${BugNumber}"
}