From: Steve Hay <SteveHay@planit.com>
Date: Fri, 8 Jun 2007 08:50:09 +0000 (+0000)
Subject: Remove dead Perl_sys_intern_clear() from wince.c
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a93c76d3e4665115cea3e11c220832af8061a030;p=p5sagit%2Fp5-mst-13.2.git

Remove dead Perl_sys_intern_clear() from wince.c

p4raw-id: //depot/perl@31355
---

diff --git a/win32/wince.c b/win32/wince.c
index f5736b3..7acea0b 100644
--- a/win32/wince.c
+++ b/win32/wince.c
@@ -2844,20 +2844,6 @@ win32_free_argvw(pTHX_ void *ptr)
     }
 }
 
-#if 0
-void
-Perl_sys_intern_clear(pTHX)
-{
-    Safefree(w32_perlshell_tokens);
-    Safefree(w32_perlshell_vec);
-    /* NOTE: w32_fdpid is freed by sv_clean_all() */
-    Safefree(w32_children);
-#  ifdef USE_ITHREADS
-    Safefree(w32_pseudo_children);
-#  endif
-}
-
-#endif
 // added to remove undefied symbol error in CodeWarrior compilation
 int
 Perl_Ireentrant_buffer_ptr(aTHX)