mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +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
21 lines
456 B
Plaintext
Executable File
21 lines
456 B
Plaintext
Executable File
pload QAcommands
|
|
|
|
puts "============"
|
|
puts "OCC2569"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# If it is not possible to create the bezier curve,
|
|
# it should throw an exception.
|
|
######################################################
|
|
cpulimit 60
|
|
vinit
|
|
set out [OCC2569 26 result]
|
|
if {[string compare $out "\n Degree = 25\n"] == 0} {
|
|
puts "OCC2569: OK"
|
|
} else {
|
|
puts "OCC2569: Faulty"
|
|
}
|
|
|
|
set 3dviewer 0
|