In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/cb87b182a5dce7fcec9a566d505ef08d0e85c813?hp=745e740c825d415f535852b90516127e64c24905>
- Log ----------------------------------------------------------------- commit cb87b182a5dce7fcec9a566d505ef08d0e85c813 Author: Tony Cook <[email protected]> Date: Thu Aug 31 10:29:36 2017 +1000 perldelta for 745e740c825d and remove an obsolete comment, oops. ----------------------------------------------------------------------- Summary of changes: pod/perldelta.pod | 5 +++++ t/op/magic.t | 2 -- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 7d6e386e19..edb6a2db79 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -370,6 +370,11 @@ keyword was followed by whitespace including newlines (and comments.) The tokenizer now correctly adjusts a parse pointer when skipping whitespace in a C< ${identifier} > construct. [perl #131949] +=item * + +Accesses to C<${^LAST_FH}> no longer assert after using any of a +variety of I/O operations on a non-glob. [perl #128263] + =back =head1 Known Problems diff --git a/t/op/magic.t b/t/op/magic.t index 36abafb098..02ced156d5 100644 --- a/t/op/magic.t +++ b/t/op/magic.t @@ -645,8 +645,6 @@ is ${^LAST_FH}, undef, '${^LAST_FH} is undef when PL_last_in_gv is NULL'; # all of these would set PL_last_in_gv to a non-GV which would # assert when referenced by the magic for ${^LAST_FH}. -# Instead it should act like <$0> which NULLs PL_last_in_gv and the magic -# returns that as undef. # The approach to fixing this has changed (#128263), but it's still useful # to check each op. for my $code ('tell $0', 'sysseek $0, 0, 0', 'seek $0, 0, 0', 'eof $0') { -- Perl5 Master Repository
