Project

General

Profile

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

Also available in: Unified diff