[@@deriving subliner]
[%%subliner]
ppx_subliner
Ppx_subliner.Term
val suffix : string
val gen_name_str : string -> string