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
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
794a0d3
)
Replace explict "/dev/null" with BIT_BUCKET, which varies by platform.
author
Nicholas Clark
<nick@ccl4.org>
Fri, 14 Apr 2006 16:18:30 +0000
(16:18 +0000)
committer
Nicholas Clark
<nick@ccl4.org>
Fri, 14 Apr 2006 16:18:30 +0000
(16:18 +0000)
p4raw-id: //depot/perl@27802
pp_ctl.c
patch
|
blob
|
blame
|
history
diff --git
a/pp_ctl.c
b/pp_ctl.c
index
5288c66
..
0307a2e
100644
(file)
--- a/
pp_ctl.c
+++ b/
pp_ctl.c
@@
-3220,7
+3220,8
@@
PP(pp_require)
}
if (!tryrsfp) {
- tryrsfp = PerlIO_open("/dev/null", PERL_SCRIPT_MODE);
+ tryrsfp = PerlIO_open(BIT_BUCKET,
+ PERL_SCRIPT_MODE);
}
}
SP--;