Source

ocamlspot / tests / functor_parameter.ml

1
2
3
module F((* A => *) A  (* <= A *): sig val x : int end) = struct
  let y = A.x (* ? A *)
end