0

以下测试导致运行时异常:

test "search yields profile" <|
\_ ->
    let
        -- Setup
        location =
            Navigation.Location "" "" "" "" "" "" "" "" "" "" ""

        ( model, _ ) =
            Home.init location

        -- Test
        ( newState, _ ) =
            model |> Home.update (Search "Scott")

        -- Verify
        ( onlyOne, isContentProvider1 ) =
            ( (newState.contentProviders |> List.length) == 1
            , newState.contentProviders |> List.member contentProvider1
            )
    in
        Expect.equal (onlyOne && isContentProvider1) True
TypeError: Cannot read property 'href' of undefined
    at Object.getLocation (eval at <anonymous> (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:37),
<anonymous>:1392 6:17)
    at Function.eval (eval at <anonymous> (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:37),
<anonymous>:14127:43)
    at A2 (eval at <anonymous> (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:37),
<anonymous>:92:11)
    at eval (eval at <anonymous> (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:37),
<anonymous>:21270:31)
    at eval (eval at <anonymous> (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:37),
<anonymous>:22757:4)
    at my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:32
    at Object.evalElmCode (my_path\AppData\Roaming\npm\node_modules\elm-test\lib\runner.js:84:76)
    at my_path\AppData\Roaming\npm\node_modules\elm-test\bin\elm-test:196:14
    at my_path\AppData\Roaming\npm\node_modules\elm-test\node_modules\graceful-fs\graceful-fs.js:78:16
    at tryToString (fs.js:456:3)

我的预感是Navigaton.Location是例外。但是,我不知道如何解决这个问题。

源代码可以在GitHub上找到。

4

1 回答 1

1

我不知道你是否在 Elm Slack 上找到了这个问题的答案,但我花了一些时间研究这个问题并找到了问题的原因。

简而言之,问题在于将您的调用包含Navigation.program在使用 elm-test 运行的 Elm 文件中。在你的情况下,Navigation.programHome.elm. 将其移至不同的模块(或暂时将其注释掉),您的测试应该会运行。

更详细地说,背后的本机代码Navigation.program获取document.location并将其传递给您的init函数。但是,在运行 elm-test 时,您没有document对象,因为没有浏览器。elm-test 将组成一个骨架document对象,但该对象没有location属性,因此尝试获取时会抛出异常location.href

在elm-test包文档中对此效果有一些指导(“应用程序特定技术”下的第 1 点):

避免导入您的Main模块。您的大部分代码都属于其他模块,因此请导入它们。


或者,document.location现在已经在 elm-test 版本 0.18.9 中进行了 polyfill,因此升级到该版本也将解决此问题。

于 2017-07-07T21:02:15.060 回答