Shift (odoc.odoc_document.Odoc_document.Doctree.Shift)

Sourcetype state = {

englobing_level : int;
current_level : int;

}

Sourceval start : state

Sourceval shift : state -> int -> state * int

Sourceval enter : state -> int -> state

val walk_documentedsrc : 
  on_sub:
    ([> `Include of Types.Include.t | `Page of Types.Subpage.t ] -> int option) ->
  state ->
  Types.DocumentedSrc.t ->
  Types.DocumentedSrc.t

Source

val subpage : 
  on_sub:
    ([> `Include of Types.Include.t | `Page of Types.Subpage.t ] -> int option) ->
  state ->
  Types.Subpage.t ->
  Types.Subpage.t

Source

val include_ : 
  on_sub:
    ([> `Include of Types.Include.t | `Page of Types.Subpage.t ] -> int option) ->
  state ->
  Types.Include.t ->
  Types.Include.t

Source

val walk_item : 
  on_sub:
    ([> `Include of Types.Include.t | `Page of Types.Subpage.t ] -> int option) ->
  state ->
  Types.Item.t list ->
  Types.Item.t list

Source

val compute : 
  on_sub:
    ([> `Include of Types.Include.t | `Page of Types.Subpage.t ] -> int option) ->
  Types.Item.t list ->
  Types.Item.t list