eyedevelop/poker-ex
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Formatting.

Browse source
This commit is contained in:
Hans Goor 2024-08-15 20:37:29 +02:00
parent 4210670e9e
commit f32bff0ec5
Signed by: eyedevelop
SSH key fingerprint: SHA256:Td89veptDEwCV8J3fjqnknNk7SbwzedYhauyC2nFBYg
1 changed files with 26 additions and 22 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
poker_ex/lib/poker_ex/card.ex
View file

@ -114,13 +114,14 @@ defmodule PokerEx.Card do
def from_integers(suit, rank) do
suit = Enum.at(@valid_suits, suit)
{:ok, case rank do
n when n >= 2 and n <= 10 -> %Card{suit: suit, rank: n}
0x1 -> %Card{suit: suit, rank: :ace}
0xB -> %Card{suit: suit, rank: :jack}
0xD -> %Card{suit: suit, rank: :queen}
0xE -> %Card{suit: suit, rank: :king}
end}
{:ok,
case rank do
n when n >= 2 and n <= 10 -> %Card{suit: suit, rank: n}
0x1 -> %Card{suit: suit, rank: :ace}
0xB -> %Card{suit: suit, rank: :jack}
0xD -> %Card{suit: suit, rank: :queen}
0xE -> %Card{suit: suit, rank: :king}
end}
end
@doc ~S"""
@ -169,23 +170,26 @@ defmodule PokerEx.Card do
"""
@spec sigil_p(atom() | String.t(), [char()]) :: Card.t()
def sigil_p(<<suit::utf8, rank::binary>>, []) do
suit = case suit do
?S -> :spades
?H -> :hearts
?D -> :diamonds
?C -> :clubs
end
suit =
case suit do
?S -> :spades
?H -> :hearts
?D -> :diamonds
?C -> :clubs
end
rank =
case rank do
"A" -> :ace
"K" -> :king
"Q" -> :queen
"J" -> :jack
n -> String.to_integer(n)
end
rank = case rank do
"A" -> :ace
"K" -> :king
"Q" -> :queen
"J" -> :jack
n -> String.to_integer(n)
end
card = %Card{suit: suit, rank: rank}
if not valid? card do
if not valid?(card) do
raise "Invalid card!"
end