# HG changeset patch
# User Carlo de Falco <cdf@users.sourceforge.net>
# Date 1360075372 -3600
# Node ID 9e710110401c7820feb00e22b91c8917f41f68f6
# Parent  59715612ea72851623a6c5cdf213e81470ce38ba
add files missing in previous changeset.

test/bug-38236/module.mk: new file.
test/bug-38236/u_vr.m: new file.
test/bug-38236/df_vr.m: new file.

diff --git a/test/bug-38236/df_vr.m b/test/bug-38236/df_vr.m
new file mode 100644
--- /dev/null
+++ b/test/bug-38236/df_vr.m
@@ -0,0 +1,2 @@
+# df_vr.m
+vr = 7;
diff --git a/test/bug-38236/module.mk b/test/bug-38236/module.mk
new file mode 100644
--- /dev/null
+++ b/test/bug-38236/module.mk
@@ -0,0 +1,6 @@
+bug_38236_FCN_FILES = \
+  bug-38236/dv_vr.m \
+  bug-38236/u_vr.m \
+  bug-35448/test_bug_38236.m
+
+FCN_FILES += $(bug_38236_FCN_FILES)
diff --git a/test/bug-38236/test_bug_38236.m b/test/bug-38236/test_bug_38236.m
new file mode 100644
--- /dev/null
+++ b/test/bug-38236/test_bug_38236.m
@@ -0,0 +1,3 @@
+%!test
+%! u_vr
+
diff --git a/test/bug-38236/u_vr.m b/test/bug-38236/u_vr.m
new file mode 100644
--- /dev/null
+++ b/test/bug-38236/u_vr.m
@@ -0,0 +1,17 @@
+# u_vr.m
+
+cmd = "\
+function __demo__ () \
+  df_vr; \
+  v = vr * 2; \
+endfunction \
+";
+
+for ii = 1:2
+  unwind_protect
+    eval (cmd);
+    __demo__;
+  unwind_protect_cleanup
+    clear __demo__
+  end_unwind_protect
+endfor
\ No newline at end of file