|
@@ -3897,7 +3897,6 @@ implementation
|
|
|
converted_result_data : ttempcreatenode;
|
|
converted_result_data : ttempcreatenode;
|
|
|
calltype: tdispcalltype;
|
|
calltype: tdispcalltype;
|
|
|
invokesym : tsym;
|
|
invokesym : tsym;
|
|
|
- myparasym: tparavarsym;
|
|
|
|
|
begin
|
|
begin
|
|
|
result:=nil;
|
|
result:=nil;
|
|
|
candidates:=nil;
|
|
candidates:=nil;
|
|
@@ -4187,7 +4186,6 @@ implementation
|
|
|
end;
|
|
end;
|
|
|
while (paraidx<procdefinition.paras.count) and (vo_is_hidden_para in tparavarsym(procdefinition.paras[paraidx]).varoptions) do
|
|
while (paraidx<procdefinition.paras.count) and (vo_is_hidden_para in tparavarsym(procdefinition.paras[paraidx]).varoptions) do
|
|
|
inc(paraidx);
|
|
inc(paraidx);
|
|
|
- myparasym:=tparavarsym(procdefinition.paras[paraidx]);
|
|
|
|
|
while (paraidx<procdefinition.paras.count) do
|
|
while (paraidx<procdefinition.paras.count) do
|
|
|
begin
|
|
begin
|
|
|
if not assigned(tparavarsym(procdefinition.paras[paraidx]).defaultconstsym) then
|
|
if not assigned(tparavarsym(procdefinition.paras[paraidx]).defaultconstsym) then
|
florian