Module `Pxp_entity`

type state = | At_beginning | Inserted_begin_entity | At_end

class type !'entity preliminary_dtd = object ... end

type !'entity entity_variables = { mutable dtd : 'entity preliminary_dtd; mutable name : string; mutable swarner : Pxp_core_types.I.symbolic_warnings option; mutable warner : Pxp_core_types.I.collect_warnings; mutable encoding : Pxp_core_types.I.rep_encoding; mutable lfactory : Pxp_lexer_types.lexer_factory; mutable l_scan_document : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_document_type : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_content : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_within_tag : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_declaration : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_comment : unit -> Pxp_lexer_types.lexers -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_tag_eb : unit -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable l_scan_tag_eb_att : unit -> bool -> Pxp_lexer_types.token * Pxp_lexer_types.lexers; mutable lexobj : Pxp_lexer_types.lexer_obj; mutable prolog : Pxp_lexer_types.prolog_token list option; mutable prolog_pairs : (string * string) list; mutable lex_id : Pxp_lexer_types.lexers; mutable force_parameter_entity_parsing : bool; mutable check_text_declaration : bool; mutable normalize_newline : bool; mutable generate_attribute_events : bool; mutable line : int; mutable column : int; mutable p_line : int; mutable p_column : int; mutable linecount : Pxp_aux.linecount; mutable counts_as_external : bool; mutable at_bof : bool; mutable deferred_token : Pxp_lexer_types.token list option; mutable debug : bool; }

val make_variables : 'entity preliminary_dtd -> string -> Pxp_core_types.I.symbolic_warnings option -> Pxp_core_types.I.collect_warnings -> Pxp_core_types.I.rep_encoding -> 'entity entity_variables
val update_lexobj : 'a entity_variables -> Pxp_lexer_types.lexer_obj -> unit
val update_lines : 'a entity_variables -> unit
val update_content_lines : 'a entity_variables -> Pxp_lexer_types.token -> unit
val update_lines_within_tag : 'a entity_variables -> Pxp_lexer_types.token -> unit
val update_other_lines : 'a entity_variables -> 'b -> unit

class type entity = object ... end

and prelim_entity_manager = object ... end

class type v_entity = object ... end

exception Coerced_entity of entity

class virtual  entity_base : entity preliminary_dtd -> string -> Pxp_core_types.I.symbolic_warnings option -> Pxp_core_types.I.collect_warnings -> Pxp_core_types.I.rep_encoding -> object ... end

class ndata_entity : string -> Pxp_core_types.I.ext_id -> string -> Pxp_core_types.I.rep_encoding -> entity

class  external_entity : Pxp_reader.resolver -> entity preliminary_dtd -> string -> Pxp_core_types.I.symbolic_warnings option -> Pxp_core_types.I.collect_warnings -> Pxp_core_types.I.ext_id -> string option -> bool -> Pxp_core_types.I.rep_encoding -> v_entity

class  document_entity : Pxp_reader.resolver -> entity preliminary_dtd -> string -> Pxp_core_types.I.symbolic_warnings option -> Pxp_core_types.I.collect_warnings -> Pxp_core_types.I.ext_id -> string option -> Pxp_core_types.I.rep_encoding -> entity

class  internal_entity : entity preliminary_dtd -> string -> Pxp_core_types.I.symbolic_warnings option -> Pxp_core_types.I.collect_warnings -> string -> bool -> bool -> Pxp_core_types.I.rep_encoding -> entity

type section_state = | P_bof | P_normal of int | P_pre_eof | P_eof

class entity_section : entity -> entity