1 files changed, 16 insertions, 0 deletions
diff --git a/Test/test0/Quoting.bpl b/Test/test0/Quoting.bpl
new file mode 100644
index 00000000..eaf8fe7a
--- /dev/null
+++ b/Test/test0/Quoting.bpl
@@ -0,0 +1,16 @@
+function \true() returns(bool);
+
+type \procedure;
+procedure \old(\any : \procedure) returns(\var : \procedure)
+{
+  var \modifies : \procedure;
+  \modifies := \any;
+  \var := \modifies;
+}
+
+procedure qux(a : \procedure)
+{
+  var \var : \procedure; var x : bool;
+  call \var := \old(a);
+  x := \true();
+}