Question

我有一个带有文件stapro

的stackproject app/Main.hs

module Main where

import Lib

main = putStrLn "This is main" 

foo::Int ->Int
foo = (+1)

和文件test/Spec.hs

module Spec where

import Test.HUnit
import Main (foo)

main :: IO ()
main = putStrLn "Test suite not yet implemented"

testFoo :: Test
testFoo = TestCase $ assertEqual "Should return 2" 2 (foo 1)

当我尝试执行测试时

$ stack test
While constructing the BuildPlan the following exceptions were encountered:

--  While attempting to add dependency,
    Could not find package Main in known packages

--  Failure when adding dependencies:    
      Main: needed (-any), stack configuration has no specified version
    needed for package stapro-0.1.0.0

我的.cabal文件是

name:                stapro
version:             0.1.0.0
...
build-type:          Simple
-- extra-source-files:
cabal-version:       >=1.10

library
  hs-source-dirs:      src
  exposed-modules:     Lib
  build-depends:       base >= 4.7 && < 5
  default-language:    Haskell2010

executable stapro-exe
  hs-source-dirs:      app
  main-is:             Main.hs
  ghc-options:         -threaded -rtsopts -with-rtsopts=-N
  build-depends:       base
                     , stapro
  default-language:    Haskell2010

test-suite stapro-test
  type:                exitcode-stdio-1.0
  hs-source-dirs:      test
  main-is:             Spec.hs
  build-depends:       base
                     , stapro
                     , HUnit
                     , Main
  ghc-options:         -threaded -rtsopts -with-rtsopts=-N
  default-language:    Haskell2010

...

Answer 1

看起来您正在尝试依赖Main部分build-depends中的可执行文件test-suite，以便您可以在测试套件中对其进行测试。这不起作用，事实上你根本无法真正测试你的可执行文件。

从Main移除build-depends。将您要测试的所有代码移动到库中。

如何在Stack中使用HUnit

1 个答案: