0024927: Getting rid of "Persistent" functionality -- Tests
[occt.git] / tests / bugs / caf / buc60910
1 puts "==========="
2 puts "BUC60910"
3 puts "==========="
4
5 pload QAcommands
6
7 NewDocument D BinOcaf
8 UndoLimit D 100
9
10 NewCommand D
11
12 set ResultError [BUC60910 D]
13 if { ${ResultError} != 0 } {
14     puts "Error : 1"
15 }
16
17 NewCommand D
18
19