[occt.git] / tests / bugs / caf / buc60756_std

puts "==========="
puts "BUC60756"
puts "BUC60761"
puts "BUC60762"
puts "BUC60764"
puts "==========="

Open [locate_data_file BUC60756_Doc.std] D

######################################################################
catch {file delete ${imagedir}/Doc2.cbf}

Format D BinOcaf
SaveAs D ${imagedir}/Doc2.cbf
Close D
Open ${imagedir}/Doc2.cbf D
Commit	Line	Data
ff205346	1	puts "==========="
	2	puts "BUC60756"
	3	puts "BUC60761"
	4	puts "BUC60762"
	5	puts "BUC60764"
	6	puts "==========="
	7
	8	Open [locate_data_file BUC60756_Doc.std] D
	9
	10	######################################################################
	11	catch {file delete ${imagedir}/Doc2.cbf}
	12
	13	Format D BinOcaf
	14	SaveAs D ${imagedir}/Doc2.cbf
	15	Close D
	16	Open ${imagedir}/Doc2.cbf D
	17