Git-Mirrors/qubes-mirage-firewall
1
0
Fork 0
mirror of https://github.com/mirage/qubes-mirage-firewall.git synced 2025-03-03 12:29:15 -05:00
Code Issues Packages Projects Releases Wiki Activity

catch exception in IpMap.find

Browse Source
This commit is contained in:
palainp 2023-07-16 18:26:38 +02:00
parent e6fd4e8646
commit 1ad5644553
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fw_utils.ml
View File

@ -8,6 +8,7 @@ module IpMap = struct
let find x map = let find x map =
try Some (find x map) try Some (find x map)
with Not_found -> None with Not_found -> None
| e -> Logs.err( fun f -> f "uncaught exception in find...%!"); None
end end
(** An Ethernet interface. *) (** An Ethernet interface. *)