Bring test suite up to date

test/data/annotations/With.hs

@@ -0,0 +1,6 @@
+module Main where
+
+{-# ANN module ["this", "can", "be", "anything"] #-}
+
+main :: IO ()
+main = putStrLn "Hello world!"

test/data/cabal-project/.cabal-sandbox/i386-osx-ghc-7.6.3-packages.conf.d/Cabal-1.18.1.3-2b161c6bf77657aa17e1681d83cb051b.conf

@@ -0,0 +1,4 @@
+name: Cabal
+version: 1.18.1.3
+id: Cabal-1.18.1.3-2b161c6bf77657aa17e1681d83cb051b
+exposed: True

test/data/cabal-project/Baz.hs

@@ -0,0 +1,5 @@
+{-# LANGUAGE QuasiQuotes #-}
+module Baz (baz) where
+import Foo (fooQ)
+
+baz = [fooQ| foo bar baz |]

test/data/cabal-project/Foo.hs

@@ -0,0 +1,9 @@
+module Foo (foo, fooQ) where
+import Language.Haskell.TH
+import Language.Haskell.TH.Quote (QuasiQuoter(..))
+
+foo :: ExpQ
+foo = stringE "foo"
+
+fooQ :: QuasiQuoter
+fooQ = QuasiQuoter (litE . stringL) undefined undefined undefined

test/data/cabal-project/Info.hs

@@ -0,0 +1,8 @@
+{-# LANGUAGE TemplateHaskell #-} -- for HscInterpreted
+
+module Info () where
+
+fib :: Int -> Int
+fib 0 = 0
+fib 1 = 1
+fib n = fib (n - 1) + fib (n - 2)

test/data/cabal-project/Main.hs

@@ -0,0 +1,3 @@
+import Bar (bar)
+
+main = putStrLn bar

test/data/cabal-project/cabal.sandbox.config.in

@@ -0,0 +1,25 @@
+-- This is a Cabal package environment file.
+-- THIS FILE IS AUTO-GENERATED. DO NOT EDIT DIRECTLY.
+-- Please create a 'cabal.config' file in the same directory
+-- if you want to change the default settings for this sandbox.
+
+
+local-repo: @CWD@/test/data/cabal-project/.cabal-sandbox/packages
+logs-dir: @CWD@/test/data/cabal-project/.cabal-sandbox/logs
+world-file: @CWD@/test/data/cabal-project/.cabal-sandbox/world
+user-install: False
+package-db: @CWD@/test/data/cabal-project/.cabal-sandbox/i386-osx-ghc-7.6.3-packages.conf.d
+build-summary: @CWD@/test/data/cabal-project/.cabal-sandbox/logs/build.log
+
+install-dirs
+  prefix: @CWD@/test/data/cabal-project/.cabal-sandbox
+  bindir: $prefix/bin
+  libdir: $prefix/lib
+  libsubdir: $arch-$os-$compiler/$pkgid
+  libexecdir: $prefix/libexec
+  datadir: $prefix/share
+  datasubdir: $arch-$os-$compiler/$pkgid
+  docdir: $datadir/doc/$arch-$os-$compiler/$pkgid
+  htmldir: $docdir/html
+  haddockdir: $htmldir
+  sysconfdir: $prefix/etc

test/data/cabal-project/cabalapi.cabal

@@ -0,0 +1,67 @@
+Name:                   ghc-mod
+Version:                1.11.3
+Author:                 Kazu Yamamoto <kazu@iij.ad.jp>
+Maintainer:             Kazu Yamamoto <kazu@iij.ad.jp>
+License:                BSD3
+License-File:           LICENSE
+Homepage:               http://www.mew.org/~kazu/proj/ghc-mod/
+Synopsis:               Happy Haskell programming on Emacs/Vim
+Description:            This packages includes Elisp files
+			and a Haskell command, "ghc-mod".
+			"ghc*.el" enable completion of
+			Haskell symbols on Emacs.
+                        Flymake is also integrated.
+			"ghc-mod" is a backend of "ghc*.el".
+			It lists up all installed modules
+                        or extracts names of functions, classes,
+                        and data declarations.
+                        To use "ghc-mod" on Vim,
+                        see <https://github.com/eagletmt/ghcmod-vim> or
+                        <https://github.com/scrooloose/syntastic>
+Category:               Development
+Cabal-Version:          >= 1.6
+Build-Type:             Simple
+Data-Dir:               elisp
+Data-Files:             Makefile ghc.el ghc-func.el ghc-doc.el ghc-comp.el
+                        ghc-flymake.el ghc-command.el ghc-info.el
+                        ghc-ins-mod.el ghc-indent.el
+Executable ghc-mod
+  Main-Is:              GHCMod.hs
+  Other-Modules:        Browse
+                        CabalApi
+                        Cabal
+                        CabalDev
+                        Check
+                        ErrMsg
+                        Flag
+                        GHCApi
+                        GHCChoice
+                        Gap
+                        Info
+                        Lang
+                        Lint
+                        List
+                        Paths_ghc_mod
+                        Types
+  GHC-Options:          -Wall
+  Build-Depends:        base >= 4.0 && < 5
+                      , Cabal >= 1.10
+                      , template-haskell
+
+Test-Suite spec
+  Main-Is:              Spec.hs
+  Hs-Source-Dirs:       test, .
+  Type:                 exitcode-stdio-1.0
+  Other-Modules:        Expectation
+                        BrowseSpec
+                        CabalApiSpec
+                        FlagSpec
+                        LangSpec
+                        LintSpec
+                        ListSpec
+  Build-Depends:        base >= 4.0 && < 5
+                      , Cabal >= 1.10
+
+Source-Repository head
+  Type:                 git
+  Location:             git://github.com/kazu-yamamoto/ghc-mod.git

test/data/cabal-project/subdir1/subdir2/dummy

@@ -0,0 +1 @@
+dummy

test/data/foreign-export/ForeignExport.hs

@@ -0,0 +1,10 @@
+{-# LANGUAGE ForeignFunctionInterface #-}
+
+module ForeignExport where
+
+import Foreign.C.Types
+
+foreign export ccall foo :: CUInt
+
+foo :: CUInt
+foo = 123

test/data/ghc-mod-check/lib/Data/Foo.hs

@@ -0,0 +1,11 @@
+module Data.Foo where
+
+foo :: Int
+foo = undefined
+
+fibonacci :: Int -> Integer
+fibonacci n = fib 1 0 1
+  where
+    fib m x y
+      | n == m    = y
+      | otherwise = fib (m+1) y (x + y)

test/data/hlint/hlint.hs

@@ -0,0 +1,5 @@
+module Hlist where
+
+main :: IO ()
+main = do
+    putStrLn "Hello, world!"

test/data/home-module-graph/cpp/A.hs

@@ -0,0 +1,4 @@
+module A where
+import A1
+import A2
+import A3

test/data/home-module-graph/cpp/A1.hs

@@ -0,0 +1,4 @@
+{-# LANGUAGE CPP #-}
+module A1 where
+#elif
+import B

test/data/home-module-graph/cpp/A2.hs

@@ -0,0 +1 @@
+module A2 where

test/data/home-module-graph/cpp/A3.hs

@@ -0,0 +1,2 @@
+module A3 where
+import B

test/data/home-module-graph/cpp/B.hs

@@ -0,0 +1 @@
+module B where

test/data/home-module-graph/cycle/A.hs

@@ -0,0 +1,2 @@
+module A where
+import B

test/data/home-module-graph/cycle/B.hs

@@ -0,0 +1,2 @@
+module B where
+import A

test/data/home-module-graph/errors/A.hs

@@ -0,0 +1,4 @@
+module A where
+import A1
+import A2
+import A3

test/data/home-module-graph/errors/A1.hs

@@ -0,0 +1,4 @@
+module A1 where
+psogduapzsü9
+import B
+lxäö,vLMCks

test/data/home-module-graph/errors/A2.hs

@@ -0,0 +1 @@
+module A2 where

test/data/home-module-graph/errors/A3.hs

@@ -0,0 +1,2 @@
+module A3 where
+import B

test/data/home-module-graph/errors/B.hs

@@ -0,0 +1 @@
+module B where

test/data/home-module-graph/indirect-update/A.hs

@@ -0,0 +1,4 @@
+module A where
+import A1
+import A2
+import A3

test/data/home-module-graph/indirect-update/A1.hs

@@ -0,0 +1,2 @@
+module A1 where
+import B

test/data/home-module-graph/indirect-update/A2.hs

@@ -0,0 +1 @@
+module A2 where

test/data/home-module-graph/indirect-update/A3.hs

@@ -0,0 +1,2 @@
+module A3 where
+import B

test/data/home-module-graph/indirect-update/B.hs

@@ -0,0 +1 @@
+module B where

test/data/home-module-graph/indirect-update/C.hs

@@ -0,0 +1 @@
+module C where

test/data/home-module-graph/indirect/A.hs

@@ -0,0 +1,4 @@
+module A where
+import A1
+import A2
+import A3

test/data/home-module-graph/indirect/A1.hs

@@ -0,0 +1,2 @@
+module A1 where
+import B

test/data/home-module-graph/indirect/A2.hs

@@ -0,0 +1,2 @@
+module A2 where
+import C

test/data/home-module-graph/indirect/A3.hs

@@ -0,0 +1,2 @@
+module A3 where
+import B

test/data/home-module-graph/indirect/B.hs

@@ -0,0 +1 @@
+module B where

test/data/home-module-graph/indirect/C.hs

@@ -0,0 +1 @@
+module C where

test/data/import-cycle/Mutual1.hs

@@ -0,0 +1,5 @@
+{-# LANGUAGE TemplateHaskell #-} -- for HscInterpreted
+
+module Mutual1 where
+
+import Mutual2

test/data/import-cycle/Mutual2.hs

@@ -0,0 +1,3 @@
+module Mutual2 where
+
+import Mutual1

test/data/non-exported/Fib.hs

@@ -0,0 +1,8 @@
+{-# LANGUAGE TemplateHaskell #-} -- for HscInterpreted
+
+module Fib () where
+
+fib :: Int -> Int
+fib 0 = 0
+fib 1 = 1
+fib n = fib (n - 1) + fib (n - 2)

test/data/quasi-quotes/FooQ.hs

@@ -0,0 +1,6 @@
+module FooQ (fooQ) where
+import Language.Haskell.TH
+import Language.Haskell.TH.Quote (QuasiQuoter(..))
+
+fooQ :: QuasiQuoter
+fooQ = QuasiQuoter (litE . stringL) undefined undefined undefined

test/data/quasi-quotes/QuasiQuotes.hs

@@ -0,0 +1,6 @@
+{-# LANGUAGE QuasiQuotes #-}
+module QuasiQuotes where
+
+import FooQ
+
+bar = [fooQ| foo bar baz |]

test/data/template-haskell/Bar.hs

@@ -0,0 +1,5 @@
+{-# LANGUAGE TemplateHaskell #-}
+module Bar (bar) where
+import Foo (foo)
+
+bar = $foo ++ "bar"

test/data/template-haskell/Foo.hs

@@ -0,0 +1,9 @@
+module Foo (foo, fooQ) where
+import Language.Haskell.TH
+import Language.Haskell.TH.Quote (QuasiQuoter(..))
+
+foo :: ExpQ
+foo = stringE "foo"
+
+fooQ :: QuasiQuoter
+fooQ = QuasiQuoter (litE . stringL) undefined undefined undefined

test/data/template-haskell/ImportsTH.hs

@@ -0,0 +1,3 @@
+import Bar (bar)
+
+main = putStrLn bar