json - 如何将字符串解析为 float ？

Question

我需要使用代表 float 的 json 源s 为 string s*，我不知道怎么做。

这几乎很容易:

Json.Decode.map String.toFloat Json.Decode.string

但是，这会产生 Maybe Float如果它无法解码字符串，我宁愿它完全失败。

(*) 这样做的原因是真正的数据类型是十进制，所以 "1.5"!= "1.50"。不过，我的应用程序不必关心。

Answer 1

您可以安装 elm-community/json-extra 并使用 Json.Decode.Extra.parseFloat

或者只是复制它的实现

fromMaybe : String -> Maybe a -> Decode.Decoder a
fromMaybe error val =
    case val of
        Just v ->
            Decode.succeed v

        Nothing ->
            Decode.fail error

parseFloat : Decode.Decoder Float
parseFloat =
    Decode.string |> Decode.andThen (String.toFloat >> fromMaybe "failed to parse as float")