let
close bindings p =
apply_bindings (
fun
_
->
None
) bindings p