summaryrefslogtreecommitdiff
path: root/malloc.c
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2006-10-30 00:22:00 +0000
committerSteve Peters <steve@fisharerojo.org>2006-10-30 00:22:00 +0000
commit667e29483278676092af95a151e7ae7d8eb1d304 (patch)
tree1168e9c990fd84d85dcd080c666df5a75aefcb22 /malloc.c
parent802134916c56985ba8dc700565240474646eb9f7 (diff)
downloadperl-667e29483278676092af95a151e7ae7d8eb1d304.tar.gz
Changes to get perl to compile with g++ on Cygwin. Some additional
changes will be needed to get it to link though. p4raw-id: //depot/perl@29142
Diffstat (limited to 'malloc.c')
-rw-r--r--malloc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/malloc.c b/malloc.c
index a9245e8372..988c905a79 100644
--- a/malloc.c
+++ b/malloc.c
@@ -2001,12 +2001,12 @@ morecore(register int bucket)
}
Free_t
-Perl_mfree(void *mp)
+Perl_mfree(Malloc_t where)
{
dVAR;
register MEM_SIZE size;
register union overhead *ovp;
- char *cp = (char*)mp;
+ char *cp = (char*)where;
#ifdef PACK_MALLOC
u_char bucket;
#endif
@@ -2324,7 +2324,7 @@ Perl_strdup(const char *s)
MEM_SIZE l = strlen(s);
char *s1 = (char *)Perl_malloc(l+1);
- return CopyD(s, s1, (MEM_SIZE)(l+1), char);
+ return (char *)CopyD(s, s1, (MEM_SIZE)(l+1), char);
}
#ifdef PERL_CORE
@@ -2347,7 +2347,7 @@ Perl_putenv(char *a)
if (l < sizeof(buf))
var = buf;
else
- var = Perl_malloc(l + 1);
+ var = (char *)Perl_malloc(l + 1);
Copy(a, var, l, char);
var[l + 1] = 0;
my_setenv(var, val+1);