diff --git a/rtl/win32/syswin32.pp b/rtl/win32/syswin32.pp
index c4203a93dd..20838a7a2d 100644
--- a/rtl/win32/syswin32.pp
+++ b/rtl/win32/syswin32.pp
@@ -680,7 +680,7 @@ begin
   repeat
     Inc(Arglen);
   until (cmdline[Arglen]=#0);
-  getmem(argsbuf[count],arglen);
+  getmem(argsbuf[count],arglen+1);
   move(cmdline^,argsbuf[count]^,arglen);
   { Now skip the first one }
   cmdline:=GetCommandLine;
@@ -1010,7 +1010,10 @@ end.
 
 {
   $Log$
-  Revision 1.45  1999-10-03 19:39:05  peter
+  Revision 1.46  1999-10-22 14:47:19  peter
+    * allocate an extra byte for argv[0]
+
+  Revision 1.45  1999/10/03 19:39:05  peter
     * fixed argv[0] length
 
   Revision 1.44  1999/09/10 15:40:35  peter