summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorFifer, Eric <EFifer@sanwaint.com>2000-11-07 18:08:51 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-07 21:43:29 +0000
commit47dafe4d9a4e294fab4b6131bb296dc386e0dcbc (patch)
tree3242b0173cac49b613b1632a6caf41bf4d92861e /mg.c
parent3e148164f5f2c2b3bff3571c0083097006822b57 (diff)
downloadperl-47dafe4d9a4e294fab4b6131bb296dc386e0dcbc.tar.gz
cygwin port
Message-ID: <779F20BCCE5AD31186A50008C75D99791717BB@silldn_mail1.sanwaint.com> Synchronize with Cygwin 1.1.5. p4raw-id: //depot/perl@7597
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/mg.c b/mg.c
index bec0a82f72..923915dd01 100644
--- a/mg.c
+++ b/mg.c
@@ -936,11 +936,6 @@ Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg)
cur += len+1;
}
FreeEnvironmentStrings(envv);
-# else
-# ifdef __CYGWIN__
- I32 i;
- for (i = 0; environ[i]; i++)
- safesysfree(environ[i]);
# else
# ifndef PERL_USE_SAFE_PUTENV
I32 i;
@@ -951,7 +946,6 @@ Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg)
for (i = 0; environ[i]; i++)
safesysfree(environ[i]);
# endif /* PERL_USE_SAFE_PUTENV */
-# endif /* __CYGWIN__ */
environ[0] = Nullch;