2

我正在研究 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 语句应该解决这个问题。有谁知道如何解决这个错误?

4

0 回答 0