Source file parameter_name.ml

1
2
3
4
5
6
7
open! Core0

type t = string [@@deriving bin_io, compare ~localize, sexp]

let%template equal = ([%compare.equal: t] [@mode local]) [@@mode __ = (global, local)]
let of_string n = n
let to_string n = n