Commit | Line | Data |
---|---|---|
d6223be9 AC |
1 | signature CONTACT = |
2 | sig | |
3 | type kind = {id :int, name : string, makeUrl : (string * string) option} | |
4 | ||
5 | val addKind : string * (string * string) option -> int | |
6 | val lookupKind : int -> kind | |
7 | val modKind : kind -> unit | |
8 | val deleteKind : int -> unit | |
9 | val listKinds : unit -> kind list | |
10 | end |