hanabi-dealer-0.4.0.0: server.hs
import Game.Hanabi.Backend
import Game.Hanabi.VersionInfo
import Game.Hanabi.Strategies.SimpleStrategy hiding (main)
main = server defOpt{strategies=strs}
strs :: [(String, IO (DynamicStrategy IO))]
strs = [
("Stupid example strategy", return $ mkDS "Stupid example strategy" S)
-- x , ("Sontakki", return $ mkDS "Sontakki" (Sontakki emptyDefault))
]