hanafuda
/
lib
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Derive an instance of Read for Yaku to allow making a proper FromJSONKey instance of it in APILanguage

This commit is contained in:
Tissevert 2019-08-20 14:19:31 +02:00
parent e037748199
commit f45d3a383e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Hanafuda/KoiKoi/Yaku.hs
View File

@ -18,7 +18,7 @@ data Yaku =
| TsukimiZake
| HanamiZake
| TsukiFuda
deriving (Eq, Ord, Show)
deriving (Eq, Ord, Read, Show)
type YakuRater = Pack -> Maybe Points
type Score = M.Map Yaku Points