# New Ticket Created by  mrnobo1024 
# Please include the string:  [perl #28087]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=28087 >


The second arg of GetExitCodeProcess should be a pointer to DWORD, not int,
this was causing a warning on mingw:

src/platform.c: In function `Parrot_Run_OS_Command':
src/platform.c:446: warning: passing arg 2 of `GetExitCodeProcess' from
incompatible pointer type



__________________________________
Do you Yahoo!?
Yahoo! Finance Tax Center - File online. File on time.
http://taxes.yahoo.com/filing.html
--- config/gen/platform/win32/exec.c~   Wed Mar  3 16:06:08 2004
+++ config/gen/platform/win32/exec.c    Sat Mar 27 10:29:10 2004
@@ -4,7 +4,7 @@
  */
 INTVAL
 Parrot_Run_OS_Command(Parrot_Interp interpreter, STRING *command) {
-    int status = 0;
+    DWORD status = 0;
     STARTUPINFO si;
     PROCESS_INFORMATION pi;
     int free_it = 0;

Reply via email to