[t/runtime.t] added failing tests

For some reason, this doesn't work yet. It dies with the error "Trying to invoke a non-closure", for no reason immediately obvious to me.
masak · Mar 6, 2011 · d9f4e1b · d9f4e1b
1 parent 06ef258
commit d9f4e1b
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/t/runtime.t b/t/runtime.t
@@ -53,6 +53,8 @@ my @tests =
     '{ say 42 }()',                    "42\n",      'call a block',
     'sub foo { say 42 }; foo()',       "42\n",      'call a named sub',
     'foo(); sub foo { say 5 }',        "5\n",       'call before declaration',
+    'sub foo { bar; sub bar { say 42 } }; foo',
+                                       "42\n",      'nested sub call',
 ;
 
 for @tests -> $program, $expected, $message {