Module RichVarinfo

val single : name:string -> unit -> Cil.varinfo
module type VarinfoMap = sig ... end
module type G = sig ... end
module type H = sig ... end
module Make (X : G) : VarinfoMap with type t = X.t
module BiVarinfoMap : sig ... end