1 2 3 4 5 6
open Core type t = { reason: string [@default ""]; user: User_t.t; } [@@deriving sexp, yojson { strict = false}]