我正在研究 github 页面上的 reflex-frp 示例,并被困在 Dynamics and Events 部分。我尝试使用 ghcjs 编译以下代码:
{-# LANGUAGE OverloadedStrings #-}
import Reflex
import Reflex.Dom
main = mainWidget $ el "div" $ do
t <- textInput def
text "Last key pressed: "
let keypressEvent = fmap show $ _textInput_keypress t
keypressDyn <- holdDyn "None" keypressEvent
dynText keypressDyn
但我得到了错误
eventTest.hs:11:13: error:
• Couldn't match type ‘[Char]’ with ‘Data.Text.Internal.Text’
Expected type: Dynamic
(SpiderTimeline Global) Data.Text.Internal.Text
Actual type: Dynamic (SpiderTimeline Global) String
我知道字符串应该被解析为 Data.Text.Internal.Text,但不知道如何做到这一点 - 我认为顶部的 OverloadedStrings 语句应该解决这个问题。有谁知道如何解决这个错误?