sig
module Posts :
sig
type t = { selfLink : string; totalItems : int; }
val selfLink : (GapiBloggerV2Model.Blog.Posts.t, string) GapiLens.t
val totalItems : (GapiBloggerV2Model.Blog.Posts.t, int) GapiLens.t
val empty : GapiBloggerV2Model.Blog.Posts.t
val render :
GapiBloggerV2Model.Blog.Posts.t -> GapiJson.json_data_model list
val parse :
GapiBloggerV2Model.Blog.Posts.t ->
GapiJson.json_data_model -> GapiBloggerV2Model.Blog.Posts.t
end
module Pages :
sig
type t = { selfLink : string; totalItems : int; }
val selfLink : (GapiBloggerV2Model.Blog.Pages.t, string) GapiLens.t
val totalItems : (GapiBloggerV2Model.Blog.Pages.t, int) GapiLens.t
val empty : GapiBloggerV2Model.Blog.Pages.t
val render :
GapiBloggerV2Model.Blog.Pages.t -> GapiJson.json_data_model list
val parse :
GapiBloggerV2Model.Blog.Pages.t ->
GapiJson.json_data_model -> GapiBloggerV2Model.Blog.Pages.t
end
module Locale :
sig
type t = { country : string; language : string; variant : string; }
val country : (GapiBloggerV2Model.Blog.Locale.t, string) GapiLens.t
val language : (GapiBloggerV2Model.Blog.Locale.t, string) GapiLens.t
val variant : (GapiBloggerV2Model.Blog.Locale.t, string) GapiLens.t
val empty : GapiBloggerV2Model.Blog.Locale.t
val render :
GapiBloggerV2Model.Blog.Locale.t -> GapiJson.json_data_model list
val parse :
GapiBloggerV2Model.Blog.Locale.t ->
GapiJson.json_data_model -> GapiBloggerV2Model.Blog.Locale.t
end
type t = {
description : string;
id : int64;
kind : string;
locale : GapiBloggerV2Model.Blog.Locale.t;
name : string;
pages : GapiBloggerV2Model.Blog.Pages.t;
posts : GapiBloggerV2Model.Blog.Posts.t;
published : GapiDate.t;
selfLink : string;
updated : GapiDate.t;
url : string;
}
val description : (GapiBloggerV2Model.Blog.t, string) GapiLens.t
val id : (GapiBloggerV2Model.Blog.t, int64) GapiLens.t
val kind : (GapiBloggerV2Model.Blog.t, string) GapiLens.t
val locale :
(GapiBloggerV2Model.Blog.t, GapiBloggerV2Model.Blog.Locale.t) GapiLens.t
val name : (GapiBloggerV2Model.Blog.t, string) GapiLens.t
val pages :
(GapiBloggerV2Model.Blog.t, GapiBloggerV2Model.Blog.Pages.t) GapiLens.t
val posts :
(GapiBloggerV2Model.Blog.t, GapiBloggerV2Model.Blog.Posts.t) GapiLens.t
val published : (GapiBloggerV2Model.Blog.t, GapiDate.t) GapiLens.t
val selfLink : (GapiBloggerV2Model.Blog.t, string) GapiLens.t
val updated : (GapiBloggerV2Model.Blog.t, GapiDate.t) GapiLens.t
val url : (GapiBloggerV2Model.Blog.t, string) GapiLens.t
val empty : GapiBloggerV2Model.Blog.t
val render : GapiBloggerV2Model.Blog.t -> GapiJson.json_data_model list
val parse :
GapiBloggerV2Model.Blog.t ->
GapiJson.json_data_model -> GapiBloggerV2Model.Blog.t
val to_data_model : GapiBloggerV2Model.Blog.t -> GapiJson.json_data_model
val of_data_model : GapiJson.json_data_model -> GapiBloggerV2Model.Blog.t
end