sig
val ns_batch : string
module LastModifiedBy : GdataAtom.PersonConstruct
module type FeedLink =
sig
type feed_t
type t = {
countHint : int;
href : string;
readOnly : bool;
rel : string;
feed : GdataExtensions.FeedLink.feed_t;
}
val countHint : (GdataExtensions.FeedLink.t, int) GapiLens.t
val href : (GdataExtensions.FeedLink.t, string) GapiLens.t
val readOnly : (GdataExtensions.FeedLink.t, bool) GapiLens.t
val rel : (GdataExtensions.FeedLink.t, string) GapiLens.t
val feed :
(GdataExtensions.FeedLink.t, GdataExtensions.FeedLink.feed_t)
GapiLens.t
val empty : t
val to_xml_data_model : t -> GdataCore.xml_data_model list
val of_xml_data_model : t -> GdataCore.xml_data_model -> t
end
module MakeFeedLink :
functor (Feed : GdataAtom.Feed) ->
sig
type feed_t = Feed.t
type t = {
countHint : int;
href : string;
readOnly : bool;
rel : string;
feed : GdataExtensions.MakeFeedLink.feed_t;
}
val countHint : (GdataExtensions.MakeFeedLink.t, int) GapiLens.t
val href : (GdataExtensions.MakeFeedLink.t, string) GapiLens.t
val readOnly : (GdataExtensions.MakeFeedLink.t, bool) GapiLens.t
val rel : (GdataExtensions.MakeFeedLink.t, string) GapiLens.t
val feed :
(GdataExtensions.MakeFeedLink.t,
GdataExtensions.MakeFeedLink.feed_t)
GapiLens.t
val empty : t
val to_xml_data_model : t -> GdataCore.xml_data_model list
val of_xml_data_model : t -> GdataCore.xml_data_model -> t
end
module Rel :
sig
type t =
[ `Alternate
| `Batch
| `Edit
| `EditMedia
| `Feed
| `Post
| `ResumableCreateMedia
| `ResumableEditMedia
| `Self ]
val to_string : [> GdataExtensions.Rel.t ] -> string
end
val get_extensions_prefix : string -> string
end