AFAIK you are allowed to shadow just about anything in
implementations. If you wanted to keep the exact same interface but
retain the ability to avvoid the shadowing issue on the labels you
could do:

module Foo = struct
  type t = Foo
end
type foo = Foo.t = Foo

module Foo2 = struct
  type t = Foo | Bar
end

type foo2 = Foo2.t = Foo | Bar

HTH,
Till

On Mon, May 31, 2010 at 10:46 AM, Jacques Carette <carette@mcmaster.ca> wrote:
> type foo = Foo
> let x = Foo
>
> type foo2 = Foo | Bar
> let y = Foo
> let z = (x,y) ;;
>
> I thought that re-using of algebraic labels was not allowed - but apparently
> it is?  Note that this means that it is impossible to "text" print such
> structures and hope to recover them uniquely.  This also causes very subtle
> issues when Marshal'ing, and grave issues for code generation [think
> metaocaml].
>
> Jacques
>
> _______________________________________________
> 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
>