mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
21 lines
507 B
Plaintext
Executable File
21 lines
507 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"
|
|
}
|
|
vfit
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|