aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-08-19 14:43:39 +0200
committerŁukasz Hanuszczak <lukasz.hanuszczak@gmail.com>2015-08-22 23:40:28 +0200
commitacf526f68d0ecb3ddf4ddd6efcee7774cd8ffa54 (patch)
tree6ea861f124e38e052d691bbd3df4146e7f5c42be
parent5bc022f12e3f35c609a047ca96fe4e8117763b0b (diff)
Setup test suite for Hoogle backend.
-rw-r--r--haddock.cabal7
-rw-r--r--hoogle-test/Main.hs27
-rwxr-xr-xhoogle-test/run5
3 files changed, 39 insertions, 0 deletions
diff --git a/haddock.cabal b/haddock.cabal
index ea214869..aba0c394 100644
--- a/haddock.cabal
+++ b/haddock.cabal
@@ -144,6 +144,13 @@ test-suite latex-test
hs-source-dirs: latex-test
build-depends: base, filepath, haddock-test
+test-suite hoogle-test
+ type: exitcode-stdio-1.0
+ default-language: Haskell2010
+ main-is: Main.hs
+ hs-source-dirs: hoogle-test
+ build-depends: base, filepath, haddock-test
+
source-repository head
type: git
location: https://github.com/haskell/haddock.git
diff --git a/hoogle-test/Main.hs b/hoogle-test/Main.hs
new file mode 100644
index 00000000..9da20c36
--- /dev/null
+++ b/hoogle-test/Main.hs
@@ -0,0 +1,27 @@
+{-# LANGUAGE CPP #-}
+
+
+import System.Environment
+import System.FilePath
+
+import Test.Haddock
+
+
+checkConfig :: CheckConfig String
+checkConfig = CheckConfig
+ { ccfgRead = \_ input -> Just input
+ , ccfgDump = id
+ , ccfgEqual = (==)
+ }
+
+
+dirConfig :: DirConfig
+dirConfig = defaultDirConfig $ takeDirectory __FILE__
+
+
+main :: IO ()
+main = do
+ cfg <- parseArgs checkConfig dirConfig =<< getArgs
+ runAndCheck $ cfg
+ { cfgHaddockArgs = cfgHaddockArgs cfg ++ ["--hoogle"]
+ }
diff --git a/hoogle-test/run b/hoogle-test/run
new file mode 100755
index 00000000..5e17ad0f
--- /dev/null
+++ b/hoogle-test/run
@@ -0,0 +1,5 @@
+#!/bin/bash
+
+export HADDOCK_PATH=$(which haddock)
+LIB_PATH="$(dirname "$BASH_SOURCE")/../haddock-test/src/"
+runhaskell -i:"$LIB_PATH" "Main.hs" $@