mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-18 04:11:49 +03:00
152 lines
3.2 KiB
Plaintext
152 lines
3.2 KiB
Plaintext
:: This library includes parsing functions for the json objects
|
|
:: that Github's API produces. In general, the conversion from
|
|
:: JSON to urbit types should be performed in marks, so those
|
|
:: marks should include this library.
|
|
::
|
|
/- gh
|
|
|%
|
|
++ repository
|
|
^- $-(json (unit repository:gh))
|
|
=+ jo
|
|
%- ot :~
|
|
'id'^id
|
|
'name'^so
|
|
'full_name'^so
|
|
'owner'^user
|
|
'private'^bo
|
|
'html_url'^so
|
|
'description'^so
|
|
'fork'^bo
|
|
'url'^so
|
|
'forks_url'^so
|
|
'keys_url'^so
|
|
'collaborators_url'^so
|
|
'teams_url'^so
|
|
'hooks_url'^so
|
|
'issue_events_url'^so
|
|
'events_url'^so
|
|
'assignees_url'^so
|
|
'branches_url'^so
|
|
'tags_url'^so
|
|
'blobs_url'^so
|
|
'git_tags_url'^so
|
|
'git_refs_url'^so
|
|
'trees_url'^so
|
|
'statuses_url'^so
|
|
'languages_url'^so
|
|
'stargazers_url'^so
|
|
'contributors_url'^so
|
|
'subscribers_url'^so
|
|
'subscription_url'^so
|
|
'commits_url'^so
|
|
'git_commits_url'^so
|
|
'comments_url'^so
|
|
'issue_comment_url'^so
|
|
'contents_url'^so
|
|
'compare_url'^so
|
|
'merges_url'^so
|
|
'archive_url'^so
|
|
'downloads_url'^so
|
|
'issues_url'^so
|
|
'pulls_url'^so
|
|
'milestones_url'^so
|
|
'notifications_url'^so
|
|
'labels_url'^so
|
|
'releases_url'^so
|
|
'created_at'^so
|
|
'updated_at'^so
|
|
'pushed_at'^so
|
|
'git_url'^so
|
|
'ssh_url'^so
|
|
'clone_url'^so
|
|
'svn_url'^so
|
|
'homepage'^some
|
|
'size'^ni
|
|
'stargazers_count'^ni
|
|
'watchers_count'^ni
|
|
'language'^some
|
|
'has_issues'^bo
|
|
'has_downloads'^bo
|
|
'has_wiki'^bo
|
|
'has_pages'^bo
|
|
'forks_count'^ni
|
|
'mirror_url'^some
|
|
'open_issues_count'^ni
|
|
'forks'^ni
|
|
'open_issues'^ni
|
|
'watchers'^ni
|
|
'default_branch'^so
|
|
==
|
|
++ user
|
|
^- $-(json (unit user:gh))
|
|
=+ jo
|
|
%- ot :~
|
|
'login'^so
|
|
'id'^id
|
|
'avatar_url'^so
|
|
'gravatar_id'^so
|
|
'url'^so
|
|
'html_url'^so
|
|
'followers_url'^so
|
|
'following_url'^so
|
|
'gists_url'^so
|
|
'starred_url'^so
|
|
'subscriptions_url'^so
|
|
'organizations_url'^so
|
|
'repos_url'^so
|
|
'events_url'^so
|
|
'received_events_url'^so
|
|
'type'^so
|
|
'site_admin'^bo
|
|
==
|
|
++ issue
|
|
^- $-(json (unit issue:gh))
|
|
|= jon/json
|
|
=- (bind - |*(issue/* `issue:gh`[jon issue]))
|
|
%. jon
|
|
=+ jo
|
|
%- ot :~
|
|
'url'^so
|
|
'labels_url'^so
|
|
'comments_url'^so
|
|
'events_url'^so
|
|
'html_url'^so
|
|
'id'^id
|
|
'number'^ni
|
|
'title'^so
|
|
'user'^user::|+(* (some *user:gh))
|
|
'labels'^(ar label)::|+(* (some *(list label:gh)))::(ar label)
|
|
'state'^so
|
|
'locked'^bo
|
|
'assignee'^(mu user)::|+(* (some *(unit user:gh)))::(mu user)
|
|
'milestone'^some
|
|
'comments'^ni
|
|
'created_at'^so
|
|
'updated_at'^so
|
|
'closed_at'^(mu so)
|
|
'body'^so
|
|
==
|
|
++ label
|
|
^- $-(json (unit label:gh))
|
|
=+ jo
|
|
%- ot :~
|
|
'url'^so
|
|
'name'^so
|
|
'color'^so
|
|
==
|
|
++ comment
|
|
^- $-(json (unit comment:gh))
|
|
=+ jo
|
|
%- ot :~
|
|
'url'^so
|
|
'html_url'^so
|
|
'issue_url'^so
|
|
'id'^id
|
|
'user'^user
|
|
'created_at'^so
|
|
'updated_at'^so
|
|
'body'^so
|
|
==
|
|
++ id no:jo
|
|
--
|