Remove a warning

This commit is contained in:
velter 2013-11-18 17:27:44 +01:00
parent 8ec03b8cfb
commit 6b3c6ae3ad

View File

@ -246,7 +246,7 @@ const
function TPSExec.InnerfuseCall(_Self, Address: Pointer; CallingConv: TPSCallingConvention; Params: TPSList; res: PPSVariantIFC): Boolean;
var
a, Stack: ansistring;
Stack: ansistring;
I: Longint;
RegUsage: Byte;
CallData: TPSList;