X-Git-Url: http://git.dev.opencascade.org/gitweb/?p=occt.git;a=blobdiff_plain;f=tests%2Fbugs%2Fxde%2Fbug23951;h=72c6f837e5a7007b79a632e4400c7e57e2c79cfc;hb=574d723693f1d791f65f92a46e7b38aceebceb1a;hpb=70167e698295ca1c4bfa211d23ee024c3a5c4abd

diff --git a/tests/bugs/xde/bug23951 b/tests/bugs/xde/bug23951
new file mode 100644
index 0000000000..72c6f837e5
--- /dev/null
+++ b/tests/bugs/xde/bug23951
@@ -0,0 +1,23 @@
+puts "=========="
+puts "OCC23951"
+puts "=========="
+puts ""
+#####################################################################################
+# Visibility of free, simple shapes not saved when writing XCAF Document info STEP
+#####################################################################################
+
+pload QAcommands
+
+set info [OCC23951]
+
+if { [regexp "Write  Done" $info] != 1 } {
+  puts "Error: file was not written"
+} else {
+  puts "OK: file was written"
+}
+
+stepread test_box.step a *
+axo
+fit
+
+set only_screen_axo 1