Name collisions

Hi all

I think this is a hugs bug, but the logic behind the rules in this sort
of case is a bit lost on me.



> module A (foo) where

> foo :: Int
> foo = 5



> module B (foo) where

> import A

> foo :: Int
> foo = 4



ghci says:

B.lhs:2:
    Ambiguous occurrence `foo'
    It could refer to either `A.foo', imported from A at B.lhs:4
                                        (defined at A.lhs:5)
                          or `B.foo', defined at B.lhs:7


hugs (CVS) says:

Hugs session for:
/home/igloo/local/hugs/lib/hugs/libraries/Hugs/Prelude.hs
/home/igloo/local/hugs/lib/hugs/libraries/Prelude.hs
A.lhs
B.lhs
Type :? for help
B> foo
4
B> 

ghci allows it if foo is not in the export list or there is no export
list.


Thanks
Ian