Parent Directory | Revision Log | Patch
revision 1.17 by spiralvoice, Mon Sep 19 10:09:06 2005 UTC | revision 1.18 by spiralvoice, Mon Oct 10 16:22:25 2005 UTC | |
---|---|---|
# | Line 12 let lprintf_n () = | Line 12 let lprintf_n () = |
12 | lprintf "%s[IPblock] " | lprintf "%s[IPblock] " |
13 | (log_time ()); lprintf | (log_time ()); lprintf |
14 | ||
15 | module H = Weak2.Make(struct | module H = Weak.Make(struct |
16 | type t = string | type t = string |
17 | let hash s = Hashtbl.hash s | let hash s = Hashtbl.hash s |
18 | let equal x y = x = y | let equal x y = x = y |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |