Changeset 21160 for t/spec/S29-list/first.t

Timestamp:

07/02/08 04:24:47 (5 months ago)

Author:

pmichaud

Message:

S29-list/first.t: update skip message, convert tabs to spaces

Files:

• t/spec/S29-list/first.t (modified) (2 diffs)

t/spec/S29-list/first.t

@@ -26 +26 @@
 }
 
-#?rakudo skip "colon invocant syntax"
+#?rakudo skip "adverbial closure"
 {
     my $result = @list.first():{ ($_ == 4) };
@@ -34 +34 @@
 
 {
-        is(@list.first( { ($_ == 11) }), undef, 'first returns undef unsuccessfull match');
+    is(@list.first( { ($_ == 11) }), undef, 'first returns undef unsuccessfull match');
 }
 
 {
-        my $count = 0;
-        my $matcher = sub (Int $x) { $count++; $x % 2 };
-        is(@list.first($matcher), 1, 'first() search for odd elements successfull');
-        is($count, 1, 'Matching closure in first() is only executed once');
-
+    my $count = 0;
+    my $matcher = sub (Int $x) { $count++; $x % 2 };
+    is(@list.first($matcher), 1, 'first() search for odd elements successfull');
+    is($count, 1, 'Matching closure in first() is only executed once');
 }