Change 32693 by [EMAIL PROTECTED] on 2007/12/22 03:58:49
Add const to a few prototypes. (Patch from Robin Barker.)
Affected files ...
... //depot/perl/ext/Storable/Storable.xs#131 edit
Differences ...
==== //depot/perl/ext/Storable/Storable.xs#131 (text) ====
Index: perl/ext/Storable/Storable.xs
--- perl/ext/Storable/Storable.xs#130~32446~ 2007-11-21 23:53:19.000000000
-0800
+++ perl/ext/Storable/Storable.xs 2007-12-21 19:58:49.000000000 -0800
@@ -1682,7 +1682,7 @@
pTHX_
HV *cache,
HV *pkg,
- char *method)
+ const char *method)
{
GV *gv;
SV *sv;
@@ -1722,7 +1722,7 @@
pTHX_
HV *cache,
HV *pkg,
- char *method)
+ const char *method)
{
const char *hvname = HvNAME_get(pkg);
(void) hv_store(cache,
@@ -1738,7 +1738,7 @@
pTHX_
HV *cache,
HV *pkg,
- char *method)
+ const char *method)
{
const char *hvname = HvNAME_get(pkg);
(void) hv_delete(cache, hvname, strlen(hvname), G_DISCARD);
@@ -1756,7 +1756,7 @@
pTHX_
HV *cache,
HV *pkg,
- char *method)
+ const char *method)
{
SV **svh;
SV *sv;
End of Patch.
