I'd love if this were possible, and I'd be willing to poke around the OCaml codebase to make this work, assuming it's not a fundamentally difficult thing.