diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-01-23 15:11:11 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-01-23 15:11:11 +0000 |
| commit | 86f12da24a95dda38e6d599b881a5cca226226e4 (patch) | |
| tree | 28292bf3ef849646ba78931cf63d1420d1648d87 /t/op/taint.t | |
| parent | 92e67595817e2efa2a2f6c3e6498b1f1babb5fbd (diff) | |
| download | perl-86f12da24a95dda38e6d599b881a5cca226226e4.tar.gz | |
Change the regression test added by 26410 to use test.pl; this makes
it easier to TODO if needed.
Add the TODO test provided by Rick Delaney, but not as TODO, because
change 26410 also made pos on LVALUE subroutines work for the first
time.
p4raw-id: //depot/perl@26925
Diffstat (limited to 't/op/taint.t')
| -rwxr-xr-x | t/op/taint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/taint.t b/t/op/taint.t index 4aab7374f9..3d333c840f 100755 --- a/t/op/taint.t +++ b/t/op/taint.t @@ -1145,7 +1145,7 @@ TERNARY_CONDITIONALS: { while($a[0]=~ m/(.)/g ) { last if $i++ > 10000; } - test $i < 10000, "infinite m//g"; + cmp_ok $i, '<', 10000, "infinite m//g"; } |