Associative instrumentation of logical or is not triggered if the nested operator is (or)

https://github.com/aantron/bisect_ppx/blob/9bdc5dabad4c6d9f3115cf94ca7657058e10109b/src/ppx/instrument.ml#L1039-L1044

	\| Pexp_apply (([%expr (\|\|)] \| [%expr (or)]), [(_l, e); (_l', e')]) ->
	let e_mark =
	instrument_expr ~use_loc_of:e ~at_end:true [%expr true] in
	let e'_mark =
	match e'.pexp_desc with
	\| Pexp_apply ([%expr (\|\|)], _) ->

Provide feedback