module Longident: sig .. end
type t =
|
Lident of string
Ldot of t * string
Lapply of t * t
let flatten: t => list(string);
let last: t => string;
let parse: string => t;