* fix memory allocation in stringtoppchar

This commit is contained in:
peter 2004-03-15 20:43:07 +00:00
parent 6219d43b43
commit 07acabc5b1

View File

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