This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove dead Perl_sys_intern_clear() from wince.c
authorSteve Hay <SteveHay@planit.com>
Fri, 8 Jun 2007 08:50:09 +0000 (08:50 +0000)
committerSteve Hay <SteveHay@planit.com>
Fri, 8 Jun 2007 08:50:09 +0000 (08:50 +0000)
p4raw-id: //depot/perl@31355

win32/wince.c

index f5736b3..7acea0b 100644 (file)
@@ -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)