1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
type snowflake <ocaml from="Snowflake" t="t"> = abstract type role = { id: snowflake; name: string; colour <json name="color">: int; hoist: bool; position: int; permissions: int; managed: bool; mentionable: bool; } type role_update = { role: role; id <json name="guild_id">: snowflake; } type t = { inherit role; guild_id: snowflake; }