RosettaCodeData/Task/Constrained-genericity/OCaml/constrained-genericity-3.ml
2024-10-16 18:07:41 -07:00

6 lines
164 B
OCaml

type banana = Foo (* a dummy type *)
module Banana : Eatable with type t = banana = struct
type t = banana
let eat _ = print_endline "I'm eating a banana"
end