aboutsummaryrefslogtreecommitdiffstats
path: root/backend/PrintAsm.ml
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2015-10-01 12:19:16 +0200
committerBernhard Schommer <bernhardschommer@gmail.com>2015-10-01 12:19:16 +0200
commiteaf4bab84af4b3db1ca9c6785ed803bbbd61b9a7 (patch)
treef6233fc2272d6495ec22afafd5ef5534ba32df44 /backend/PrintAsm.ml
parent06a1a35d759dc780e389218b5f78ce3415d4b3cd (diff)
downloadcompcert-kvx-eaf4bab84af4b3db1ca9c6785ed803bbbd61b9a7.tar.gz
compcert-kvx-eaf4bab84af4b3db1ca9c6785ed803bbbd61b9a7.zip
Only print locations for symbols that are present in the assembler.
Diffstat (limited to 'backend/PrintAsm.ml')
-rw-r--r--backend/PrintAsm.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/backend/PrintAsm.ml b/backend/PrintAsm.ml
index a152e3c2..45b1e878 100644
--- a/backend/PrintAsm.ml
+++ b/backend/PrintAsm.ml
@@ -79,10 +79,11 @@ module Printer(Target:TARGET) =
match v.gvar_init with
| [] -> ()
| _ ->
+ Debug.variable_printed (extern_atom name);
let sec =
match C2C.atom_sections name with
| [s] -> s
- | _ -> Section_data true
+ | _ -> Section_data true
and align =
match C2C.atom_alignof name with
| Some a -> a