Merge #160

160: Type hint, add debug statements r=charleskawczynski a=charleskawczynski

Peel off from #144

Co-authored-by: Charles Kawczynski <kawczynski.charles@gmail.com>

src/TexasHoldem.jl

@@ -14,6 +14,7 @@ A no-limit Texas Holdem simulator.
 module TexasHoldem
 
 using PlayingCards
+using PlayingCards: Card
 using PokerHandEvaluator
 using Printf
 

src/game.jl

@@ -240,6 +240,11 @@ function _deal_and_play!(game::Game)
     @cdebug logger "initial_brs = $(initial_brs)"
     @cdebug logger "bank_roll.(players_at_table(table)) = $(bank_roll.(players_at_table(table)))"
 
+    @cdebug logger begin
+        if !(initial_∑brs ≈ sum(x->bank_roll(x), players_at_table(table)))
+            @cinfo logger "initial_∑brs=$initial_∑brs, brs=$(bank_roll.(players_at_table(table)))"
+        end
+    end
     @assert initial_∑brs ≈ sum(x->bank_roll(x), players_at_table(table)) # eventual assertion
     @assert sum(sp->amount(sp), table.transactions.side_pots) ≈ 0
 

src/table.jl

@@ -459,7 +459,7 @@ function deal!(table::Table, blinds::Blinds)
 
         not_playing(player) && continue
 
-        player.cards = pop!(table.deck, Val(2))
+        player.cards = pop!(table.deck, Val(2))::Tuple{Card, Card}
 
         if is_small_blind(table, player) && bank_roll(player) ≤ blinds.small
             contribute!(table, player, bank_roll(player), call_blinds)
@@ -480,7 +480,8 @@ function deal!(table::Table, blinds::Blinds)
         end
     end
 
-    table.cards = get_table_cards!(table.deck)
+    table.cards = get_table_cards!(table.deck)::Tuple{Card,Card,Card,Card,Card}
     @cinfo logger "Table cards dealt (face-down)."
+    @cdebug logger "Post-blinds bank roll summary: $(bank_roll.(players))"
 end