Some ocaml thing. No idea what it's doing.