0026961: Recover possibility to read files in old persistence format

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

diff --git a/tests/bugs/caf/buc60756_std b/tests/bugs/caf/buc60756_std
new file mode 100644 (file)
index 0000000..3091dc3
--- /dev/null
+++ b/tests/bugs/caf/buc60756_std
@@ -0,0 +1,17 @@
+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 
+