From c50c43698af9b4291f1e63154d19123ed89b8f10 Mon Sep 17 00:00:00 2001
From: Frederick Yin <fkfd@fkfd.me>
Date: Sun, 8 Jan 2023 20:11:30 +0800
Subject: beginRounds and beginTurn are better names

---
 Main.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Main.hs')

diff --git a/Main.hs b/Main.hs
index 1992399..7e66efa 100644
--- a/Main.hs
+++ b/Main.hs
@@ -9,7 +9,7 @@ import Game (Game(..),
              discardPile,
              prompt,
              dealCards,
-             nextRound,
+             beginRounds,
             )
 import Player (Player(..))
 import qualified Player as P
@@ -33,5 +33,5 @@ main = do
                     , discardPile = discard
                     }
 
-    nextRound 1 $ dealCards 6 game
+    beginRounds 1 $ dealCards 6 game
     print ()
-- 
cgit v1.2.3