(***********************************************************************) (* *) (* Objective Caml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) (* under the terms of the Q Public License version 1.0. *) (* *) (***********************************************************************) (* $Id: longident.mli 2990 2000-03-25 18:55:45Z xleroy $ *) (* Long identifiers, used in parsetree. *) type t = Lident of string | Ldot of t * string | Lapply of t * t val flatten: t -> string list val parse: string -> t