import deriving 0.1.1a
[deriving.git] / lib / interned.mli
blob9cf27eb9d3a92a7647f1be7f95e9be461283e0c0
1 (* Interned strings *)
3 type t
4 val compare : t -> t -> int
5 val eq : t -> t -> bool
6 val intern : string -> t
7 val to_string : t -> string
8 val name : t -> string