[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Mldonkey-commits] Changes to mldonkey/src/utils/net/ip_set.ml
From: |
mldonkey-commits |
Subject: |
[Mldonkey-commits] Changes to mldonkey/src/utils/net/ip_set.ml |
Date: |
Mon, 08 Aug 2005 14:20:44 -0400 |
Index: mldonkey/src/utils/net/ip_set.ml
diff -u mldonkey/src/utils/net/ip_set.ml:1.13
mldonkey/src/utils/net/ip_set.ml:1.14
--- mldonkey/src/utils/net/ip_set.ml:1.13 Sat Aug 6 19:46:34 2005
+++ mldonkey/src/utils/net/ip_set.ml Mon Aug 8 18:20:43 2005
@@ -253,6 +253,11 @@
let bl = ref BL_Empty
+let ip_blocked ip =
+ match match_ip !bl ip with
+ None -> false
+ | Some br -> true
+
(*
open Benchmark