summaryrefslogtreecommitdiff
path: root/compiler/aoptobj.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/aoptobj.pas')
-rw-r--r--compiler/aoptobj.pas6
1 files changed, 6 insertions, 0 deletions
diff --git a/compiler/aoptobj.pas b/compiler/aoptobj.pas
index d0c54147e9..a7836c820f 100644
--- a/compiler/aoptobj.pas
+++ b/compiler/aoptobj.pas
@@ -442,6 +442,8 @@ Unit AoptObj;
Include(UsedRegs, getsupreg(tai_regalloc(p).reg));
ra_dealloc :
Exclude(UsedRegs, getsupreg(tai_regalloc(p).reg));
+ else
+ ;
end;
end;
p := tai(p.next);
@@ -918,6 +920,8 @@ Unit AoptObj;
Include(UsedRegs[getregtype(tai_regalloc(p).reg)].UsedRegs, getsupreg(tai_regalloc(p).reg));
ra_dealloc :
Exclude(UsedRegs[getregtype(tai_regalloc(p).reg)].UsedRegs, getsupreg(tai_regalloc(p).reg));
+ else
+ ;
end;
p := tai(p.next);
end;
@@ -1686,6 +1690,8 @@ Unit AoptObj;
begin
end; { if is_jmp }
end;
+ else
+ ;
end;
if assigned(p) then
begin