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:
6800ac0
)
From: "Robin Barker" <Robin.Barker@npl.co.uk>
author
Robin Barker
<RMBarker@cpan.org>
Thu, 10 Jan 2008 18:50:12 +0000
(18:50 +0000)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Fri, 11 Jan 2008 10:37:00 +0000
(10:37 +0000)
Message-ID: <
46A0F33545E63740BC7563DE59CA9C6D0939C3
@exchsvr2.npl.ad.local>
More consting.
p4raw-id: //depot/perl@32947
ext/POSIX/POSIX.xs
patch
|
blob
|
blame
|
history
diff --git
a/ext/POSIX/POSIX.xs
b/ext/POSIX/POSIX.xs
index
867d35b
..
3092934
100644
(file)
--- a/
ext/POSIX/POSIX.xs
+++ b/
ext/POSIX/POSIX.xs
@@
-386,7
+386,7
@@
unsigned long strtoul (const char *, char **, int);
#endif
static int
-not_here(char *s)
+not_here(c
onst c
har *s)
{
croak("POSIX::%s not implemented on this architecture", s);
return -1;
@@
-1662,7
+1662,7
@@
strtol(str, base = 0)
void
strtoul(str, base = 0)
- c
har *
str
+ c
onst char *
str
int base
PREINIT:
unsigned long num;