module Env:Environnements simples (listes d'associations)sig
..end
type'a
t =(Var.t * 'a) list
'a
aux variablesexception Failure of string
val add : string -> 'a -> 'a t -> 'a t
add x v env
renvoie l'environnement qui est env plus une
liaison de x
à v
.
Note : si il existe déjà une liaison de x
à w
dans env,
alors elle est remplacée par la nouvelle liaison.
val find : string -> 'a t -> 'a
L'appel find x env
renvoie la valeur v
associée à x
dans env.
Si aucune valeur n'est associée à x
, l'exception Failure x
est lancée.