diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-05-24 09:46:07 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-05-24 09:46:07 +0000 |
commit | 3fa79790e617d87584598746296e626e0ce3b256 (patch) | |
tree | dcdc926130d9ed8d302eedf8215d065c0e787eed /ia32/Asmgenproof1.v | |
parent | 285d908c5dbd90bff7f03618c7a9e0fa5e287c94 (diff) | |
download | compcert-3fa79790e617d87584598746296e626e0ce3b256.tar.gz compcert-3fa79790e617d87584598746296e626e0ce3b256.zip |
Refactoring: move symbol_offset into Genv.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2503 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'ia32/Asmgenproof1.v')
-rw-r--r-- | ia32/Asmgenproof1.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ia32/Asmgenproof1.v b/ia32/Asmgenproof1.v index 6f2aee55..b3c815b6 100644 --- a/ia32/Asmgenproof1.v +++ b/ia32/Asmgenproof1.v @@ -381,11 +381,11 @@ Proof. monadInv H. rewrite (ireg_of_eq _ _ EQ); rewrite (ireg_of_eq _ _ EQ1); simpl. apply Val.add_lessdef; auto. apply Val.add_lessdef; auto. (* global *) - inv H. simpl. unfold symbol_address, symbol_offset. + inv H. simpl. unfold Genv.symbol_address. destruct (Genv.find_symbol ge i); simpl; auto. repeat rewrite Int.add_zero. auto. (* based *) monadInv H. rewrite (ireg_of_eq _ _ EQ). simpl. - unfold symbol_address, symbol_offset. destruct (Genv.find_symbol ge i); simpl; auto. + unfold Genv.symbol_address. destruct (Genv.find_symbol ge i); simpl; auto. rewrite Int.add_zero. rewrite Val.add_commut. auto. (* basedscaled *) monadInv H. rewrite (ireg_of_eq _ _ EQ). unfold eval_addrmode. |