2
0
Эх сурвалжийг харах

* allocate an extra byte for argv[0]

peter 26 жил өмнө
parent
commit
4bf41d3afb
1 өөрчлөгдсөн 5 нэмэгдсэн , 2 устгасан
  1. 5 2
      rtl/win32/syswin32.pp

+ 5 - 2
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