accessor_sign.ml
accessor_base
1 2 3 4 5 6 7 8 open! Base open! Import type t = Sign.t = | Neg | Zero | Pos [@@deriving accessors]
1 2 3 4 5 6 7 8
open! Base open! Import type t = Sign.t = | Neg | Zero | Pos [@@deriving accessors]