module Data.Poker.Definitions where import Foreign.C type StdDeck_CardMask = CLLong --data EnumResult -- = EnumResult { resultSamples :: Integer -- , resultPlayers :: [PlayerResult] } --data PlayerResult -- = PlayerResult { playerWins :: Integer -- , playerTies :: Integer -- , playerLosses :: Integer -- , playerEV :: Double }