Skip to content
Browse files

[t/spec] correct a test in code.t, and add another one for RT #62432

git-svn-id: http://svn.pugscode.org/pugs@24948 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 0ed988a commit 067f36eabe84d981288e464eccaa5e8606a60a77 moritz committed Jan 18, 2009
Showing with 6 additions and 2 deletions.
  1. +6 −2 S06-signature/code.t
View
8 S06-signature/code.t
@@ -1,6 +1,6 @@
use v6;
use Test;
-plan 3;
+plan 4;
# TODO: move this test to closure-parameters.t if it works in the future
@@ -22,6 +22,10 @@ tester(sub ($x) { $collector = 3 * $x });
ok $collector == 12, 'same with anonymous sub';
sub tester2(&my_sub) { 1 }
-dies_ok 'tester2(42)', "can't pass thing that doesn't do Callable";
+dies_ok {tester2(42)}, "can't pass thing that doesn't do Callable";
+
+sub not_returns_a_sub { 3 };
+dies_ok {tester2(not_returns_a_sub)},
+ "can't pass thing that doesn't do Callable";
# vim: ft=perl6

0 comments on commit 067f36e

Please sign in to comment.
Something went wrong with that request. Please try again.