Index: Source/NSProcessInfo.m
===================================================================
RCS file: /cvsroot/gnustep/gnustep/core/base/Source/NSProcessInfo.m,v
retrieving revision 1.88.2.1
diff -u -p -r1.88.2.1 NSProcessInfo.m
--- Source/NSProcessInfo.m	18 Feb 2003 15:56:59 -0000	1.88.2.1
+++ Source/NSProcessInfo.m	23 Feb 2003 22:12:46 -0000
@@ -186,8 +186,28 @@ _gnu_process_args(int argc, char *argv[]
       }
   else
       {
+#ifdef __MINGW__
+      char* buffer;
+      int buffer_size = 0;
+      int needed_size = 0;
+      while (needed_size == buffer_size)
+          {
+          buffer_size = buffer_size + 256;
+          buffer = (char*)malloc(buffer_size);
+          needed_size = GetModuleFileNameA(NULL, buffer, buffer_size);
+          if (needed_size<buffer_size)
+              {
+              _gnu_arg_zero = buffer;
+              }
+          else
+              {
+              free(buffer);
+              }
+          }
+#else      
       _gnu_arg_zero = (char*)malloc(1);
       _gnu_arg_zero[0] = '\0';
+#endif      
       }
 
   /* Getting the process name */