Env (ppx_optcomp.Ppx

type t

val init : t

val empty : t

val add : 
  t ->
  var:Base.string Ppxlib.Location.loc ->
  value:Ppx_optcomp__.Interpreter.Value.t ->
  t

val undefine : t -> Base.string Ppxlib.Location.loc -> t

val of_list : 
  (Base.string Ppxlib.Location.loc * Ppx_optcomp__.Interpreter.Value.t)
    Base.list ->
  t

val eval : 
  t ->
  Base.string Ppxlib.Location.loc ->
  Ppx_optcomp__.Interpreter.Value.t

val is_defined : 
  ?permissive:Base.bool ->
  t ->
  Base.string Ppxlib.Location.loc ->
  Base.bool

val seen : t -> Base.string Ppxlib.Location.loc -> Base.bool

val to_expression : t -> Ppxlib.expression