Source file parameter_name.ml

1
2
3
4
5
6
7
open Base

type t = string [@@deriving compare, sexp]

let equal = [%compare.equal: t]
let of_string n = n
let to_string n = n