summaryrefslogtreecommitdiff
path: root/compiler/aggas.pas
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/aggas.pas')
-rw-r--r--compiler/aggas.pas10
1 files changed, 6 insertions, 4 deletions
diff --git a/compiler/aggas.pas b/compiler/aggas.pas
index ffd2e078be..f6a1650d5d 100644
--- a/compiler/aggas.pas
+++ b/compiler/aggas.pas
@@ -378,6 +378,8 @@ implementation
secname:='.data.rel.ro';
sec_rodata_norel:
secname:='.rodata';
+ else
+ ;
end;
end;
@@ -511,8 +513,6 @@ implementation
writer.AsmWrite(',"x"');
SF_None:
writer.AsmWrite(',""');
- else
- Internalerror(2018101502);
end;
case secprogbits of
SPB_PROGBITS:
@@ -521,8 +521,6 @@ implementation
writer.AsmWrite(',%nobits');
SPB_None:
;
- else
- Internalerror(2018101503);
end;
end
else
@@ -1062,6 +1060,8 @@ implementation
WriteDecodedUleb128(qword(tai_const(hp).value));
aitconst_sleb128bit:
WriteDecodedSleb128(int64(tai_const(hp).value));
+ else
+ ;
end
end
else
@@ -1814,6 +1814,8 @@ implementation
result:='.section '+objc_section_name(atype);
exit
end;
+ else
+ ;
end;
result := inherited sectionname(atype,aname,aorder);
end;