aboutsummaryrefslogtreecommitdiffstats
path: root/x86
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2016-11-10 10:35:35 +0100
committerBernhard Schommer <bernhardschommer@gmail.com>2016-11-10 10:35:35 +0100
commit4eb3efa2ccbf58c59a8d181c7d616b3d0c06e02b (patch)
tree63a46d2ec6462679523877c6e8d1b54c298bf16c /x86
parent3f2584ada2c61c2648366a0318bb6996909c5623 (diff)
downloadcompcert-kvx-4eb3efa2ccbf58c59a8d181c7d616b3d0c06e02b.tar.gz
compcert-kvx-4eb3efa2ccbf58c59a8d181c7d616b3d0c06e02b.zip
Use 64 bit address in debug information.
Address constants need to be 64bit also in the debug information. Bug 20335
Diffstat (limited to 'x86')
-rw-r--r--x86/TargetPrinter.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/x86/TargetPrinter.ml b/x86/TargetPrinter.ml
index 33d47830..b5aeefae 100644
--- a/x86/TargetPrinter.ml
+++ b/x86/TargetPrinter.ml
@@ -870,6 +870,8 @@ module Target(System: SYSTEM):TARGET =
let new_label = new_label
+ let address = if Archi.ptr64 then ".quad" else ".long"
+
end
let sel_target () =