projects
/
occt.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
0023087: Upgrade of the OCCT test system
[occt.git]
/
tests
/
prism
/
end
1
if { [isdraw result] } {
2
regexp {Mass +: +([-0-9.+eE]+)} [sprops result] full m
3
4
#check if result is valid
5
puts [checkshape result]
6
clear
7
smallview
8
donly result
9
fit
10
xwd $imagedir/${test_image}.gif
11
} else {
12
puts "Error : The prism can not be build."
13
}
14
15
# to end a test script
16
puts "TEST COMPLETED"