Permalink
Browse files

Added test for given with pblock.

  • Loading branch information...
1 parent 8b4b7d7 commit 02296036e934dceb9e7ef4368b4fae0871075328 @arnsholt arnsholt committed Jul 11, 2010
Showing with 6 additions and 1 deletion.
  1. +6 −1 t/nqp/52-given-when.t
View
@@ -1,6 +1,6 @@
#! nqp
-say('1..10');
+say('1..11');
given 42 {
say('ok 1 - code inside given');
@@ -48,3 +48,8 @@ while 1 {
print('not ');
}
say('ok 10 - matching when breaks loops');
+
+given 2 + 2 -> $x {
+ print('not ') if $x != 4;
+ say('ok 11 - pblock argument gets set');
+}

0 comments on commit 0229603

Please sign in to comment.