Skip to content
Browse files

linkify issues

  • Loading branch information...
1 parent 4df4757 commit 3571be6c8689cc8af402e7de0c5bbf3b082f22ed @jrockway committed
Showing with 2 additions and 2 deletions.
  1. +1 −1 src/Cards.hs
  2. +1 −1 src/Plays.hs
View
2 src/Cards.hs
@@ -37,7 +37,7 @@ instance Show Suit where
allSuits = enumFrom Jade
--- TODO(jrockway): Support fractional ranks (issues/1).
+-- TODO(jrockway): Support fractional ranks (#1).
-- | Represents the rank of a card. Implements Num so you can use Integer
-- literals where a Rank is required.
View
2 src/Plays.hs
@@ -47,7 +47,7 @@ unwrapPlay (Wish x _) = unwrapPlay x
-- | Plays have ranks; the rank is the lowest card of a straight or cons pair,
-- the value of a single, pair, triple, or four-card bomb,
instance Ranked Play where
- rank (Single Phoenix) = 1 -- TODO(jrockway): Fix after issues/1 is resolved.
+ rank (Single Phoenix) = 1 -- TODO(jrockway): Fix after #1 is resolved.
rank (Single x) = rank x
rank (Multiple xs) = rank . arbitraryStandardCard $ xs
rank (Straight xs) = if Set.member Phoenix xs && min + len - 1 > 14 then

0 comments on commit 3571be6

Please sign in to comment.
Something went wrong with that request. Please try again.