mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
a8676008f7
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
29 lines
748 B
Plaintext
Executable File
29 lines
748 B
Plaintext
Executable File
|
|
puts "========"
|
|
puts "OCC542"
|
|
puts "========"
|
|
puts ""
|
|
################################
|
|
## Wrong projection of the circle on the sphere
|
|
################################
|
|
|
|
restore [locate_data_file OCC542_C3D.draw] c3d
|
|
restore [locate_data_file OCC542_S.draw] s
|
|
|
|
if { [catch {project result c3d s } catch_result] } {
|
|
puts "OCC542 Faulty"
|
|
} else {
|
|
# create dump of resulting curve
|
|
set dump [dump result]
|
|
# read dump of old curve
|
|
set olddump [read [open [locate_data_file OCC542_DUMP]]]
|
|
# if the the dumps is equal this bug is still exist
|
|
if { $dump == $olddump } {
|
|
puts "OCC542 Faulty"
|
|
} else {
|
|
puts "OCC542 WARNING: Dumps of old and new curve are different, probably bug is still exist"
|
|
}
|
|
}
|
|
|
|
set 2dviewer 0
|