module Modelica_lexer:sig..end
typetokplus =Utils.token Location.loc
type 
val next_token : lexer_state -> tokplus
val last_token : lexer_state -> tokplus option
val state_from_utf8_string : string -> string -> lexer_state
val show_location : Location.t -> string
val highlight_dumb : Format.formatter -> Lexing.lexbuf -> Location.t -> unit
type'aloc ='a Location.loc= {
|    | txt :  | 
|    | loc :  |