Changeset 21159
- Timestamp:
- 07/02/08 04:04:13 (5 months ago)
- Files:
-
- 1 modified
-
t/spec/S29-list/reverse.t (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
t/spec/S29-list/reverse.t
r21158 r21159 133 133 my $a = "foo"; 134 134 my @b = $a.reverse; 135 #?rakudo skip '.isa does not work correctly' 136 isa_ok(@b, 'Array'); 135 isa_ok(@b, Array); 137 136 my $b = $a.reverse; 138 isa_ok($b, 'Str');137 isa_ok($b, Str); 139 138 140 139 is(@b[0], "oof", 'string in the array has been reversed'); … … 148 147 my $a = "foo".reverse; 149 148 my @b = "foo".reverse; 150 isa_ok($a, 'Str'); 151 #?rakudo skip '.isa does not work correctly' 152 isa_ok(@b, 'Array'); 149 isa_ok($a, Str); 150 isa_ok(@b, Array); 153 151 is($a, "oof", 'string literal reversal works in scalar context'); 154 152 is(@b[0], "oof", 'string literal reversal works in list context');
