diff options
author | 2005-03-08 22:03:21 +0000 | |
---|---|---|
committer | 2005-03-08 22:03:21 +0000 | |
commit | b2a962c342c74e96dc81e9eca30515282864620c (patch) | |
tree | e9c71125fd63d4472a957b6725ed0a85384cfdfa /pretyping/evd.ml | |
parent | 80001a5247f74c273bbac4681129c5a9ab037ddc (diff) |
Ajout fold
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6811 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/evd.ml')
-rw-r--r-- | pretyping/evd.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/evd.ml b/pretyping/evd.ml index 111cc9d7c..dbcfae0e8 100644 --- a/pretyping/evd.ml +++ b/pretyping/evd.ml @@ -44,6 +44,7 @@ let map evc k = Evarmap.find k evc let rmv evc k = Evarmap.remove k evc let remap evc k i = Evarmap.add k i evc let in_dom evc k = Evarmap.mem k evc +let fold = Evarmap.fold let add evd ev newinfo = Evarmap.add ev newinfo evd |