summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2019-11-22 11:37:13 +0000
committerSteve Hay <steve.m.hay@googlemail.com>2019-11-22 11:37:13 +0000
commitff69e883532791953a441f1a5316276bb142797c (patch)
treec19bfe4eb2a051f1fa5b622a48d6485fdf281cb4 /util.c
parent1bb4bd13bebef37d6623688a00287d54356f6dfc (diff)
downloadperl-ff69e883532791953a441f1a5316276bb142797c.tar.gz
Fix MYMALLOC (PERL_MALLOC) build on Windows
Commit 34716e2a6e changed the WIN32 version of Perl_my_setenv() from using Newx() to using safesysmalloc() (in S_env_alloc()), but neglected to make the corresponding change from Safefree() to safesysfree().
Diffstat (limited to 'util.c')
-rw-r--r--util.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/util.c b/util.c
index 307eb8896c..861633ea31 100644
--- a/util.c
+++ b/util.c
@@ -2257,7 +2257,7 @@ Perl_my_setenv(pTHX_ const char *nam, const char *val)
envstr = S_env_alloc(NULL, nlen, vlen, 2, 1);
my_setenv_format(envstr, nam, nlen, val, vlen);
(void)PerlEnv_putenv(envstr);
- Safefree(envstr);
+ safesysfree(envstr);
}
# endif /* WIN32 || NETWARE */