Test case for 'eval "a.b.c.d.e.f;sub"' save stack imbalance

[p5sagit/p5-mst-13.2.git] / t / op / misc.t

diff --git a/t/op/misc.t b/t/op/misc.t
index e5af756..8e67b61 100755 (executable)
--- a/t/op/misc.t
+++ b/t/op/misc.t
@@ -724,3 +724,6 @@ sub DESTROY {
 }
 EXPECT
 Bar=ARRAY(0x...)
+########
+eval "a.b.c.d.e.f;sub"
+EXPECT