module Docstrings:sig..end
val init : unit -> unitval warn_bad_docstrings : unit -> unittype 
val docstring : string -> Location.t -> docstringval register : docstring -> unitval docstring_body : docstring -> stringval docstring_loc : docstring -> Location.t
   These functions are used by the lexer to associate docstrings to
   the locations of tokens.
val set_pre_docstrings : Lexing.position -> docstring list -> unitval set_post_docstrings : Lexing.position -> docstring list -> unitval set_floating_docstrings : Lexing.position -> docstring list -> unitval set_pre_extra_docstrings : Lexing.position -> docstring list -> unitval set_post_extra_docstrings : Lexing.position -> docstring list -> unit
    The Docstrings.docs type represents documentation attached to an item.
type |    | docs_pre :  | 
|    | docs_post :  | 
val empty_docs : docs
val docs_attr : docstring -> Parsetree.attribute
val add_docs_attrs : docs -> Parsetree.attributes -> Parsetree.attributesval symbol_docs : unit -> docsval symbol_docs_lazy : unit -> docs Lazy.t
val rhs_docs : int -> int -> docsval rhs_docs_lazy : int -> int -> docs Lazy.t
val mark_symbol_docs : unit -> unitval mark_rhs_docs : int -> int -> unit
    The Docstrings.info type represents documentation attached to a field or
    constructor.
typeinfo =docstring option
val empty_info : info
val info_attr : docstring -> Parsetree.attribute
val add_info_attrs : info -> Parsetree.attributes -> Parsetree.attributesval symbol_info : unit -> infoval rhs_info : int -> info
    The Docstrings.text type represents documentation which is not attached to
    anything.
typetext =docstring list
val empty_text : text
val empty_text_lazy : text Lazy.t
val text_attr : docstring -> Parsetree.attribute
val add_text_attrs : text -> Parsetree.attributes -> Parsetree.attributesval symbol_text : unit -> textval symbol_text_lazy : unit -> text Lazy.t
val rhs_text : int -> textval rhs_text_lazy : int -> text Lazy.t
    There may be additional text attached to the delimiters of a block
    (e.g. struct and end). This is fetched by the following
    functions, which are applied to the contents of the block rather
    than the delimiters.
val symbol_pre_extra_text : unit -> textval symbol_post_extra_text : unit -> textval rhs_pre_extra_text : int -> textval rhs_post_extra_text : int -> text