Fix tests to concat the gist of the type object instead of the type o…

…bject directly.
kboga · Jul 26, 2011 · afa3b69 · afa3b69
1 parent 97a2584
commit afa3b69
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/S04-statements/for.t b/S04-statements/for.t
@@ -283,15 +283,15 @@ class TestClass{ has $.key is rw  };
 
 {
     my $a = '';
-    for 1..3, 4..6 { $a ~= $_.WHAT };
+    for 1..3, 4..6 { $a ~= $_.WHAT.gist };
     is($a, 'Int()Int()Int()Int()Int()Int()', 'List context');
 
     $a = '';
-    for [1..3, 4..6] { $a ~= $_.WHAT };
+    for [1..3, 4..6] { $a ~= $_.WHAT.gist };
     is($a, 'Array()', 'List context');
 
     $a = '';
-    for [1..3], [4..6] { $a ~= $_.WHAT };
+    for [1..3], [4..6] { $a ~= $_.WHAT.gist };
     is($a, 'Array()Array()', 'List context');
 }