In https://github.com/ocaml/ocaml-lsp/blob/master/submodules/lev/lev-fiber/src/lev_fiber.ml#L1253, the type of `loop` is `Lev.Loop.t`, but `locate-type` brings me to `Nonempty_list.t`.