aboutsummaryrefslogtreecommitdiffstats
path: root/arm/Asmgen.v
diff options
context:
space:
mode:
Diffstat (limited to 'arm/Asmgen.v')
-rw-r--r--arm/Asmgen.v3
1 files changed, 2 insertions, 1 deletions
diff --git a/arm/Asmgen.v b/arm/Asmgen.v
index 125e95ff..8c49d881 100644
--- a/arm/Asmgen.v
+++ b/arm/Asmgen.v
@@ -790,7 +790,8 @@ Definition transl_function (f: Mach.function) :=
do c <- transl_code f f.(Mach.fn_code) true;
OK (mkfunction f.(Mach.fn_sig)
(Pallocframe f.(fn_stacksize) f.(fn_link_ofs) ::
- Psavelr f.(fn_retaddr_ofs) :: c)).
+ Psavelr f.(fn_retaddr_ofs) ::
+ Pcfi_rel_offset (Ptrofs.to_int f.(fn_retaddr_ofs)):: c)).
Definition transf_function (f: Mach.function) : res Asm.function :=
do tf <- transl_function f;