diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/post.mli | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/lib/post.mli b/lib/post.mli new file mode 100644 index 0000000..9bf32ae --- /dev/null +++ b/lib/post.mli @@ -0,0 +1,31 @@ +type t = { + link : string; + summary : string; + tags : string list; + published : string; + author : string; +} + +type mastodon_tag = { kind : string; name : string; href : string } + +val mastodon_tag_of_yojson : Yojson.Safe.t -> mastodon_tag +val yojson_of_mastodon_tag : mastodon_tag -> Yojson.Safe.t + +type mastodon_object = { tag : mastodon_tag list } + +val mastodon_object_of_yojson : Yojson.Safe.t -> mastodon_object +val yojson_of_mastodon_object : mastodon_object -> Yojson.Safe.t + +type mastodon_post = { + actor : string; + published : string; + obj : mastodon_object; +} + +val mastodon_post_of_yojson : Yojson.Safe.t -> mastodon_post +val yojson_of_mastodon_post : mastodon_post -> Yojson.Safe.t +val post_of_mastodon_post : mastodon_post -> t +val get_tld : string -> string +val db : t list ref +val add : t -> unit +val get_all : unit -> t list |