使用Aeson解析顶级值

Question

我正在尝试使用Aeson解析JSON值，并且到目前为止，解析对象或数组都没有问题，但是我无法让Aeson解析仅是字符串的JSON文档。

据我了解，由于RFC 7159值是合法的JSON文档，并且Aeson从0.9.0.0开始支持（我使用的是0.9.0.1），因此它应该可以工作。 例如，我包装了一个API，该API对于许多调用都将字符串作为顶级JSON文档返回，并且为了某些静态类型安全性，希望对这些字符串进行新类型化：

newtype Bar = Bar String deriving (Eq, Show)
instance FromJSON Bar where
    parseJSON (String v) = pure (Bar $ T.unpack v)
    parseJSON _ = mzero

如果我尝试解码某些内容：

decode "JustSomeRandomString" :: Maybe Bar

我所得到的只是Nothing回报。

有什么想法我做错了吗？ 当然，我可以在没有Aeson的情况下处理将字符串作为JSON文档返回的API调用，但是希望保持一致！

Answer 1

尝试decode "\\"JustSomeRandomString\\"" :: Maybe Bar