Changeset 21198
- Timestamp:
- 07/03/08 22:55:04 (5 months ago)
- Files:
-
- 1 moved
-
t/spec/S04-statements/repeat.t (moved) (moved from t/statements/repeat.t) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
t/spec/S04-statements/repeat.t
r20490 r21198 17 17 } 18 18 19 #?rakudo skip 'redo' 19 20 { 20 my $x = 0; try { repeat { $x++; redo if $x < 10 } while 0 }; 21 my $x = 0; 22 repeat { $x++; redo if $x < 10 } while 0; 21 23 is($x, 10, 'redo works in repeat'); 22 24 }
