summaryrefslogtreecommitdiff
path: root/rts
diff options
context:
space:
mode:
authorMoritz Angermann <moritz.angermann@gmail.com>2021-03-23 20:42:54 +0800
committerMoritz Angermann <moritz.angermann@gmail.com>2021-03-30 00:48:05 -0400
commitd7b97bccebba860a04ad4dcd6a063a4e802aa2f4 (patch)
tree4f8a186e5de0258e74e4bad42037e40c4423402a /rts
parent2410ee5b2155160d3d325728b07b40799f5a46ea (diff)
downloadhaskell-d7b97bccebba860a04ad4dcd6a063a4e802aa2f4.tar.gz
[linker] Additional FALLTHROUGH decorations.
(cherry picked from commit c63e14515ac659c1feba64a4615021253ee88c21)
Diffstat (limited to 'rts')
-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;