Commit | Line | Data |
---|---|---|
88a858ea AC |
1 | signature LINK = |
2 | sig | |
3 | type link = {id : int, usr : int, title : string, url : string, descr : string} | |
4 | ||
5 | val lookupLink : int -> link | |
6 | val listLinks : unit -> (string * link) list | |
7 | val listUserLinks : int -> link list | |
8 | val addLink : int * string * string * string -> int | |
9 | val modLink : link -> unit | |
10 | val deleteLink : int -> unit | |
11 | end |