diff options
Diffstat (limited to 'compiler/aggas.pas')
-rw-r--r-- | compiler/aggas.pas | 10 |
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; |