0024927: Getting rid of "Persistent" functionality -- Tests
[occt.git] / tests / bugs / caf / bug361
1 puts "================="
2 puts "OCC361"
3 puts "BUC60995"
4 puts "================="
5
6 pload QAcommands
7
8 NewDocument D BinOcaf
9
10 if { [catch { OCC361 D }] } {
11     puts "OCC361: Error"
12 }
13
14 Close D
15