Explorar el Código

* fix memory allocation in stringtoppchar

peter hace 21 años
padre
commit
07acabc5b1
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      rtl/unix/unixutil.pp

+ 1 - 1
rtl/unix/unixutil.pp

@@ -130,7 +130,7 @@ var
 
 begin
   buf:=s;
-  nr:=0;
+  nr:=1;
   InQuote:=false;
   while (buf^<>#0) do			// count nr of args
    begin