`sig
type token =
[ `Comment of string
| `Construct of string
| `Keyword of string
| `Newline
| `Quotation of string
| `Special_comment of string * string
| `Start_annot of Caml2html.Annot.layer_info * string
| `Stop_annot of Caml2html.Annot.layer_info
| `String of string
| `Tab
| `Token of string ]
val parse :
?annot:Caml2html.Annot.tag list ->
Stdlib.Lexing.lexbuf -> Caml2html.Input.token list
val string :
?filename:string ->
?annot:Caml2html.Annot.tag list -> string -> Caml2html.Input.token list
val channel :
?filename:string ->
?annot:Caml2html.Annot.tag list ->
Stdlib.in_channel -> Caml2html.Input.token list
val file :
?annot:Caml2html.Annot.tag list -> string -> Caml2html.Input.token list
end`