diff options
| -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); |