diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-05-31 21:56:35 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-05-31 21:56:40 -0700 |
| commit | e2316ad3f3c85bfa967d2bacefc5f40905d0c76c (patch) | |
| tree | 1e12f90551c4a41e0d4eac250682d573ebc1660b /t/op | |
| parent | 4051c94d702d31c6ee493c1479a9e25a69bf8e08 (diff) | |
| download | perl-e2316ad3f3c85bfa967d2bacefc5f40905d0c76c.tar.gz | |
Remove unnecessary stuff from sub_lval.t
I cannot find any information on these, but that comment
is erroneous and that sub is not doing anything.
Diffstat (limited to 't/op')
| -rw-r--r-- | t/op/sub_lval.t | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/t/op/sub_lval.t b/t/op/sub_lval.t index c1691cb336..5db41800b4 100644 --- a/t/op/sub_lval.t +++ b/t/op/sub_lval.t @@ -210,7 +210,7 @@ EOE like($_, qr/Can\'t modify non-lvalue subroutine call/) or diag "'$_', '$x0', '$x1'"; -sub lv0 : lvalue { } # Converted to lv10 in scalar context +sub lv0 : lvalue { } $_ = undef; eval <<'EOE' or $_ = $@; @@ -220,8 +220,6 @@ EOE like($_, qr/Can't return undef from lvalue subroutine/); -sub lv10 : lvalue {} - $_ = undef; eval <<'EOE' or $_ = $@; (lv0) = (2,3); |