3
4

1 に答える 1

5

あなたのエラーは

Just msg → return $ reply token msg "Testing!"

君は調子がいいね

EitherT ServantErr IO Message

モナドだreplyが型を持っている

reply :: Token → Message → Text → IO Message

次に、liftそのIOアクションをモナドに入れるだけで機能します

postWebhook :: Token → Update → BotHandler Message
postWebhook token update = case message update of
  Just msg → lift $ reply token msg "Testing!"
  Nothing  → left err400

(ここに含まれるすべてのことを説明するのは簡単ではありません) これらの複雑な例の前に、モナド、トランスフォーマーなどについてもっと練習する必要があると思いますが、あなたは勇敢です! :)

于 2016-02-11T14:13:07.537 に答える