CommentsForComparedCommit (p.awso.0.9.0.doc.awso.codecommit.Awso_codecommit.Values.CommentsForComparedCommit)

Sourcetype nonrec t = {

repositoryName : RepositoryName.t option;
(*
The name of the repository that contains the compared commits.
*)
beforeCommitId : CommitId.t option;
(*
The full commit ID of the commit used to establish the before of the comparison.
*)
afterCommitId : CommitId.t option;
(*
The full commit ID of the commit used to establish the after of the comparison.
*)
beforeBlobId : ObjectId.t option;
(*
The full blob ID of the commit used to establish the before of the comparison.
*)
afterBlobId : ObjectId.t option;
(*
The full blob ID of the commit used to establish the after of the comparison.
*)
location : Location.t option;
(*
Location information about the comment on the comparison, including the file name, line number, and whether the version of the file where the comment was made is BEFORE or AFTER.
*)
comments : Comments.t option;
(*
An array of comment objects. Each comment object contains information about a comment on the comparison between commits.
*)

}

val make : 
  ?repositoryName:??? ->
  ?beforeCommitId:??? ->
  ?afterCommitId:??? ->
  ?beforeBlobId:??? ->
  ?afterBlobId:??? ->
  ?location:??? ->
  ?comments:??? ->
  unit ->
  t

Source

val to_value : 
  t ->
  [> `Structure of
       (string
        * [> `List of
               [> `Structure of
                    (string
                     * [> `Boolean of IsCommentDeleted.t
                       | `List of [> `String of ReactionValue.t ] list
                       | `Map of
                         ([> `String of ReactionValue.t ]
                          * [> `Integer of Count.t ])
                           list
                       | `String of CommentId.t
                       | `Timestamp of CreationDate.t ])
                      list ]
                 list
          | `String of RepositoryName.t
          | `Structure of
            (string
             * [> `Enum of string | `Long of Position.t | `String of Path.t ])
              list ])
         list ]

Sourceval to_query : t -> Awso.Client.Query.t

Sourceval of_xml : Awso.Xml.t -> t

Sourceval of_string : string -> t

Sourceval of_json : Yojson.Safe.t -> t

Sourceval to_json : t -> Yojson.Safe.t