moparisthebest
/
Simba
mirror of https://github.com/moparisthebest/Simba
1
0
Fork 0
Code Issues Releases Wiki Activity

Lape-wrappers: Fix by nielsie95.

This commit is contained in:
Merlijn Wajer 2011-08-03 20:30:11 +02:00
parent 9deb9a1b67
commit a143016beb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Projects/lape-wrappers/main.pas
View File

@ -158,9 +158,9 @@ begin
for iii := 0 to High(c) do
begin
if (iii> 0) then
if (iii+ii> 0) then
s := s+', ';
s := s+PtrName(d.ShortText)+'(Params^['+IntToStr(iii)+'])^';
s := s+PtrName(d.ShortText)+'(Params^['+IntToStr(iii+ii)+'])^';
end;
end;