我刚刚开始做一些Yesod + Haskell的东西。 是jsonToRepJson破或什么的?jsonToRepJson是否被破坏?
我在下面做了这段代码,但是我总是在jsonToRepJson部分出错。 它似乎没有得到预期的类型?
任何帮助将是巨大的!感谢:3
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}
import Yesod
import Data.Text
data APP = APP
instance Yesod APP
mkYesod "APP" [parseRoutes|
/TestR GET
|]
getTestR :: Handler RepJson
getTestR = jsonToRepJson $ object ["test".= ("test"::Text)]
main::IO()
main = warpDebug 3001 APP
这是我所得到的,当我使用runhaskell
api.hs:18:12:
Couldn't match expected type `RepJson' with actual type `Value'
Expected type: Handler RepJson
Actual type: HandlerT APP IO Value
In the expression:
jsonToRepJson $ object ["test" .= ("test" :: Text)]
In an equation for `getTestR':
getTestR = jsonToRepJson $ object ["test" .= ("test" :: Text)]
您的'在这里是多余的,最后一个应用程序运算符($)也是多余的,您不应该再使用jsonToRepJson,因为它已被弃用;-) –