On Fri, Mar 16, 2007 at 02:07:50PM +0100, Zheng Li wrote:
> 
> Not sure if this is what you want:
> 
> # module type C = sig
>     module A: A
>     module B: B with module A = A
>   end;;
> module type C =
>   sig
>     module A : A
>     module B : sig module A : sig type t = A.t = A of int | B of string end end
>   end
Thanks a lot! That finally worked... after days of type contraints, the obvious solutions get somehow lost.

cheers

christian
> 
> Christian Sternagel <christian.sternagel@uibk.ac.at> writes:
> > module type A = sig
> >  type t = A of 'a | B of 'b
> > end
> >
> > module type B = sig
> >  module A : A
> > end
> >
> > Can I then do something like
> >
> > module type C = sig
> >  module B : B
> >  module A : A
> >   with type t = B.A.t = A of 'a | B of 'b
> > end
> >
> 
> -- 
> Zheng Li
> http://www.pps.jussieu.fr/~li
> 
> _______________________________________________
> Caml-list mailing list. Subscription management:
> http://yquem.inria.fr/cgi-bin/mailman/listinfo/caml-list
> Archives: http://caml.inria.fr
> Beginner's list: http://groups.yahoo.com/group/ocaml_beginners
> Bug reports: http://caml.inria.fr/bin/caml-bugs
>