diff options
author | Xavier Leroy <xavierleroy@users.noreply.github.com> | 2019-09-11 15:13:12 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2019-09-11 15:13:12 +0200 |
commit | 7601fb5e792a5305336e5cda9794c4041d053b95 (patch) | |
tree | f0dc0acd7bb5ad6dae80e4389fb165fa93eb3cb8 /backend/Lineartyping.v | |
parent | d3eba50731c23546c6e9ccb14230460fc1da592e (diff) | |
parent | c243b565ab0744086e10efcfee16768f6c3cf880 (diff) | |
download | compcert-7601fb5e792a5305336e5cda9794c4041d053b95.tar.gz compcert-7601fb5e792a5305336e5cda9794c4041d053b95.zip |
Merge pull request #313 from AbsInt/aarch64
Support target architecture AArch64 (ARMv8 in 64-bit mode)
Diffstat (limited to 'backend/Lineartyping.v')
-rw-r--r-- | backend/Lineartyping.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/Lineartyping.v b/backend/Lineartyping.v index 55fa7a67..0e3b7c8e 100644 --- a/backend/Lineartyping.v +++ b/backend/Lineartyping.v @@ -321,7 +321,7 @@ Local Opaque mreg_type. + (* other ops *) destruct (type_of_operation op) as [ty_args ty_res] eqn:TYOP. InvBooleans. econstructor; eauto. - apply wt_setreg; auto. eapply Val.has_subtype; eauto. + apply wt_setreg. eapply Val.has_subtype; eauto. change ty_res with (snd (ty_args, ty_res)). rewrite <- TYOP. eapply type_of_operation_sound; eauto. red; intros; subst op. simpl in ISMOVE. destruct args; try discriminate. destruct args; discriminate. |