Переглянути джерело

* fix memory allocation in stringtoppchar

peter 21 роки тому
батько
коміт
07acabc5b1
1 змінених файлів з 1 додано та 1 видалено
  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