diff options
Diffstat (limited to 't/pragma/sub_lval.t')
| -rwxr-xr-x | t/pragma/sub_lval.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/pragma/sub_lval.t b/t/pragma/sub_lval.t index 3ab8766892..660e72d646 100755 --- a/t/pragma/sub_lval.t +++ b/t/pragma/sub_lval.t @@ -334,8 +334,8 @@ print "# '$_'.\nnot " unless /Can\'t return a temporary from lvalue subroutine/; print "ok 38\n"; -sub xxx () { 'xxx' } # Not lvalue -sub lv1tmpr : lvalue { xxx } # is it a TEMP? +sub yyy () { 'yyy' } # Const, not lvalue +sub lv1tmpr : lvalue { yyy } # is it read-only? $_ = undef; eval <<'EOE' or $_ = $@; |