aboutsummaryrefslogtreecommitdiffstats
path: root/arm/TargetPrinter.ml
diff options
context:
space:
mode:
authorBernhard Schommer <bernhardschommer@gmail.com>2015-03-16 12:27:53 +0100
committerBernhard Schommer <bernhardschommer@gmail.com>2015-03-16 12:27:53 +0100
commit538e8515a6eb1efa8cba3a71456d05f4617999f3 (patch)
tree5b37285e6d49c0b4f9c2b516ac7b7985d3019bdf /arm/TargetPrinter.ml
parentb3c67667b7121b7f2e50700ec6da4bd780dee426 (diff)
parentb3294fbaf50539f254ff3bb7145e848b3f902f73 (diff)
downloadcompcert-kvx-538e8515a6eb1efa8cba3a71456d05f4617999f3.tar.gz
compcert-kvx-538e8515a6eb1efa8cba3a71456d05f4617999f3.zip
Merge branch 'master' into dwarf
Diffstat (limited to 'arm/TargetPrinter.ml')
-rw-r--r--arm/TargetPrinter.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/arm/TargetPrinter.ml b/arm/TargetPrinter.ml
index ee33353b..357990da 100644
--- a/arm/TargetPrinter.ml
+++ b/arm/TargetPrinter.ml
@@ -1073,6 +1073,7 @@ module Target (Opt: PRINTER_OPTIONS) : TARGET =
align
let print_instructions oc fn =
+ current_function_sig := fn.fn_sig;
ignore (fixup_arguments oc Incoming fn.fn_sig);
print_instructions oc fn.fn_code;
if !literals_in_code then emit_constants oc