LINUX.ORG.RU

История изменений

Исправление theNamelessOne, (текущая версия) :

Засунь их в разные модули + qualified import.

Foo.hs:

module Foo where

data Foo = Baz deriving Show

Bar.hs:

module Bar where

data Bar = Baz deriving Show

Main.hs:

import qualified Foo as F
import qualified Bar as B

main = do
  print F.Baz
  print B.Baz

Исправление theNamelessOne, :

Засунь их в разные модули + qualified import.

Исходная версия theNamelessOne, :

Засунь их в разные модули.