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

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

Open [locate_data_file BUC60756_Doc.std] D

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

SaveAs D ${imagedir}/Doc2.std
Close D
Open ${imagedir}/Doc2.std D
Commit	Line	Data
a87752f3	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.std}
	12
	13	SaveAs D ${imagedir}/Doc2.std
	14	Close D
	15	Open ${imagedir}/Doc2.std D
	16