let add_filter f = filters := !filters @ [f]