hg_lib v0.16.0 · OCaml Package

val iter : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  node:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Open_hg_lib__.Hg_private.Node.Public.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      'a) ->
  parents:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `One of Open_hg_lib__.Hg_private.Node.Public.t
       | `Two of
         Open_hg_lib__.Hg_private.Node.Public.t
         * Open_hg_lib__.Hg_private.Node.Public.t
       | `Zero ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      'b) ->
  author:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'c) ->
  time:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Time_float_unix.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      'd) ->
  tags:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string list)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      'e) ->
  description:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'f) ->
  files:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `Files of string list | `Omitted ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      'g) ->
  'g

val fold : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  init:'a ->
  node:
    ('a ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        Open_hg_lib__.Hg_private.Node.Public.t)
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      'b) ->
  parents:
    ('b ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        [ `One of Open_hg_lib__.Hg_private.Node.Public.t
        | `Two of
          Open_hg_lib__.Hg_private.Node.Public.t
          * Open_hg_lib__.Hg_private.Node.Public.t
        | `Zero ])
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      'c) ->
  author:
    ('c ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        string)
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'd) ->
  time:
    ('d ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        Time_float_unix.t)
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      'e) ->
  tags:
    ('e ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        string list)
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      'f) ->
  description:
    ('f ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        string)
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'g) ->
  files:
    ('g ->
      ([< `Read | `Set_and_create ],
        Open_hg_lib__.Hg_private.Changeset_info.Public.t,
        [ `Files of string list | `Omitted ])
        Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      'h) ->
  'h

val for_all : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  node:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Open_hg_lib__.Hg_private.Node.Public.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      bool) ->
  parents:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `One of Open_hg_lib__.Hg_private.Node.Public.t
       | `Two of
         Open_hg_lib__.Hg_private.Node.Public.t
         * Open_hg_lib__.Hg_private.Node.Public.t
       | `Zero ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      bool) ->
  author:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      bool) ->
  time:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Time_float_unix.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      bool) ->
  tags:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string list)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      bool) ->
  description:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      bool) ->
  files:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `Files of string list | `Omitted ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      bool) ->
  bool

val exists : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  node:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Open_hg_lib__.Hg_private.Node.Public.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      bool) ->
  parents:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `One of Open_hg_lib__.Hg_private.Node.Public.t
       | `Two of
         Open_hg_lib__.Hg_private.Node.Public.t
         * Open_hg_lib__.Hg_private.Node.Public.t
       | `Zero ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      bool) ->
  author:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      bool) ->
  time:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Time_float_unix.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      bool) ->
  tags:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string list)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      bool) ->
  description:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      bool) ->
  files:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `Files of string list | `Omitted ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      bool) ->
  bool

val to_list : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  node:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Open_hg_lib__.Hg_private.Node.Public.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      'a) ->
  parents:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `One of Open_hg_lib__.Hg_private.Node.Public.t
       | `Two of
         Open_hg_lib__.Hg_private.Node.Public.t
         * Open_hg_lib__.Hg_private.Node.Public.t
       | `Zero ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      'a) ->
  author:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'a) ->
  time:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Time_float_unix.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      'a) ->
  tags:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string list)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      'a) ->
  description:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      'a) ->
  files:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `Files of string list | `Omitted ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      'a) ->
  'a list

val map : 
  Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
  node:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Open_hg_lib__.Hg_private.Node.Public.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t ->
      Open_hg_lib__.Hg_private.Node.Public.t) ->
  parents:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `One of Open_hg_lib__.Hg_private.Node.Public.t
       | `Two of
         Open_hg_lib__.Hg_private.Node.Public.t
         * Open_hg_lib__.Hg_private.Node.Public.t
       | `Zero ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ] ->
      [ `One of Open_hg_lib__.Hg_private.Node.Public.t
      | `Two of
        Open_hg_lib__.Hg_private.Node.Public.t
        * Open_hg_lib__.Hg_private.Node.Public.t
      | `Zero ]) ->
  author:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      string) ->
  time:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       Time_float_unix.t)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      Time_float_unix.t ->
      Time_float_unix.t) ->
  tags:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string list)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string list ->
      string list) ->
  description:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       string)
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      string ->
      string) ->
  files:
    (([< `Read | `Set_and_create ],
       Open_hg_lib__.Hg_private.Changeset_info.Public.t,
       [ `Files of string list | `Omitted ])
       Fieldslib.Field.t_with_perm ->
      Open_hg_lib__.Hg_private.Changeset_info.Public.t ->
      [ `Files of string list | `Omitted ] ->
      [ `Files of string list | `Omitted ]) ->
  Open_hg_lib__.Hg_private.Changeset_info.Public.t

val set_all_mutable_fields : 'a -> unit

package hg_lib