diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-02-24 19:49:56 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-02-24 19:49:56 +0100 |
commit | 424df9761ae4f3c9ce91ba785aef111bedd9125a (patch) | |
tree | bf140016b5fcd6b5d1131b23c88e7c331b70d949 /powerpc/TargetPrinter.ml | |
parent | f69ba5f0bb0ee5e2b08f57290bee9635dd13f33c (diff) | |
download | compcert-kvx-424df9761ae4f3c9ce91ba785aef111bedd9125a.tar.gz compcert-kvx-424df9761ae4f3c9ce91ba785aef111bedd9125a.zip |
fixes for aarch64 arm ppc ppc64
Diffstat (limited to 'powerpc/TargetPrinter.ml')
-rw-r--r-- | powerpc/TargetPrinter.ml | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/powerpc/TargetPrinter.ml b/powerpc/TargetPrinter.ml index 0f608d25..3ea03786 100644 --- a/powerpc/TargetPrinter.ml +++ b/powerpc/TargetPrinter.ml @@ -117,7 +117,9 @@ module Linux_System : SYSTEM = let name_of_section = function | Section_text -> ".text" - | Section_data i -> + | Section_data(i, true) -> + failwith "_Thread_local unsupported on this platform" + | Section_data(i, false) -> if i then ".data" else @@ -218,7 +220,9 @@ module Diab_System : SYSTEM = let name_of_section = function | Section_text -> ".text" - | Section_data i -> if i then ".data" else common_section () + | Section_data(i, true) -> + failwith "_Thread_local unsupported on this platform" + | Section_data (i, false) -> if i then ".data" else common_section () | Section_small_data i -> if i then ".sdata" else ".sbss" | Section_const _ -> ".text" | Section_small_const _ -> ".sdata2" |