Module Odoc_ocamlhtml

exception Fatal_error
val fatal_error : string -> 'a
type error =
  1. | Illegal_character of char
  2. | Unterminated_comment
  3. | Unterminated_string
  4. | Unterminated_string_in_comment
  5. | Keyword_as_label of string
exception Error of error * int * int
val base_escape_strings : (string * string) list
val prelike_escape_strings : (string * string) list
val pre : bool ref
val escape : string -> string
val escape_base : string -> string
val print : ?esc:bool -> string -> unit
val print_class : ?esc:bool -> string -> string -> unit
val create_hashtable : int -> ('a * 'b) list -> ('a, 'b) Stdlib.Hashtbl.t
val html_of_comment : (string -> string) ref
val keyword_table : (string, string) Stdlib.Hashtbl.t
val kwsign_class : string
val constructor_class : string
val comment_class : string
val string_class : string
val code_class : string
val margin : int ref
val comment_buffer : Stdlib.Buffer.t
val reset_comment_buffer : unit -> unit
val store_comment_char : char -> unit
val add_comment_string : string -> unit
val make_margin : unit -> string
val print_comment : unit -> unit
val string_buffer : Stdlib.Buffer.t
val reset_string_buffer : unit -> unit
val store_string_char : char -> unit
val get_stored_string : unit -> string
val char_for_backslash : char -> char
val char_for_decimal_code : Stdlib.Lexing.lexbuf -> int -> char
val char_for_hexa_code : Stdlib.Lexing.lexbuf -> int -> char
val string_start_pos : int ref
val comment_start_pos : int list ref
val in_comment : unit -> bool
val report_error : Stdlib.Format.formatter -> error -> unit
val __ocaml_lex_tables : Stdlib.Lexing.lex_tables
val token : Stdlib.Lexing.lexbuf -> unit
val __ocaml_lex_token_rec : Stdlib.Lexing.lexbuf -> int -> unit
val comment : Stdlib.Lexing.lexbuf -> unit
val __ocaml_lex_comment_rec : Stdlib.Lexing.lexbuf -> int -> unit
val string : Stdlib.Lexing.lexbuf -> unit
val __ocaml_lex_string_rec : Stdlib.Lexing.lexbuf -> int -> unit
val html_of_code : Stdlib.Buffer.t -> ?with_pre:bool -> string -> unit