From be4d6e42dfa287b93b1a35ec820ab2a5aaf8c7ec Mon Sep 17 00:00:00 2001 From: xleroy Date: Sun, 19 May 2013 09:54:40 +0000 Subject: Merge of the float32 branch: - added RTL type "Tsingle" - ABI-compatible passing of single-precision floats on ARM and x86 git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2260 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- common/Memdata.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'common/Memdata.v') diff --git a/common/Memdata.v b/common/Memdata.v index c62ba991..47f84716 100644 --- a/common/Memdata.v +++ b/common/Memdata.v @@ -473,7 +473,7 @@ Lemma decode_val_type: Proof. intros. unfold decode_val. destruct (proj_bytes cl). - destruct chunk; simpl; auto. + destruct chunk; simpl; auto. apply Float.single_of_bits_is_single. destruct chunk; simpl; auto. unfold proj_pointer. destruct cl; try (exact I). destruct m; try (exact I). -- cgit