projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2cdb8b9
)
In Cwd.xs, swap to defaulting to disabled prototypes.
author
Nicholas Clark
<nick@ccl4.org>
Sat, 18 Jun 2011 14:34:50 +0000
(16:34 +0200)
committer
Nicholas Clark
<nick@ccl4.org>
Wed, 22 Jun 2011 14:53:51 +0000
(16:53 +0200)
As only 1 function enables prototypes, it seems sensible to set the default to
the majority case.
dist/Cwd/Cwd.xs
patch
|
blob
|
history
diff --git
a/dist/Cwd/Cwd.xs
b/dist/Cwd/Cwd.xs
index
6f8ae56
..
7263c09
100644
(file)
--- a/
dist/Cwd/Cwd.xs
+++ b/
dist/Cwd/Cwd.xs
@@
-398,11
+398,10
@@
int Perl_getcwd_sv(pTHX_ register SV *sv)
MODULE = Cwd PACKAGE = Cwd
-PROTOTYPES:
EN
ABLE
+PROTOTYPES:
DIS
ABLE
void
getcwd(...)
-PROTOTYPE: DISABLE
ALIAS:
fastcwd=1
PPCODE:
@@
-421,7
+420,6
@@
PPCODE:
void
abs_path(pathsv=Nullsv)
SV *pathsv
-PROTOTYPE: DISABLE
PPCODE:
{
dXSTARG;
@@
-452,6
+450,7
@@
PPCODE:
void
getdcwd(...)
+PROTOTYPE: ENABLE
PPCODE:
{
dXSTARG;