4

我有以下架构：

  backend
  ├── Chat.hs
  ├── Main.hs
  └── Message.hs
  test
  ├── backendSpec
  │   └── MessageSpec.hs
  └── Spec.hs

我的 .cabal 文件包含以下内容

test-suite spec
  build-depends:  base, hspec == 2.*,
                  snap >= 0.14.0.6,
                  containers,
                  aeson,
                  text,
                  transformers,
                  stm,
                  snap-core,
                  snap-server,
                  socket-io,
                  engine-io-snap,
                  snap-cors,
                  bytestring
  hs-source-dirs: test
  main-is: Spec.hs
  Type: exitcode-stdio-1.0

但是当我这样做时

stack test

HSpec 找不到我的测试 int MessageSpec.hs。

在 0.0002 秒内完成 0 个示例，0 个失败

Spec.hs 是正确的输入：{-# OPTIONS_GHC -F -pgmF hspec-discover #-}

我的 MessageSpec 模块正在公开：模块 MessageSpec (main, spec)。

你能帮我找到一种方法让我的堆栈项目完成我的所有测试吗？

谢谢，

4

1 回答 1

3

您的规范路径必须遵循模块名称约定。backendSpec.MessageSpec不是有效的模块名称，因为它以小写字母开头。

此外，您的规范的模块名称应该仅与Spec原始模块的附加后缀不同。你的模块backendSpec不会遵循这个：

module Message where ...
-- vs
module BackendSpec.MessageSpec where ...

因此，要解决此问题，请确保目录中的所有目录都test以大写字母开头。但更好的是，确保测试目录与您的目录具有相同的结构src，因为这将在您的测试期间产生更好的模块名称：

-- If file is test/BackendSpec/MessageSpec.hs
BackendSpec.Message:
   <someDescription>
      <some assertion>
      <some assertion>
      <some assertion>

对比

-- If file is test/MessageSpec.hs
Message:
   <someDescription>
      <some assertion>
      <some assertion>
      <some assertion>

（这个行为的相关代码可以在 中hspec/Run.hs找到hspec-discover）

于 2016-01-26T06:47:37.207 回答