Browse Source

* fix memory allocation in stringtoppchar

peter 21 years ago
parent
commit
07acabc5b1
1 changed files with 1 additions and 1 deletions
  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