Revision 5c1184ad src/env.ml
src/env.ml | ||
---|---|---|
36 | 36 |
let exists_value env ident = |
37 | 37 |
IMap.mem ident env |
38 | 38 |
|
39 |
let iter env f = IMap.iter f env |
|
40 |
|
|
39 | 41 |
let overwrite x y = |
40 | 42 |
IMap.merge ( |
41 | 43 |
fun k _old _new -> match _new with |
Also available in: Unified diff