sig
val init : filename:string -> Stdlib.Lexing.lexbuf
val finish : unit -> unit
val initial : Stdlib.Lexing.lexbuf -> Cparser.token
val push_context : unit -> unit
val add_type : string -> unit
val add_identifier : string -> unit
val pop_context : unit -> unit
val annot_char : char Stdlib.ref
val currentLoc : unit -> Cabs.cabsloc
val is_c_keyword : string -> bool
end