Change 31356 by [EMAIL PROTECTED] on 2007/06/08 09:07:46

        Change 31347 should also have removed win32_free_argvw()
        because it now isn't used anywhere.

Affected files ...

... //depot/perl/win32/win32.c#290 edit
... //depot/perl/win32/wince.c#7 edit

Differences ...

==== //depot/perl/win32/win32.c#290 (text) ====
Index: perl/win32/win32.c
--- perl/win32/win32.c#289~31354~       2007-06-08 01:36:05.000000000 -0700
+++ perl/win32/win32.c  2007-06-08 02:07:46.000000000 -0700
@@ -4968,13 +4968,3 @@
 }
 #  endif /* USE_ITHREADS */
 #endif /* HAVE_INTERP_INTERN */
-
-static void
-win32_free_argvw(pTHX_ void *ptr)
-{
-    char** argv = (char**)ptr;
-    while(*argv) {
-       Safefree(*argv);
-       *argv++ = Nullch;
-    }
-}

==== //depot/perl/win32/wince.c#7 (text) ====
Index: perl/win32/wince.c
--- perl/win32/wince.c#6~31355~ 2007-06-08 01:50:09.000000000 -0700
+++ perl/win32/wince.c  2007-06-08 02:07:46.000000000 -0700
@@ -2834,16 +2834,6 @@
 #  endif /* USE_ITHREADS */
 #endif /* HAVE_INTERP_INTERN */
 
-static void
-win32_free_argvw(pTHX_ void *ptr)
-{
-    char** argv = (char**)ptr;
-    while(*argv) {
-       Safefree(*argv);
-       *argv++ = Nullch;
-    }
-}
-
 // added to remove undefied symbol error in CodeWarrior compilation
 int
 Perl_Ireentrant_buffer_ptr(aTHX)
End of Patch.

Reply via email to