package git

You can search for identifiers within the package.

in-package search v0.2.0

Git format and protocol in pure OCaml

Install

Dune Dependency

github.com Readme Changelog ISC License Edit opam file Versions (36)

Authors

T

Thomas Gazagnaire

Maintainers

Sources

git-3.18.0.tbz

sha256=925795627e6daae0b4bd16aa506879df11cb201e65fefe38e81378f18d517d4b

sha512=8e407d49808ec26445b0c706f7b010b35050d274b534e265487cb82bcac1f29cd5c41365851d42f84794ddbceb57b90143768a23154117e902b45419d156c410

doc/neg/Neg/index.html

Module `Neg`Source

Negotiation engine used to fetch objects from a Git repository.

This implementation does not have any Git logics or how to store properly a Git object. However, it implements the negotiation engine used to fetch objects from a Git repository.

Finally, it needs fews primitives to properly receive Git objects from the state of a local Git repository:

exists which tells to us if an object exists or not.
parents to get parents of a commit.
deref to de-reference a given reference.
locals to get locals references of the Git repository.

The user must give to us a light store which is able to keep some mutable values used by the negotiation engine.

find_common talks directly to the remote Git repository.

Sourcetype configuration = {

stateless : bool;
mutable multi_ack : [ `None | `Some | `Detailed ];
no_done : bool;

}

Sourcetype 'uid hex = {

to_hex : 'uid -> string;
of_hex : string -> 'uid;
compare : 'uid -> 'uid -> int;

}

Sourcetype 'uid negotiator

Sourceval make : compare:('uid -> 'uid -> int) -> 'uid negotiator

Source

val find_common : 
  's Sigs.scheduler ->
  ('flow, 'error, 's) Sigs.flow ->
  'flow ->
  configuration ->
  'uid hex ->
  ('uid, 'ref, 'uid * int Stdlib.ref * int64, 'g, 's) Sigs.access ->
  ('uid, 'uid * int Stdlib.ref * int64, 'g) Sigs.store ->
  'uid negotiator ->
  Smart.Context.t ->
  ?deepen:[ `Depth of int | `Timestamp of int64 ] ->
  'uid list ->
  ([ `Continue of int | `Close ], 's) Sigs.io