From e2fb435c257cf6aac24e7b30f902bede694100c5 Mon Sep 17 00:00:00 2001 From: xleroy Date: Sun, 11 Mar 2012 16:13:15 +0000 Subject: Minor updates git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1848 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- common/Globalenvs.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'common') diff --git a/common/Globalenvs.v b/common/Globalenvs.v index 367f44a..e01d5f7 100644 --- a/common/Globalenvs.v +++ b/common/Globalenvs.v @@ -3,7 +3,7 @@ (* The Compcert verified compiler *) (* *) (* Xavier Leroy, INRIA Paris-Rocquencourt *) -(* with contributions from Andrew Tolmach (Portland State University) *) +(* with contributions from Andrew Tolmach (Portland State University) *) (* *) (* Copyright Institut National de Recherche en Informatique et en *) (* Automatique. All rights reserved. This file is distributed *) @@ -1477,7 +1477,7 @@ Proof. apply find_funct_ptr_match. auto. Qed. -Theorem find_funct_rev_match: (* a little weak *) +Theorem find_funct_rev_match: forall (v : val) (tf : B), find_funct (globalenv p') v = Some tf -> (exists f, find_funct (globalenv p) v = Some f /\ match_fun f tf) -- cgit v1.2.3