type blocker_cond = Stop | Die [@@deriving yojson]
type blocker = { name : string; cond : blocker_cond } [@@deriving yojson]
type blocker_list = blocker list [@@deriving yojson]
type config = { path : string; blockers : blocker_list } [@@deriving yojson]