This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: bff3de1) | patch
handle null op_next in stacked filetests
authorZefram <zefram@fysh.org>
Wed, 6 Dec 2017 18:53:16 +0000 (18:53 +0000)
committerZefram <zefram@fysh.org>
Wed, 6 Dec 2017 18:58:38 +0000 (18:58 +0000)
commit1af9149031d9f5d2d43b6df59b628a0f2c1041f6
tree422914067fca0e9e92cdd86142cf4d17c945e642tree | snapshot
parentbff3de19b083d33895fc03f7d7d092e5830547a5commit | diff
handle null op_next in stacked filetests

When a filetest op returns false, it skips past following ops that
are stacked filetests.  The code to do this was assuming that op_next
would always be non-null, which is not always the case, for example in
a sort comparator.  Allow for it to be null.  Fixes [perl #129347].
pp_sys.c diff | blob | blame | history
t/op/filetest_stack_ok.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.