mirror of https://github.com/nealey/irc-bot
10 lines
139 B
OCaml
10 lines
139 B
OCaml
|
type t = {name: string}
|
||
|
|
|
||
|
|
let by_name = Hashtbl.create 25
|
||
|
|
|
||
|
|
let lookup name =
|
||
|
|
Hashtbl.find by_name name
|
||
|
|
|
||
|
|
let create name =
|
||
|
|
{name = name}
|