|
@@ -670,13 +670,15 @@ implementation
|
|
l:=l.nextseq;
|
|
l:=l.nextseq;
|
|
Inc(FFirstFreeLocal);
|
|
Inc(FFirstFreeLocal);
|
|
end;
|
|
end;
|
|
- if assigned(local) then
|
|
|
|
- local.last:=true;
|
|
|
|
end;
|
|
end;
|
|
|
|
|
|
procedure insert_localslist(destlist,localslist: TAsmList);
|
|
procedure insert_localslist(destlist,localslist: TAsmList);
|
|
begin
|
|
begin
|
|
- destlist.insertListAfter(findfirst_tai_functype(destlist),localslist);
|
|
|
|
|
|
+ if assigned(localslist) then
|
|
|
|
+ begin
|
|
|
|
+ tai_local(localslist.Last).last:=true;
|
|
|
|
+ destlist.insertListAfter(findfirst_tai_functype(destlist),localslist);
|
|
|
|
+ end;
|
|
end;
|
|
end;
|
|
|
|
|
|
var
|
|
var
|