package github
GitHub APIv3 OCaml library
Install
Dune Dependency
Authors
Maintainers
Sources
github-4.0.0.tbz
sha256=cb0956f634d6a9cd3d62b3d7a4bbb67258c3cd397ce6679d7fc04b630dbafeb8
md5=6aac5e6fefb29582ad452ef21ceffdea
doc/src/github/github_json.ml.html
Source file github_json.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116
(* Adapters used by atdgen to turn Github's representation of variants into an ATD-compatible representation. *) module Adapter = struct module Ref = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "ref_type" let value_field_name = "ref" let = None end) module Payload = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "type" let value_field_name = "payload" let = None end) module Issue_comment_event = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "action" let value_field_name = "changes" let = Some (["created"; "edited"; "deleted"], "Unknown") end) module Issues_event = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "action" let value_field_name = "changes" let = Some ( [ "assigned"; "unassigned"; "labeled"; "unlabeled"; "opened"; "edited"; "closed"; "reopened"; ], "Unknown" ) end) module Pull_request_event = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "action" let value_field_name = "changes" let = Some ( [ "assigned"; "unassigned"; "labeled"; "unlabeled"; "opened"; "edited"; "closed"; "reopened"; "synchronize"; ], "Unknown" ) end) module Pull_request_review_comment_event = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "action" let value_field_name = "changes" let = Some (["created"; "edited"; "deleted"], "Unknown") end) module Event = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "type" let value_field_name = "payload" let = Some ( [ "CommitCommentEvent"; "CreateEvent"; "DeleteEvent"; "DownloadEvent"; "FollowEvent"; "ForkEvent"; "ForkApplyEvent"; "GistEvent"; "GollumEvent"; "IssueCommentEvent"; "IssuesEvent"; "MemberEvent"; "PublicEvent"; "PullRequestEvent"; "PullRequestReviewCommentEvent"; "PushEvent"; "ReleaseEvent"; "RepositoryEvent"; "StatusEvent"; "WatchEvent"; ], "Unknown" ) end) module Hook = Atdgen_runtime.Json_adapter.Type_and_value_fields.Make (struct let type_field_name = "name" let value_field_name = "config" let = Some (["web"], "Unknown") end) end
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>