Source file comment_response.ml

1
2
3
4
5
6
7
8
open! Core_kernel
open Thing

type t =
  { link : Thing.Link.t
  ; comment_forest : [ `Comment of Comment.t | `More_comments of More_comments.t ] list
  }
[@@deriving sexp]