1 2 3 4 5 6 7 8 9 10 11 12 13
(* TEST flags = "-i -w +63" * setup-ocamlc.byte-build-env ** ocamlc.byte *** check-ocamlc.byte-output *) type t = A module B = struct type t = B let f A = B end