module Docstrings: sig
.. end
type
docstring = {
|
ds_body : string ; |
|
ds_loc : Location.t ; |
}
val docstring : string -> Location.t -> docstring
val docstring_body : docstring -> string
val docstring_loc : docstring -> Location.t
type
docs = {
}
val empty_docs : docs
val docs_attr : docstring ->
string Location.loc * Ast_402.Parsetree.payload
val add_docs_attrs : docs ->
(string Location.loc * Ast_402.Parsetree.payload) list ->
(string Location.loc * Ast_402.Parsetree.payload) list
type
info = docstring option
val empty_info : 'a option
val info_attr : docstring ->
string Location.loc * Ast_402.Parsetree.payload
val add_info_attrs : docstring option ->
(string Location.loc * Ast_402.Parsetree.payload) list ->
(string Location.loc * Ast_402.Parsetree.payload) list
type
text = docstring list
val empty_text : 'a list
val text_attr : docstring ->
string Location.loc * Ast_402.Parsetree.payload
val add_text_attrs : docstring list ->
(string Location.loc * Ast_402.Parsetree.payload) list ->
(string Location.loc * Ast_402.Parsetree.payload) list