История изменений
Исправление theNamelessOne, (текущая версия) :
Засунь их в разные модули + qualified import.
Foo.hs:
module Foo where
data Foo = Baz deriving ShowBar.hs:
module Bar where
data Bar = Baz deriving ShowMain.hs:
import qualified Foo as F
import qualified Bar as B
main = do
print F.Baz
print B.BazИсправление theNamelessOne, :
Засунь их в разные модули + qualified import.
Исходная версия theNamelessOne, :
Засунь их в разные модули.