Project

General

Profile

Revision 17abbe95 src/env.ml

View differences:

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
 
41 39
let overwrite x y =
42 40
  IMap.merge (
43 41
    fun k _old _new -> match _new with

Also available in: Unified diff