私は通常、独自のToJSON
andFromJSON
インスタンスを作成しますderiveJSON
が、非常に単純だったので、型を使用することにしました。
data Priority = HIGH | MEDIUM | LOW deriving Show
$(deriveToJSON id ''Priority)
main = BS.putStrLn . encode $ HIGH
JSON
派生が列挙型を文字列として書き出すだけだと思っていたでしょう。代わりに、それはハッシュの鍵です!{"HIGH":[]}
なぜこれがデフォルトの動作なのですか?