diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2016-07-08 14:43:57 +0200 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2016-07-08 14:43:57 +0200 |
commit | e73d5db97cdb22cce2ee479469f62af3c4b6264a (patch) | |
tree | 035d31018c2abec698eb49a205c60bbf5c24ba0d /backend/ValueDomain.v | |
parent | db2445b3b745abd1a26f5a832a29ca269c725277 (diff) | |
download | compcert-kvx-e73d5db97cdb22cce2ee479469f62af3c4b6264a.tar.gz compcert-kvx-e73d5db97cdb22cce2ee479469f62af3c4b6264a.zip |
Port to Coq 8.5pl2
Manual merging of branch jhjourdan:coq8.5.
No other change un functionality.
Diffstat (limited to 'backend/ValueDomain.v')
-rw-r--r-- | backend/ValueDomain.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/ValueDomain.v b/backend/ValueDomain.v index 3c80d733..bc09c3dc 100644 --- a/backend/ValueDomain.v +++ b/backend/ValueDomain.v @@ -3739,7 +3739,7 @@ Proof. - (* contents *) intros. exploit inj_of_bc_inv; eauto. intros (A & B & C); subst. rewrite Zplus_0_r. - set (mv := ZMap.get ofs (Mem.mem_contents m)#b1). + set (mv := ZMap.get ofs (PMap.get b1 (Mem.mem_contents m))). assert (Mem.loadbytes m b1 ofs 1 = Some (mv :: nil)). { Local Transparent Mem.loadbytes. |