1 puts "========================"
3 puts "========================"
5 #######################################################################
6 # Failed to save/restore [locate_data_file empty] face
7 #######################################################################
12 foreach t {V E W F Sh So CS C} {
15 if [catch {save test $imagedir/${test_image}.brep}] {
16 puts "Faulty ${BugNumber} save $t"
19 puts "OK ${BugNumber} save $t"
21 if [catch {restore $imagedir/${test_image}.brep test}] {
22 puts "Faulty ${BugNumber} restore $t"
25 puts "OK ${BugNumber} restore $t"
30 puts "Faulty ${BugNumber}"
32 puts "OK ${BugNumber}"