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: 9426e1a) | patch
GvIO(gv) returns NULL for a NULL gv, so refactor to take advantage of this.
authorNicholas Clark <nick@ccl4.org>
Sun, 2 Jan 2011 20:56:21 +0000 (20:56 +0000)
committerNicholas Clark <nick@ccl4.org>
Sun, 2 Jan 2011 20:56:21 +0000 (20:56 +0000)
commit9c9f25b8ce09796ec5e5e4e5c76f43506c223a8f
tree0a350bd0d84bb3068db4da380354fca0ac235de4tree | snapshot
parent9426e1a55981168c83a030df9bce5e0b46586581commit | diff
GvIO(gv) returns NULL for a NULL gv, so refactor to take advantage of this.

Simplify tests of !gv || !io to just !io, avoid calling GvIO(gv) more than
once, and where possible initialise io at declaration time, to allow it to be
const.
doio.c diff | blob | blame | history
pp_hot.c diff | blob | blame | history
pp_sys.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.