summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMoritz Angermann <moritz.angermann@gmail.com>2021-03-23 20:42:54 +0800
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-03-29 17:25:49 -0400
commit026a53e0ae5d9bd436e59ed681ab51c9fc3563c0 (patch)
tree2e5bda428b81d9bc96ee91aeaf333caf6977b85f
parente754ff7f178a629a2261cba77a29d9510391aebd (diff)
downloadhaskell-026a53e0ae5d9bd436e59ed681ab51c9fc3563c0.tar.gz
[linker] Additional FALLTHROUGH decorations.
-rw-r--r--rts/linker/elf_reloc_aarch64.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/linker/elf_reloc_aarch64.c b/rts/linker/elf_reloc_aarch64.c
index 90e9ab5f13..d8c4f8b724 100644
--- a/rts/linker/elf_reloc_aarch64.c
+++ b/rts/linker/elf_reloc_aarch64.c
@@ -71,12 +71,14 @@ encodeAddendAarch64(Section * section, Elf_Rel * rel, int64_t addend) {
break;
case COMPAT_R_AARCH64_ABS32:
CHECK(isInt64(32, addend));
+ FALLTHROUGH;
case COMPAT_R_AARCH64_PREL32:
CHECK(isInt64(32, addend));
*(uint32_t*)P = (uint32_t)addend;
break;
case COMPAT_R_AARCH64_ABS16:
CHECK(isInt64(16, addend));
+ FALLTHROUGH;
case COMPAT_R_AARCH64_PREL16:
CHECK(isInt64(16, addend));
*(uint16_t*)P = (uint16_t)addend;