Changeset 21197

Timestamp:

07/03/08 22:51:51 (5 months ago)

Author:

moritz

Message:

[spec] while.t: cleaned up two useless tests

Files:

• t/spec/S04-statements/while.t (modified) (3 diffs)

t/spec/S04-statements/while.t

@@ -3 +3 @@
 use Test;
 
-plan 10;
+plan 8;
 
 {
@@ -53 +53 @@
       $str ~= $x;
   }
-  is $!, undef, 'eval worked';
   is $str, '54321', 'while ... -> $x {...} worked (1)';
 }
@@ -64 +63 @@
       $str ~= $x;
   }
-  is $!, undef, 'eval worked';
   is $str, '54321', 'while ... -> $x {...} worked (2)';
 }