diff options
| author | David Terei <davidterei@gmail.com> | 2011-07-20 11:09:03 -0700 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2011-07-20 11:26:35 -0700 |
| commit | 16514f272fb42af6e9c7674a9bd6c9dce369231f (patch) | |
| tree | e4f332b45fe65e2a7a2451be5674f887b42bf199 /testsuite/tests/ghc-regress/driver | |
| parent | ebd422aed41048476aa61dd4c520d43becd78682 (diff) | |
| download | haskell-16514f272fb42af6e9c7674a9bd6c9dce369231f.tar.gz | |
Move tests from tests/ghc-regress/* to just tests/*
Diffstat (limited to 'testsuite/tests/ghc-regress/driver')
215 files changed, 0 insertions, 2053 deletions
diff --git a/testsuite/tests/ghc-regress/driver/1372/1372.stderr b/testsuite/tests/ghc-regress/driver/1372/1372.stderr deleted file mode 100644 index f06f294dae..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/1372.stderr +++ /dev/null @@ -1,2 +0,0 @@ - -Main.hs:5:5: Not in scope: data constructor `T' diff --git a/testsuite/tests/ghc-regress/driver/1372/Makefile b/testsuite/tests/ghc-regress/driver/1372/Makefile deleted file mode 100644 index 549c991b4a..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/Makefile +++ /dev/null @@ -1,37 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -LOCAL_PKGCONF=local.package.conf - -clean: - rm -f p1/setup p1/Setup.o p1/Setup.hi - rm -f p2/setup p2/Setup.o p2/Setup.hi - rm -rf p1/dist p2/dist - rm -f *.o *.hi - rm -f clean.out prep.out - rm -f p1/A.hs - rm -f $(LOCAL_PKGCONF) - -1372: - $(MAKE) clean - $(MAKE) prep -# This should recompile Main.hs, because A in package p1 has changed -# and recompiling Main.hs will now fail. - -cd p2 && ./setup build -v0 - $(MAKE) clean - -prep: - echo "[]" >$(LOCAL_PKGCONF) - cp p1/A1.hs p1/A.hs - $(MAKE) prep.p1 - $(MAKE) prep.p2 - cp p1/A2.hs p1/A.hs - cd p1 && ./setup build -v0 - -prep.%: - cd $* && "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -o setup Setup.hs - cd $* && ./setup configure -v0 --with-compiler="$(TEST_HC)" --with-hc-pkg="$(GHC_PKG)" --package-db=../$(LOCAL_PKGCONF) - cd $* && ./setup build -v0 - cd $* && ./setup register -v0 --inplace - diff --git a/testsuite/tests/ghc-regress/driver/1372/all.T b/testsuite/tests/ghc-regress/driver/1372/all.T deleted file mode 100644 index cabf3c01f8..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/all.T +++ /dev/null @@ -1,5 +0,0 @@ -test('1372', - clean_cmd('$MAKE -s clean'), - run_command, - ['$MAKE -s --no-print-directory 1372']) - diff --git a/testsuite/tests/ghc-regress/driver/1372/p1/A1.hs b/testsuite/tests/ghc-regress/driver/1372/p1/A1.hs deleted file mode 100644 index 6656b4bdfc..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p1/A1.hs +++ /dev/null @@ -1,2 +0,0 @@ -module A where -data T = T diff --git a/testsuite/tests/ghc-regress/driver/1372/p1/A2.hs b/testsuite/tests/ghc-regress/driver/1372/p1/A2.hs deleted file mode 100644 index aa0767c452..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p1/A2.hs +++ /dev/null @@ -1,2 +0,0 @@ -module A where -data T' = T' diff --git a/testsuite/tests/ghc-regress/driver/1372/p1/Setup.hs b/testsuite/tests/ghc-regress/driver/1372/p1/Setup.hs deleted file mode 100644 index 6fa548caf7..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p1/Setup.hs +++ /dev/null @@ -1,6 +0,0 @@ -module Main (main) where - -import Distribution.Simple - -main :: IO () -main = defaultMain diff --git a/testsuite/tests/ghc-regress/driver/1372/p1/p1.cabal b/testsuite/tests/ghc-regress/driver/1372/p1/p1.cabal deleted file mode 100644 index 66d4f0ec4c..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p1/p1.cabal +++ /dev/null @@ -1,4 +0,0 @@ -name: p1 -version: 1.0 -exposed-modules: A -build-depends: base diff --git a/testsuite/tests/ghc-regress/driver/1372/p2/Main.hs b/testsuite/tests/ghc-regress/driver/1372/p2/Main.hs deleted file mode 100644 index b423120e43..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p2/Main.hs +++ /dev/null @@ -1,7 +0,0 @@ -module Main where - -import A - -x = T - -main = print "ok" diff --git a/testsuite/tests/ghc-regress/driver/1372/p2/Setup.hs b/testsuite/tests/ghc-regress/driver/1372/p2/Setup.hs deleted file mode 100644 index 6fa548caf7..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p2/Setup.hs +++ /dev/null @@ -1,6 +0,0 @@ -module Main (main) where - -import Distribution.Simple - -main :: IO () -main = defaultMain diff --git a/testsuite/tests/ghc-regress/driver/1372/p2/p2.cabal b/testsuite/tests/ghc-regress/driver/1372/p2/p2.cabal deleted file mode 100644 index 903515e80c..0000000000 --- a/testsuite/tests/ghc-regress/driver/1372/p2/p2.cabal +++ /dev/null @@ -1,5 +0,0 @@ -name: p2 -version: 1.0 -executable: 1372 -build-depends: base, p1 -main-is: Main.hs diff --git a/testsuite/tests/ghc-regress/driver/1959/1959.stdout b/testsuite/tests/ghc-regress/driver/1959/1959.stdout deleted file mode 100644 index 3db47397ee..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/1959.stdout +++ /dev/null @@ -1,2 +0,0 @@ -16 -14 diff --git a/testsuite/tests/ghc-regress/driver/1959/B.hs b/testsuite/tests/ghc-regress/driver/1959/B.hs deleted file mode 100644 index 8523c17bb4..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/B.hs +++ /dev/null @@ -1,6 +0,0 @@ -module Main where - -import C (x) -import GHC.Exts (inline) - -main = print (inline x) diff --git a/testsuite/tests/ghc-regress/driver/1959/C.hs b/testsuite/tests/ghc-regress/driver/1959/C.hs deleted file mode 100644 index 9106a32495..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/C.hs +++ /dev/null @@ -1,5 +0,0 @@ -module C (x) where - -import D - -x = f 2 diff --git a/testsuite/tests/ghc-regress/driver/1959/D.hs b/testsuite/tests/ghc-regress/driver/1959/D.hs deleted file mode 100644 index 8ff5b1397d..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/D.hs +++ /dev/null @@ -1,7 +0,0 @@ -module D (f) where - -import E - -{-# INLINE f #-} -f :: Int -> Int -f x = h x diff --git a/testsuite/tests/ghc-regress/driver/1959/E1.hs b/testsuite/tests/ghc-regress/driver/1959/E1.hs deleted file mode 100644 index 1efb41b3e4..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/E1.hs +++ /dev/null @@ -1,4 +0,0 @@ -module E (h) where - -h :: Int -> Int -h x = x + x + x + x + x + x + x + x diff --git a/testsuite/tests/ghc-regress/driver/1959/E2.hs b/testsuite/tests/ghc-regress/driver/1959/E2.hs deleted file mode 100644 index cb0ca32ad0..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/E2.hs +++ /dev/null @@ -1,4 +0,0 @@ -module E (h) where - -h :: Int -> Int -h x = x + x + x + x + x + x + x diff --git a/testsuite/tests/ghc-regress/driver/1959/Makefile b/testsuite/tests/ghc-regress/driver/1959/Makefile deleted file mode 100644 index 766a606b2b..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/Makefile +++ /dev/null @@ -1,25 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# Test recompilation bug #1959, which failed in 6.8.1 (and earlier) - -compile :: - '$(TEST_HC)' $(TEST_HC_OPTS) -c -O E.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -c -O D.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -c -O -funfolding-use-threshold=0 C.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -c -O B.hs - '$(TEST_HC)' $(TEST_HC_OPTS) E.o D.o C.o B.o -o prog - -clean :: - rm -f *.o *.hi E.hs - -dotest :: - $(MAKE) clean - cp E1.hs E.hs - $(MAKE) compile - ./prog - sleep 1 - cp E2.hs E.hs - $(MAKE) compile - ./prog diff --git a/testsuite/tests/ghc-regress/driver/1959/test.T b/testsuite/tests/ghc-regress/driver/1959/test.T deleted file mode 100644 index ff9e8f63a4..0000000000 --- a/testsuite/tests/ghc-regress/driver/1959/test.T +++ /dev/null @@ -1,5 +0,0 @@ -test('1959', - extra_clean(['E.hi', 'E.o', 'E.hs', 'prog', 'compile.out', - 'B.hi', 'B.o', 'C.hi', 'C.o', 'D.hi', 'D.o']), - run_command, - ['$MAKE -s --no-print-directory dotest']) diff --git a/testsuite/tests/ghc-regress/driver/2464.hs b/testsuite/tests/ghc-regress/driver/2464.hs deleted file mode 100644 index 3547c100fb..0000000000 --- a/testsuite/tests/ghc-regress/driver/2464.hs +++ /dev/null @@ -1,12 +0,0 @@ -{-# LANGUAGE CPP #-} -{-# OPTIONS_GHC -DTEST #-} -{-# OPTIONS_GHC -fffi #-} -- deprecation warning -#ifdef TEST -{-# LANGUAGE EmptyDataDecls #-} -#endif -#if __GLASGOW_HASKELL__ < 610 -{-# INCLUDE "foo.h" #-} -- would generate a deprecation warning if enabled -#endif - -module Test2464 where -data T diff --git a/testsuite/tests/ghc-regress/driver/2464.stderr b/testsuite/tests/ghc-regress/driver/2464.stderr deleted file mode 100644 index 31e794e33c..0000000000 --- a/testsuite/tests/ghc-regress/driver/2464.stderr +++ /dev/null @@ -1,3 +0,0 @@ - -2464.hs:3:16: - Warning: -fffi is deprecated: use -XForeignFunctionInterface or pragma {-# LANGUAGE ForeignFunctionInterface #-} instead diff --git a/testsuite/tests/ghc-regress/driver/2499.hs b/testsuite/tests/ghc-regress/driver/2499.hs deleted file mode 100644 index b4f48879ee..0000000000 --- a/testsuite/tests/ghc-regress/driver/2499.hs +++ /dev/null @@ -1,2 +0,0 @@ -{-# OPTIONS -package blargh #-} -module Test where diff --git a/testsuite/tests/ghc-regress/driver/2499.stderr b/testsuite/tests/ghc-regress/driver/2499.stderr deleted file mode 100644 index 73404befe3..0000000000 --- a/testsuite/tests/ghc-regress/driver/2499.stderr +++ /dev/null @@ -1,4 +0,0 @@ - -2499.hs:1:12: unknown flag in {-# OPTIONS_GHC #-} pragma: -package - -2499.hs:1:12: unknown flag in {-# OPTIONS_GHC #-} pragma: blargh diff --git a/testsuite/tests/ghc-regress/driver/2566.stderr b/testsuite/tests/ghc-regress/driver/2566.stderr deleted file mode 100644 index 526c76a86a..0000000000 --- a/testsuite/tests/ghc-regress/driver/2566.stderr +++ /dev/null @@ -1,3 +0,0 @@ -Warning: the following files would be used as linker inputs, but linking is not being done: foo2566.bar -ghc: no input files -Usage: For basic information, try the `--help' option. diff --git a/testsuite/tests/ghc-regress/driver/3674.hs b/testsuite/tests/ghc-regress/driver/3674.hs deleted file mode 100644 index 2253ca12ce..0000000000 --- a/testsuite/tests/ghc-regress/driver/3674.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# OPTIONS -F -pgmF ./3674_pre #-} - -module Test3674 where - -data Foo a where MkFoo :: Foo a diff --git a/testsuite/tests/ghc-regress/driver/3674_pre.hs b/testsuite/tests/ghc-regress/driver/3674_pre.hs deleted file mode 100644 index aef9cef9c7..0000000000 --- a/testsuite/tests/ghc-regress/driver/3674_pre.hs +++ /dev/null @@ -1,5 +0,0 @@ -import System.Environment -main = do - [_,inf,outf] <- getArgs - s <- readFile inf - writeFile outf ("{-# LANGUAGE GADTs #-}\n" ++ s) diff --git a/testsuite/tests/ghc-regress/driver/5313.hs b/testsuite/tests/ghc-regress/driver/5313.hs deleted file mode 100644 index 14b809bf7d..0000000000 --- a/testsuite/tests/ghc-regress/driver/5313.hs +++ /dev/null @@ -1,18 +0,0 @@ -import qualified GHC -import System.Environment - -main = do - (libdir:_) <- getArgs - GHC.runGhcT (Just libdir) $ do - -- begin initialize - df0 <- GHC.getSessionDynFlags - let df1 = df0{GHC.ghcMode = GHC.CompManager, - GHC.hscTarget = GHC.HscInterpreted, - GHC.ghcLink = GHC.LinkInMemory, - GHC.verbosity = 0} - _ <- GHC.setSessionDynFlags df1 - -- begin reset - GHC.setContext [] [] - GHC.setTargets [] - _ <- GHC.load GHC.LoadAllTargets - return () diff --git a/testsuite/tests/ghc-regress/driver/A011.hs b/testsuite/tests/ghc-regress/driver/A011.hs deleted file mode 100644 index 96b88f80cc..0000000000 --- a/testsuite/tests/ghc-regress/driver/A011.hs +++ /dev/null @@ -1 +0,0 @@ -module A011 where diff --git a/testsuite/tests/ghc-regress/driver/A012.hs b/testsuite/tests/ghc-regress/driver/A012.hs deleted file mode 100644 index 0dd79b8e05..0000000000 --- a/testsuite/tests/ghc-regress/driver/A012.hs +++ /dev/null @@ -1 +0,0 @@ -module A012 where diff --git a/testsuite/tests/ghc-regress/driver/A013.hs b/testsuite/tests/ghc-regress/driver/A013.hs deleted file mode 100644 index 77275572d8..0000000000 --- a/testsuite/tests/ghc-regress/driver/A013.hs +++ /dev/null @@ -1 +0,0 @@ -module A013 where diff --git a/testsuite/tests/ghc-regress/driver/A014.hs b/testsuite/tests/ghc-regress/driver/A014.hs deleted file mode 100644 index 3f850104b2..0000000000 --- a/testsuite/tests/ghc-regress/driver/A014.hs +++ /dev/null @@ -1 +0,0 @@ -module A014 where diff --git a/testsuite/tests/ghc-regress/driver/A015.hs b/testsuite/tests/ghc-regress/driver/A015.hs deleted file mode 100644 index 1f354be31d..0000000000 --- a/testsuite/tests/ghc-regress/driver/A015.hs +++ /dev/null @@ -1 +0,0 @@ -module A015 where diff --git a/testsuite/tests/ghc-regress/driver/A031.hs b/testsuite/tests/ghc-regress/driver/A031.hs deleted file mode 100644 index 12936c4306..0000000000 --- a/testsuite/tests/ghc-regress/driver/A031.hs +++ /dev/null @@ -1 +0,0 @@ -module A031 where diff --git a/testsuite/tests/ghc-regress/driver/A032.hs b/testsuite/tests/ghc-regress/driver/A032.hs deleted file mode 100644 index 0701b781d8..0000000000 --- a/testsuite/tests/ghc-regress/driver/A032.hs +++ /dev/null @@ -1 +0,0 @@ -module A032 where diff --git a/testsuite/tests/ghc-regress/driver/A033.hs b/testsuite/tests/ghc-regress/driver/A033.hs deleted file mode 100644 index d7be73eb49..0000000000 --- a/testsuite/tests/ghc-regress/driver/A033.hs +++ /dev/null @@ -1 +0,0 @@ -module A033 where diff --git a/testsuite/tests/ghc-regress/driver/A061a.hs b/testsuite/tests/ghc-regress/driver/A061a.hs deleted file mode 100644 index 85230a1e3d..0000000000 --- a/testsuite/tests/ghc-regress/driver/A061a.hs +++ /dev/null @@ -1 +0,0 @@ -module A061a where diff --git a/testsuite/tests/ghc-regress/driver/A061b.hs b/testsuite/tests/ghc-regress/driver/A061b.hs deleted file mode 100644 index 8244ddbb27..0000000000 --- a/testsuite/tests/ghc-regress/driver/A061b.hs +++ /dev/null @@ -1 +0,0 @@ -module A061b where diff --git a/testsuite/tests/ghc-regress/driver/A063.hs b/testsuite/tests/ghc-regress/driver/A063.hs deleted file mode 100644 index fac8c10a34..0000000000 --- a/testsuite/tests/ghc-regress/driver/A063.hs +++ /dev/null @@ -1 +0,0 @@ -module A063 where diff --git a/testsuite/tests/ghc-regress/driver/A064.hs b/testsuite/tests/ghc-regress/driver/A064.hs deleted file mode 100644 index 8ee13be248..0000000000 --- a/testsuite/tests/ghc-regress/driver/A064.hs +++ /dev/null @@ -1 +0,0 @@ -module A064 where diff --git a/testsuite/tests/ghc-regress/driver/A065.hs b/testsuite/tests/ghc-regress/driver/A065.hs deleted file mode 100644 index 7de1a30132..0000000000 --- a/testsuite/tests/ghc-regress/driver/A065.hs +++ /dev/null @@ -1 +0,0 @@ -module A065 where diff --git a/testsuite/tests/ghc-regress/driver/A066.hs b/testsuite/tests/ghc-regress/driver/A066.hs deleted file mode 100644 index be9b016c38..0000000000 --- a/testsuite/tests/ghc-regress/driver/A066.hs +++ /dev/null @@ -1 +0,0 @@ -module A066 where diff --git a/testsuite/tests/ghc-regress/driver/A067.hs b/testsuite/tests/ghc-regress/driver/A067.hs deleted file mode 100644 index 8b57b4dc5d..0000000000 --- a/testsuite/tests/ghc-regress/driver/A067.hs +++ /dev/null @@ -1 +0,0 @@ -module A067 where diff --git a/testsuite/tests/ghc-regress/driver/A070.hs b/testsuite/tests/ghc-regress/driver/A070.hs deleted file mode 100644 index 12fa79d0e0..0000000000 --- a/testsuite/tests/ghc-regress/driver/A070.hs +++ /dev/null @@ -1 +0,0 @@ -module A070 where diff --git a/testsuite/tests/ghc-regress/driver/A071.hs b/testsuite/tests/ghc-regress/driver/A071.hs deleted file mode 100644 index 3d2a64cfc6..0000000000 --- a/testsuite/tests/ghc-regress/driver/A071.hs +++ /dev/null @@ -1 +0,0 @@ -module A071 where diff --git a/testsuite/tests/ghc-regress/driver/A200.hs b/testsuite/tests/ghc-regress/driver/A200.hs deleted file mode 100644 index 0bc3b2f236..0000000000 --- a/testsuite/tests/ghc-regress/driver/A200.hs +++ /dev/null @@ -1 +0,0 @@ -module A200 where diff --git a/testsuite/tests/ghc-regress/driver/B021/C.hs b/testsuite/tests/ghc-regress/driver/B021/C.hs deleted file mode 100644 index 01ecd10813..0000000000 --- a/testsuite/tests/ghc-regress/driver/B021/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B021.C where diff --git a/testsuite/tests/ghc-regress/driver/B022/C.hs b/testsuite/tests/ghc-regress/driver/B022/C.hs deleted file mode 100644 index 230a6105f1..0000000000 --- a/testsuite/tests/ghc-regress/driver/B022/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B022.C where diff --git a/testsuite/tests/ghc-regress/driver/B023/C.hs b/testsuite/tests/ghc-regress/driver/B023/C.hs deleted file mode 100644 index e70870831b..0000000000 --- a/testsuite/tests/ghc-regress/driver/B023/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B023.C where diff --git a/testsuite/tests/ghc-regress/driver/B024/C.hs b/testsuite/tests/ghc-regress/driver/B024/C.hs deleted file mode 100644 index 397b5a5a80..0000000000 --- a/testsuite/tests/ghc-regress/driver/B024/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B024.C where diff --git a/testsuite/tests/ghc-regress/driver/B025/C.hs b/testsuite/tests/ghc-regress/driver/B025/C.hs deleted file mode 100644 index 159cadd483..0000000000 --- a/testsuite/tests/ghc-regress/driver/B025/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B025.C where diff --git a/testsuite/tests/ghc-regress/driver/B027/F.hs b/testsuite/tests/ghc-regress/driver/B027/F.hs deleted file mode 100644 index 9e67706069..0000000000 --- a/testsuite/tests/ghc-regress/driver/B027/F.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module B027.F where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/B028/F.hs b/testsuite/tests/ghc-regress/driver/B028/F.hs deleted file mode 100644 index 8630af1124..0000000000 --- a/testsuite/tests/ghc-regress/driver/B028/F.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module B028.F where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/B041/C.hs b/testsuite/tests/ghc-regress/driver/B041/C.hs deleted file mode 100644 index 9d076f6aeb..0000000000 --- a/testsuite/tests/ghc-regress/driver/B041/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B041.C where diff --git a/testsuite/tests/ghc-regress/driver/B042/C.hs b/testsuite/tests/ghc-regress/driver/B042/C.hs deleted file mode 100644 index a91ce19f3e..0000000000 --- a/testsuite/tests/ghc-regress/driver/B042/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B042.C where diff --git a/testsuite/tests/ghc-regress/driver/B043/C.hs b/testsuite/tests/ghc-regress/driver/B043/C.hs deleted file mode 100644 index 320acedcd8..0000000000 --- a/testsuite/tests/ghc-regress/driver/B043/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B043.C where diff --git a/testsuite/tests/ghc-regress/driver/B044/F.hs b/testsuite/tests/ghc-regress/driver/B044/F.hs deleted file mode 100644 index d6ad4802c3..0000000000 --- a/testsuite/tests/ghc-regress/driver/B044/F.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module B044.F where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/B045/F.hs b/testsuite/tests/ghc-regress/driver/B045/F.hs deleted file mode 100644 index c89635b3a4..0000000000 --- a/testsuite/tests/ghc-regress/driver/B045/F.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module B045.F where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/B200/C.hs b/testsuite/tests/ghc-regress/driver/B200/C.hs deleted file mode 100644 index 1927565999..0000000000 --- a/testsuite/tests/ghc-regress/driver/B200/C.hs +++ /dev/null @@ -1 +0,0 @@ -module B200.C where diff --git a/testsuite/tests/ghc-regress/driver/D063.hs b/testsuite/tests/ghc-regress/driver/D063.hs deleted file mode 100644 index f62cd95ccd..0000000000 --- a/testsuite/tests/ghc-regress/driver/D063.hs +++ /dev/null @@ -1,2 +0,0 @@ -module D063 where -import A063 diff --git a/testsuite/tests/ghc-regress/driver/D200.hs b/testsuite/tests/ghc-regress/driver/D200.hs deleted file mode 100644 index 4f23bedafe..0000000000 --- a/testsuite/tests/ghc-regress/driver/D200.hs +++ /dev/null @@ -1,2 +0,0 @@ -module D200 where -import A200 diff --git a/testsuite/tests/ghc-regress/driver/F016.hs b/testsuite/tests/ghc-regress/driver/F016.hs deleted file mode 100644 index 8cdad020ff..0000000000 --- a/testsuite/tests/ghc-regress/driver/F016.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub016 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F017.hs b/testsuite/tests/ghc-regress/driver/F017.hs deleted file mode 100644 index de6f93da9d..0000000000 --- a/testsuite/tests/ghc-regress/driver/F017.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub017 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F018.hs b/testsuite/tests/ghc-regress/driver/F018.hs deleted file mode 100644 index 613459aaa3..0000000000 --- a/testsuite/tests/ghc-regress/driver/F018.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub018 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F018a.hs b/testsuite/tests/ghc-regress/driver/F018a.hs deleted file mode 100644 index 613459aaa3..0000000000 --- a/testsuite/tests/ghc-regress/driver/F018a.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub018 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F019.hs b/testsuite/tests/ghc-regress/driver/F019.hs deleted file mode 100644 index 724ee74a7c..0000000000 --- a/testsuite/tests/ghc-regress/driver/F019.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub019 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F034.hs b/testsuite/tests/ghc-regress/driver/F034.hs deleted file mode 100644 index e48d9a8faf..0000000000 --- a/testsuite/tests/ghc-regress/driver/F034.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub034 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/F035.hs b/testsuite/tests/ghc-regress/driver/F035.hs deleted file mode 100644 index 445c742070..0000000000 --- a/testsuite/tests/ghc-regress/driver/F035.hs +++ /dev/null @@ -1,5 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module TestStub035 where -foreign export ccall f :: Int -> Int -f :: Int -> Int -f n = n + 1 diff --git a/testsuite/tests/ghc-regress/driver/Makefile b/testsuite/tests/ghc-regress/driver/Makefile deleted file mode 100644 index cb64ea675a..0000000000 --- a/testsuite/tests/ghc-regress/driver/Makefile +++ /dev/null @@ -1,487 +0,0 @@ -TOP=../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# A set of driver tests - -# Things to test: -# -# - one-shot vs. --make -# - hierarchical vs. flat -# - -odir vs. no -odir -# - -hidir vs. no -hidir -# - root module vs. found modules - -OBJSUFFIX = .o - -# ----------------------------------------------------------------------------- -# One-shot compilations, non-hierarchical modules - -test011: - $(RM) A011.hi - $(RM) A011$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) $(TEST_HC_OPTS) -c A011.hs - test -f A011.hi - test -f A011$(OBJSUFFIX) - -# test -o -test012: - $(RM) A012.hi - $(RM) A012$(OBJSUFFIX)oo - "$(TEST_HC)" $(TEST_HC_OPTS) -c A012.hs -o A012$(OBJSUFFIX)oo - test -f A012$(OBJSUFFIX)oo - -# test -ohi -test013: - $(RM) A013.xhi - $(RM) A013$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c A013.hs -ohi A013.xhi - test -f A013.xhi - -# test -odir -test014: - $(RM) -f A014.hi - $(RM) -rf obj014 - mkdir obj014 - "$(TEST_HC)" $(TEST_HC_OPTS) -c A014.hs -odir obj014 - test -f obj014/A014$(OBJSUFFIX) - test -f A014.hi - -# test -hidir -test015: - $(RM) -f A015$(OBJSUFFIX) - $(RM) -rf hi015 - mkdir hi015 - "$(TEST_HC)" $(TEST_HC_OPTS) -c A015.hs -hidir hi015 - test -f A015$(OBJSUFFIX) - test -f hi015/A015.hi - -# test stub generation -test016: - $(RM) F016.hi F016$(OBJSUFFIX) F016_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -c F016.hs - test -f F016_stub.h - -# test -stubdir (filename differs from module name) -test017: - $(RM) F017.hi F017$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c F017.hs -stubdir stub017 - test -f stub017/TestStub017_stub.h - -# test -odir with stubs (filename differs from module name) -test018: - $(RM) -f F018.hi F018$(OBJSUFFIX) F018_stub.h - $(RM) -rf obj018 - mkdir obj018 - "$(TEST_HC)" $(TEST_HC_OPTS) -c F018.hs -odir obj018 - -# test for bug #3093 -test018a: - $(RM) -f F018a.hi F018a_stub.h *.obj.018 - "$(TEST_HC)" $(TEST_HC_OPTS) -c F018a.hs -osuf obj.018 - test -f F018a.obj.018 - -# test -outputdir -test019: - $(RM) -rf out019 - "$(TEST_HC)" $(TEST_HC_OPTS) -c F019.hs -outputdir out019 - test -f out019/TestStub019.hi - test -f out019/TestStub019_stub.h - -# ----------------------------------------------------------------------------- -# One-shot compilation, hierarchical modules - -test021: - $(RM) B021/C.hi - $(RM) B021/C$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c B021/C.hs - test -f B021/C.hi - test -f B021/C$(OBJSUFFIX) - -# test -o -test022: - $(RM) B022/C.hi - $(RM) B022/C$(OBJSUFFIX)oo - "$(TEST_HC)" $(TEST_HC_OPTS) -c B022/C.hs -o B022/C$(OBJSUFFIX)oo - test -f B022/C$(OBJSUFFIX)oo - -# test -ohi -test023: - $(RM) B023/C.xhi - $(RM) B023/C$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c B023/C.hs -ohi B023/C.xhi - test -f B023/C.xhi - -# test -odir -test024: - $(RM) -f B024/C.hi - $(RM) -rf obj024 - mkdir obj024 - "$(TEST_HC)" $(TEST_HC_OPTS) -c B024/C.hs -odir obj024 - test -f obj024/B024/C$(OBJSUFFIX) - -# test -odir with non-Haskell compilation -test024a: - $(RM) -rf B024a - $(RM) -rf obj024a - mkdir B024a - mkdir obj024a - echo >B024a/stub.c - "$(TEST_HC)" $(TEST_HC_OPTS) -c B024a/stub.c -odir obj024a - test -f obj024a/B024a/stub$(OBJSUFFIX) - -# test -hidir -test025: - $(RM) -rf hi025 - mkdir hi025 - $(RM) B025/C$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c B025/C.hs -hidir hi025 - test -f hi025/B025/C.hi - -# This is a hierarchical module that lives in a subdirectory. -test026: - $(RM) d026/P/Q.hi - $(RM) d026/P/Q$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -c d026/P/Q.hs - test -f d026/P/Q.hi - test -f d026/P/Q$(OBJSUFFIX) - -# test stub generation -# -fvia-C, because we want to check that the .hc file can #include the stub.h -test027: - $(RM) B027/F.hi B027/F$(OBJSUFFIX) B027/F_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -c B027/F.hs -fno-warn-deprecated-flags -fvia-C - test -f B027/F_stub.h - -# test -stubdir -# -fvia-C, because we want to check that the .hc file can #include the stub.h -test028: - $(RM) B028/F.hi B028/F$(OBJSUFFIX) - $(RM) stub028/B028/F_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -c B028/F.hs -stubdir stub028 -fno-warn-deprecated-flags -fvia-C - test -f stub028/B028/F_stub.h - -# ----------------------------------------------------------------------------- -# Compilation-manager compilations, flat modules - -test031: - $(RM) A031.hi - $(RM) A031$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make A031.hs - test -f A031.hi - test -f A031$(OBJSUFFIX) - -# test -odir -test032: - $(RM) A032.hi - $(RM) -rf obj032 - mkdir obj032 - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make A032.hs -odir obj032 - test -f obj032/A032$(OBJSUFFIX) - -# test -hidir -test033: - $(RM) -rf hi033 - $(RM) A033$(OBJSUFFIX) - mkdir hi033 - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make A033.hs -hidir hi033 - test -f hi033/A033.hi - -# test stub generation -test034: - $(RM) F034.hi F034$(OBJSUFFIX) F034_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make F034.hs - test -f F034_stub.h - -# test -stubdir (filename differs from module name) -test035: - $(RM) F035.hi F$(OBJSUFFIX) stub035/Stubs_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make F035.hs -stubdir stub035 - test -f stub035/TestStub035_stub.h - -# ----------------------------------------------------------------------------- -# Compilation-manager compilations, hierarchical modules - -test041: - $(RM) B041/C.hi - $(RM) B041/C$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make B041/C.hs - test -f B041/C.hi - test -f B041/C$(OBJSUFFIX) - -# test -odir -test042: - $(RM) -rf obj042 - mkdir obj042 - $(RM) B042/C.hi - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make B042/C.hs -odir obj042 - test -f obj042/B042/C$(OBJSUFFIX) - -# test -hidir -test043: - $(RM) -f B043/C$(OBJSUFFIX) - $(RM) -rf hi043 - mkdir hi043 - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make B043/C.hs -hidir hi043 - test -f hi043/B043/C.hi - -# test stub generation -test044: - $(RM) B044/F.hi B044/F$(OBJSUFFIX) B044/F_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make B044/F.hs - test -f B044/F_stub.h - -# test -stubdir -test045: - $(RM) B045/F.hi B045/F$(OBJSUFFIX) - $(RM) stub045/B045/F_stub.h - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make B045/F.hs -stubdir stub045 - test -f stub045/B045/F_stub.h - -# ----------------------------------------------------------------------------- -# Compilation-manager compilations, hierarchical modules, non-root modules - -test051: - $(RM) d051_2/R/S.hi - $(RM) d051_2/R/S$(OBJSUFFIX) - $(RM) d051_1/P/Q.hi - $(RM) d051_1/P/Q$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -id051_1 -id051_2 R.S - test -f d051_2/R/S.hi - test -f d051_2/R/S$(OBJSUFFIX) - test -f d051_1/P/Q.hi - test -f d051_1/P/Q$(OBJSUFFIX) - -# test -odir -test052: - $(RM) d052_2/R/S.hi - $(RM) d052_1/P/Q.hi - $(RM) -rf obj052 - mkdir obj052 - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -id052_1 -id052_2 -odir obj052 R.S - test -f d052_2/R/S.hi - test -f obj052/R/S$(OBJSUFFIX) - test -f d052_1/P/Q.hi - test -f obj052/P/Q$(OBJSUFFIX) - -# test -hidir -test053: - $(RM) hi053/R/S.hi - $(RM) d053_2/R/S$(OBJSUFFIX) - $(RM) hi053/P/Q.hi - $(RM) d053_1/P/Q$(OBJSUFFIX) - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -id053_1 -id053_2 -hidir hi053 R.S - test -f hi053/R/S.hi - test -f d053_2/R/S$(OBJSUFFIX) - test -f hi053/P/Q.hi - test -f d053_1/P/Q$(OBJSUFFIX) - -# ----------------------------------------------------------------------------- -# Other tests - -# Test that -keep-s-files works with --make and -fvia-C -test061a: - $(RM) A061a.hi A061a$(OBJSUFFIX) A061a.s - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -keep-s-files -fno-warn-deprecated-flags -fvia-C A061a.hs - test -f A061a.s - -# Test that -keep-s-files works without --make -test061b: - $(RM) A061b.hi A061b$(OBJSUFFIX) A061b.s - "$(TEST_HC)" $(TEST_HC_OPTS) -c -keep-s-files -fno-warn-deprecated-flags -fvia-C A061b.hs - test -f A061b.s - -# Test that -main-is works with --make -test062a: - $(RM) Hello062a.hs Hello062a.hi Hello062a$(OBJSUFFIX) Hello062a.hc hello062a - echo "module Hello062a where { hello062a = putStrLn \"ok\" }" >Hello062a.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -main-is Hello062a.hello062a Hello062a -o hello062a - ./hello062a -test062b: - $(RM) Hello062b.hs Hello062b.hi Hello062b$(OBJSUFFIX) Hello062b.hc hello062b - echo "module Hello062b where { main = putStrLn \"ok\" }" >Hello062b.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -main-is Hello062b Hello062b -o hello062b - ./hello062b -test062c: - $(RM) Hello062c.hs Hello062c.hi Hello062c$(OBJSUFFIX) Hello062c.hc hello062c - echo "module Main (hello062c) where { hello062c = putStrLn \"ok\" }" >Hello062c.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -main-is hello062c Hello062c.hs -o hello062c - ./hello062c -test062d: - $(RM) -rf B062d - $(RM) hello062d - mkdir B062d - echo "module B062d.Hello062d (hello062d) where { hello062d = putStrLn \"ok\" }" >B062d/Hello062d.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -main-is B062d.Hello062d.hello062d B062d/Hello062d.hs -o hello062d - ./hello062d -test062e: - $(RM) -rf B062e - $(RM) Hello062e.hc hello062e - mkdir B062e - echo "module B062e.Hello062e (main) where { main = putStrLn \"ok\" }" >B062e/Hello062e.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -main-is B062e.Hello062e B062e/Hello062e.hs -o hello062e - ./hello062e - -# Test that -i deletes the list of search paths. -# The compilation will fail, but we ignore the failure and just -# compare the output, because make might give us a different exit code. -test063: - $(RM) A063.hi A063$(OBJSUFFIX) A063.hc D063.hi D063$(OBJSUFFIX) D063.hc - -"$(TEST_HC)" $(TEST_HC_OPTS) --make -i -v0 D063.hs - -# Test -E -test064: - $(RM) A064.hi A064.hspp - "$(TEST_HC)" $(TEST_HC_OPTS) -E A064.hs - test -f A064.hspp - -# Test -E/-cpp -test065: - $(RM) A065.hi A065.hspp - "$(TEST_HC)" $(TEST_HC_OPTS) -E -cpp A065.hs - test -f A065.hspp - -# Test -E/-o -test066: - $(RM) A066.hi A066.tmp - "$(TEST_HC)" $(TEST_HC_OPTS) -E A066.hs -o A066.tmp - test -f A066.tmp - -# Test -E/-cpp/-o -test067: - $(RM) A067.hi A067.tmp - "$(TEST_HC)" $(TEST_HC_OPTS) -cpp -E A067.hs -o A067.tmp - test -f A067.tmp - -# Test -S -test070: - $(RM) A070.hi A070.s - "$(TEST_HC)" $(TEST_HC_OPTS) -S A070.hs - test -f A070.s - -# Test -S/-o -test071: - $(RM) A071.hi A071.tmp - "$(TEST_HC)" $(TEST_HC_OPTS) -S A071.hs -o A071.tmp - test -f A071.tmp - - -# Tests for #2248, -o and .exe - -define test081 -$(RM) $(1).hs $(1).hi $(1)$(OBJSUFFIX) $(1).hc $(1)$(exeext) -echo "module Main where { main = putStrLn \"ok\" }" >$(1).hs -"$(TEST_HC)" $(TEST_HC_OPTS) --make -v0 $(1).hs -test -f $(1)$(exeext) -endef - -test081a: - $(call test081, Test_081a) -test081b: - $(call test081, Test.081b) - -# ----------------------------------------------------------------------------- -# --make tests - -# Test for overlap between home module and package module -test100: - $(RM) overlap/List.hi overlap/List.o - $(RM) overlap/Overlap.hi overlap/Overlap.o - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make -ioverlap Overlap - -# ----------------------------------------------------------------------------- -# dependency-generation tests - -DEPFILE200 = depend200 - -# Test that we can create a dependency file, and that we can -# modify an existing dependency file. -test200: - $(RM) $(DEPFILE200) - "$(TEST_HC)" $(TEST_HC_OPTS) -M -dep-makefile $(DEPFILE200) D200 - test -f $(DEPFILE200) - "$(TEST_HC)" $(TEST_HC_OPTS) -M -dep-makefile $(DEPFILE200) D200 B200.C A200 - test -f $(DEPFILE200) - "$(TEST_HC)" $(TEST_HC_OPTS) -M -dep-makefile $(DEPFILE200) D200.hs B200/C.hs A200.hs - test -f $(DEPFILE200) - -# ----------------------------------------------------------------------------- - -2566:: - if "$(TEST_HC)" $(TEST_HC_OPTS) -c foo2566.bar; then false else true; fi - -.PHONY: mode001 -# We use -# sed '2,$$d' -# rather than -# head -1 -# as the latter gives -# ghc: <stdout>: hFlush: resource vanished (Broken pipe) -# on OS X -mode001: - "$(TEST_HC)" $(TEST_HC_OPTS) --make --help | sed '2,$$d' - "$(TEST_HC)" $(TEST_HC_OPTS) --help --make | sed '2,$$d' - "$(TEST_HC)" $(TEST_HC_OPTS) --interactive --help | sed '2,$$d' - "$(TEST_HC)" $(TEST_HC_OPTS) --help --interactive | sed '2,$$d' - "$(TEST_HC)" $(TEST_HC_OPTS) --version --help | sed "s/, version.*//" - "$(TEST_HC)" $(TEST_HC_OPTS) --help --version | sed '2,$$d' - "$(TEST_HC)" $(TEST_HC_OPTS) --interactive --version | sed "s/, version.*//" - "$(TEST_HC)" $(TEST_HC_OPTS) --version --interactive | sed "s/, version.*//" - -# Test for building DLLs with ghc -shared, see #2745 -shared001: - $(RM) Shared001.hi Shared001.o HSdll.dll.a HSdll.dll Shared001_stub.* - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 -shared Shared001.hs - -# ----------------------------------------------------------------------------- - -3674: - $(RM) 3674*.o 3674*.hi 3674_pre - "$(TEST_HC)" $(TEST_HC_OPTS) --make 3674_pre.hs - "$(TEST_HC)" $(TEST_HC_OPTS) --make 3674.hs - -.PHONY: rtsopts001 -rtsopts001: - $(RM) rtsOpts$(exeext) rtsOpts.hi rtsOpts.o - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make rtsOpts -rtsopts - echo "Normal" - -./rtsOpts +RTS -C0 2>&1 - $(RM) rtsOpts$(exeext) rtsOpts.hi rtsOpts.o - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make rtsOpts - echo "No RTS opts" - -./rtsOpts +RTS -C0 2>&1 - -.PHONY: rtsopts002 -rtsopts002: - $(RM) rtsopts002$(exeext) rtsopts002.hi rtsopts002.o - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make rtsopts002 -rtsopts=some - ./rtsopts002 - ./rtsopts002 +RTS --info >/dev/null - if ./rtsopts002 +RTS -C0; then exit 1; else exit 0; fi - GHCRTS= ./rtsopts002 - GHCRTS=--info ./rtsopts002 >/dev/null - if GHCRTS=-C0 ./rtsopts002; then exit 1; else exit 0; fi - -.PHONY: withRtsOpts -withRtsOpts: - $(RM) withRtsOpts$(exeext) withRtsOpts.hi withRtsOpts.o withRtsOpts.out - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make withRtsOpts -with-rtsopts=--info - ./withRtsOpts | head -1 - # Also test for non-safe RTS opts, these should be allowed too, - # since the author has explicitly requested them. (#5114) - $(RM) withRtsOpts$(exeext) withRtsOpts.hi withRtsOpts.o withRtsOpts.out - "$(TEST_HC)" $(TEST_HC_OPTS) -v0 --make withRtsOpts -with-rtsopts=-twithRtsOpts.out - ./withRtsOpts | head -1 - test -f withRtsOpts.out - -.PHONY: T3364 -T3364: - -"$(TEST_HC)" $(TEST_HC_OPTS) -H - -.PHONY: T706 -T706: - cp T706a.hs T706.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -c T706.hs - cp T706b.hs T706.hs - "$(TEST_HC)" $(TEST_HC_OPTS) -c T706.hs - echo "test" | "$(TEST_HC)" $(TEST_HC_OPTS) --interactive -ignore-dot-ghci -v0 T706 diff --git a/testsuite/tests/ghc-regress/driver/Shared001.hs b/testsuite/tests/ghc-regress/driver/Shared001.hs deleted file mode 100644 index 4f6a3d9c3d..0000000000 --- a/testsuite/tests/ghc-regress/driver/Shared001.hs +++ /dev/null @@ -1,9 +0,0 @@ -{-# LANGUAGE ForeignFunctionInterface #-}
-module Shared001 where
-
--- Test for building DLLs with ghc -shared, see #2745
-
-f :: Int -> Int
-f x = x+1
-
-foreign export ccall f :: Int -> Int
diff --git a/testsuite/tests/ghc-regress/driver/T3007/A/A.cabal b/testsuite/tests/ghc-regress/driver/T3007/A/A.cabal deleted file mode 100644 index 86b3bb013e..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/A/A.cabal +++ /dev/null @@ -1,7 +0,0 @@ -Name: A -Version: 0 - -Library - Exposed-Modules: A - Other-Modules: Internal - Extensions: NoImplicitPrelude diff --git a/testsuite/tests/ghc-regress/driver/T3007/A/A.hs b/testsuite/tests/ghc-regress/driver/T3007/A/A.hs deleted file mode 100644 index 83e99f555f..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/A/A.hs +++ /dev/null @@ -1,7 +0,0 @@ -module A ( - - A (A) - -) where - - import Internal diff --git a/testsuite/tests/ghc-regress/driver/T3007/A/Internal.hs b/testsuite/tests/ghc-regress/driver/T3007/A/Internal.hs deleted file mode 100644 index 761480dece..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/A/Internal.hs +++ /dev/null @@ -1,7 +0,0 @@ -module Internal ( - - A (A) - -) where - - data A = A diff --git a/testsuite/tests/ghc-regress/driver/T3007/A/Setup.hs b/testsuite/tests/ghc-regress/driver/T3007/A/Setup.hs deleted file mode 100644 index 9a994af677..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/A/Setup.hs +++ /dev/null @@ -1,2 +0,0 @@ -import Distribution.Simple -main = defaultMain diff --git a/testsuite/tests/ghc-regress/driver/T3007/B/B.cabal b/testsuite/tests/ghc-regress/driver/T3007/B/B.cabal deleted file mode 100644 index dbccfffbe9..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/B/B.cabal +++ /dev/null @@ -1,8 +0,0 @@ -Name: B -Version: 0 - -Library - Build-Depends: A == 0 - Exposed-Modules: B - Other-Modules: Internal - Extensions: NoImplicitPrelude diff --git a/testsuite/tests/ghc-regress/driver/T3007/B/B.hs b/testsuite/tests/ghc-regress/driver/T3007/B/B.hs deleted file mode 100644 index 9bd13bbaec..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/B/B.hs +++ /dev/null @@ -1,7 +0,0 @@ -module B where - - import A - import {-# SOURCE #-} Internal - - a :: A - a = A diff --git a/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs b/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs deleted file mode 100644 index ccb9cd4b23..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs +++ /dev/null @@ -1,3 +0,0 @@ -module Internal where - - import B diff --git a/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs-boot b/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs-boot deleted file mode 100644 index d066bb085e..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/B/Internal.hs-boot +++ /dev/null @@ -1 +0,0 @@ -module Internal where diff --git a/testsuite/tests/ghc-regress/driver/T3007/B/Setup.hs b/testsuite/tests/ghc-regress/driver/T3007/B/Setup.hs deleted file mode 100644 index 9a994af677..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/B/Setup.hs +++ /dev/null @@ -1,2 +0,0 @@ -import Distribution.Simple -main = defaultMain diff --git a/testsuite/tests/ghc-regress/driver/T3007/Makefile b/testsuite/tests/ghc-regress/driver/T3007/Makefile deleted file mode 100644 index 516e6f30b9..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/Makefile +++ /dev/null @@ -1,21 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -clean: - rm -f A/Setup A/Setup.o A/Setup.hi - rm -f B/Setup B/Setup.o B/Setup.hi - rm -rf A/dist B/dist - rm -f package.conf - -T3007: - $(MAKE) clean - echo '[]' > package.conf - cd A && '$(TEST_HC)' -v0 --make Setup - cd A && ./Setup configure -v0 --with-compiler='$(TEST_HC)' --ghc-pkg-option=--global-conf=../package.conf --ghc-option=-package-conf../package.conf - cd A && ./Setup build -v0 - cd A && ./Setup register --inplace -v0 - cd B && '$(TEST_HC)' -v0 --make Setup - cd B && ./Setup configure -v0 --with-compiler='$(TEST_HC)' --ghc-pkg-option=--global-conf=../package.conf --ghc-option=-package-conf../package.conf - cd B && ./Setup build -v0 - diff --git a/testsuite/tests/ghc-regress/driver/T3007/all.T b/testsuite/tests/ghc-regress/driver/T3007/all.T deleted file mode 100644 index 194097335d..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3007/all.T +++ /dev/null @@ -1,5 +0,0 @@ -test('T3007', - clean_cmd('$MAKE -s clean'), - run_command, - ['$MAKE -s --no-print-directory T3007']) - diff --git a/testsuite/tests/ghc-regress/driver/T3364.stderr b/testsuite/tests/ghc-regress/driver/T3364.stderr deleted file mode 100644 index 852893facc..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3364.stderr +++ /dev/null @@ -1,2 +0,0 @@ -ghc: on the commandline: missing argument for flag: -H -Usage: For basic information, try the `--help' option. diff --git a/testsuite/tests/ghc-regress/driver/T3389.hs b/testsuite/tests/ghc-regress/driver/T3389.hs deleted file mode 100644 index e068611460..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3389.hs +++ /dev/null @@ -1,12 +0,0 @@ - -{-# LANGUAGE CPP #-} -{-# OPTIONS_GHC -optP -C #-} - -#define A 'a' - -main :: IO () -main = putStrLn [A, --- /* - 'b', --- */ - 'c'] diff --git a/testsuite/tests/ghc-regress/driver/T3389.stdout b/testsuite/tests/ghc-regress/driver/T3389.stdout deleted file mode 100644 index 8baef1b4ab..0000000000 --- a/testsuite/tests/ghc-regress/driver/T3389.stdout +++ /dev/null @@ -1 +0,0 @@ -abc diff --git a/testsuite/tests/ghc-regress/driver/T4437.hs b/testsuite/tests/ghc-regress/driver/T4437.hs deleted file mode 100644 index 64634a9c74..0000000000 --- a/testsuite/tests/ghc-regress/driver/T4437.hs +++ /dev/null @@ -1,26 +0,0 @@ - -module Main (main) where - -import Data.List -import DynFlags -import Language.Haskell.Extension - -main :: IO () -main = do let ghcExtensions = [ ext | (ext, _, _, _) <- xFlags ] - cabalExtensions = map show [ toEnum 0 :: KnownExtension .. ] - ghcOnlyExtensions = ghcExtensions \\ cabalExtensions - -- These are extensions which are deliberately not yet - -- registered with Cabal - expectedGhcOnlyExtensions - = ["ParallelArrays", - "RelaxedLayout", - "DeriveGeneric", - "DefaultSignatures", - "InterruptibleFFI", - "AlternativeLayoutRule", - "AlternativeLayoutRuleTransitional", - "MonadComprehensions"] - unexpectedGhcOnlyExtension = ghcOnlyExtensions - \\ expectedGhcOnlyExtensions - mapM_ putStrLn unexpectedGhcOnlyExtension - diff --git a/testsuite/tests/ghc-regress/driver/T706.stdout b/testsuite/tests/ghc-regress/driver/T706.stdout deleted file mode 100644 index fadc068c40..0000000000 --- a/testsuite/tests/ghc-regress/driver/T706.stdout +++ /dev/null @@ -1 +0,0 @@ -"testing" diff --git a/testsuite/tests/ghc-regress/driver/T706a.hs b/testsuite/tests/ghc-regress/driver/T706a.hs deleted file mode 100644 index 04f5bf53e9..0000000000 --- a/testsuite/tests/ghc-regress/driver/T706a.hs +++ /dev/null @@ -1,7 +0,0 @@ -{-# LANGUAGE Haskell2010 #-} -module T706 where - -foreign export ccall f :: Int -> Int - -f :: Int -> Int -f x = x + 1 diff --git a/testsuite/tests/ghc-regress/driver/T706b.hs b/testsuite/tests/ghc-regress/driver/T706b.hs deleted file mode 100644 index 1d14e97a19..0000000000 --- a/testsuite/tests/ghc-regress/driver/T706b.hs +++ /dev/null @@ -1,3 +0,0 @@ -module T706 where - -test = "testing" diff --git a/testsuite/tests/ghc-regress/driver/all.T b/testsuite/tests/ghc-regress/driver/all.T deleted file mode 100644 index 1907087a5a..0000000000 --- a/testsuite/tests/ghc-regress/driver/all.T +++ /dev/null @@ -1,333 +0,0 @@ -setTestOpts(only_compiler_types(['ghc'])) - -test('driver011', - extra_clean(['A011.hi', 'A011.o']), - run_command, - ['$MAKE -s --no-print-directory test011']) - -test('driver012', - extra_clean(['A012.hi', 'A012.o']), - run_command, - ['$MAKE -s --no-print-directory test012']) - -test('driver013', - extra_clean(['A013.hi', 'A013.o']), - run_command, - ['$MAKE -s --no-print-directory test013']) - -test('driver014', - extra_clean(['A014.hi', 'obj014/A014.o', 'obj014']), - run_command, - ['$MAKE -s --no-print-directory test014']) - -test('driver015', - extra_clean(['A015.o', 'hi015/A015.hi', 'hi015']), - run_command, - ['$MAKE -s --no-print-directory test015']) - -test('driver016', - extra_clean(['F016.hi', 'F016.o', 'F016_stub.h']), - run_command, - ['$MAKE -s --no-print-directory test016']) - -test('driver017', - extra_clean(['F017.hi', 'F017.o', 'F017_stub.h']), - run_command, - ['$MAKE -s --no-print-directory test017']) - -test('driver018', - extra_clean(['F018.hi', 'F018_stub.h', - 'obj018/TestStub018.o', 'obj018/TestStub018_stub.o', - 'obj018']), - run_command, - ['$MAKE -s --no-print-directory test018']) - -test('driver018a', - extra_clean(['F018a.hi', 'F018a_stub.h', - 'TestStub018a.obj.018', - 'obj018a/TestStub018a_stub.obj.018']), - run_command, - ['$MAKE -s --no-print-directory test018a']) - -test('driver019', - extra_clean(['out019/TestStub.hi', - 'out019/TestStub.o', - 'out019/TestStub_stub.h', - 'out019/TestStub_stub.o']), - run_command, - ['$MAKE -s --no-print-directory test019']) - -test('driver021', - extra_clean(['B021/C.hi', 'B021/C.o']), - run_command, - ['$MAKE -s --no-print-directory test021']) - -test('driver022', - extra_clean(['B022/C.hi', 'B022/C.o']), - run_command, - ['$MAKE -s --no-print-directory test022']) - -test('driver023', - extra_clean(['B023/C.hi', 'B023/C.o']), - run_command, - ['$MAKE -s --no-print-directory test023']) - -test('driver024', - extra_clean(['B024/C.hi', 'obj024/B024/C.o', 'obj024/B024', 'obj024']), - run_command, - ['$MAKE -s --no-print-directory test024']) - -test('driver024a', - extra_clean(['obj024a/B024a/stub.o', 'obj024a/B024a', 'obj024a']), - run_command, - ['$MAKE -s --no-print-directory test024a']) - -test('driver025', - extra_clean(['B025/C.hi', 'B025/C.o', - 'hi025/B025/C.hi', 'hi025/B025', 'hi025']), - run_command, - ['$MAKE -s --no-print-directory test025']) - -test('driver026', - extra_clean(['d026/P/Q.hi', 'd026/P/Q.o']), - run_command, - ['$MAKE -s --no-print-directory test026']) - -test('driver027', - extra_clean(['B027/F.hi', 'B027/F.o', - 'B027/F_stub.h', 'B027/F_stub.o']), - run_command, - ['$MAKE -s --no-print-directory test027']) - -test('driver028', - extra_clean(['B028/F.hi', 'B028/F.o', - 'B028/F_stub.h', 'B028/F_stub.o']), - run_command, - ['$MAKE -s --no-print-directory test028']) - -test('driver031', - extra_clean(['A031.hi', 'A031.o']), - run_command, - ['$MAKE -s --no-print-directory test031']) - -test('driver032', - extra_clean(['A032.hi', 'A032.o']), - run_command, - ['$MAKE -s --no-print-directory test032']) - -test('driver033', - extra_clean(['A033.hi', 'A033.o', 'hi033/A033.hi', 'hi033']), - run_command, - ['$MAKE -s --no-print-directory test033']) - -test('driver034', - extra_clean(['F034.hi', 'F034.o', 'F034_stub.h']), - run_command, - ['$MAKE -s --no-print-directory test034']) - -test('driver035', - extra_clean(['F035.hi', 'F035.o', - 'stub035/F035_stub.h']), - run_command, - ['$MAKE -s --no-print-directory test035']) - -test('driver041', - extra_clean(['B041/C.hi', 'B041/C.o']), - run_command, - ['$MAKE -s --no-print-directory test041']) - -test('driver042', - extra_clean(['B042/C.hi', 'B042/C.o']), - run_command, - ['$MAKE -s --no-print-directory test042']) - -test('driver043', - extra_clean(['B043/C.hi', 'B043/C.o', - 'hi043/B043/C.hi', 'hi043/B043', 'hi043']), - run_command, - ['$MAKE -s --no-print-directory test043']) - -test('driver044', - extra_clean(['B044/F.hi', 'B044/F.o', - 'B044/F_stub.h', 'B044/F_stub.o']), - run_command, - ['$MAKE -s --no-print-directory test044']) - -test('driver045', - extra_clean(['B045/F.hi', 'B045/F.o', - 'B045/F_stub.h', 'B045/F_stub.o']), - run_command, - ['$MAKE -s --no-print-directory test045']) - -test('driver051', - extra_clean(['d051_1/P/Q.hi', 'd051_1/P/Q.o', - 'd051_2/R/S.hi', 'd051_2/R/S.o']), - run_command, - ['$MAKE -s --no-print-directory test051']) - -test('driver052', - extra_clean(['d052_1/P/Q.hi', 'd052_1/P/Q.o', - 'd052_2/R/S.hi', 'd052_2/R/S.o', - 'obj052/P/Q.o', 'obj052/P', - 'obj052/R/S.o', 'obj052/R', - 'obj052']), - run_command, - ['$MAKE -s --no-print-directory test052']) - -test('driver053', - extra_clean(['d053_1/P/Q.hi', 'd053_1/P/Q.o', - 'd053_2/R/S.hi', 'd053_2/R/S.o', - 'hi053/P/Q.hi', 'hi053/P', - 'hi053/R/S.hi', 'hi053/R', - 'hi053']), - run_command, - ['$MAKE -s --no-print-directory test053']) - -test('driver061a', - extra_clean(['A061a.hi', 'A061a.o', 'A061a.s']), - run_command, - ['$MAKE -s --no-print-directory test061a']) - -test('driver061b', - extra_clean(['A061b.hi', 'A061b.o', 'A061b.s']), - run_command, - ['$MAKE -s --no-print-directory test061b']) - - -test('driver062a', - extra_clean(['Hello062a.hs']), - run_command, - ['$MAKE -s --no-print-directory test062a']) -test('driver062b', - extra_clean(['Hello062b.hs']), - run_command, - ['$MAKE -s --no-print-directory test062b']) -test('driver062c', - extra_clean(['Hello062c.hs']), - run_command, - ['$MAKE -s --no-print-directory test062c']) -test('driver062d', - extra_clean(['B062d/Hello062d.hs']), - run_command, - ['$MAKE -s --no-print-directory test062d']) -test('driver062e', - extra_clean(['B062e/Hello062e.hs']), - run_command, - ['$MAKE -s --no-print-directory test062e']) - -test('driver063', - extra_clean(['A063.hi', 'A063.o', 'A063.hc', - 'D063.hi', 'D063.o', 'D063.hc']), - run_command, - ['$MAKE -s --no-print-directory test063']) - -test('driver064', - extra_clean(['A064.hi', 'A064.o', 'A064.hspp']), - run_command, - ['$MAKE -s --no-print-directory test064']) - -test('driver065', - extra_clean(['A065.hi', 'A065.o', 'A065.hspp']), - run_command, - ['$MAKE -s --no-print-directory test065']) - -test('driver066', - extra_clean(['A066.hi', 'A066.o', 'A066.tmp']), - run_command, - ['$MAKE -s --no-print-directory test066']) - -test('driver067', - extra_clean(['A067.hi', 'A067.o', 'A067.tmp']), - run_command, - ['$MAKE -s --no-print-directory test067']) - -test('driver070', - extra_clean(['A070.hi', 'A070.o', 'A070.s']), - run_command, - ['$MAKE -s --no-print-directory test070']) - -test('driver071', - extra_clean(['A071.hi', 'A071.o', 'A071.tmp']), - run_command, - ['$MAKE -s --no-print-directory test071']) - -test('driver081a', - normal, - run_command, - ['$MAKE -s --no-print-directory test081a']) - -test('driver081b', - normal, - run_command, - ['$MAKE -s --no-print-directory test081b']) - -test('driver100', - extra_clean(['overlap/List.hi', 'overlap/List.o', - 'overlap/Overlap.hi', 'overlap/Overlap.o']), - run_command, - ['$MAKE -s --no-print-directory test100']) - -test('driver200', - extra_clean(['depend200']), - run_command, - ['$MAKE -s --no-print-directory test200']) - -test('2566', - normalise_fun(normalise_errmsg), - run_command, - ['$MAKE -s --no-print-directory 2566']) - -test('pragma001', normal, compile, ['']) -test('pragma002', normal, compile, ['']) - -test('2499', normal, compile_fail, ['']) - -test('mode001', normal, run_command, - ['$MAKE -s --no-print-directory mode001']) - -if config.platform == 'i386-unknown-mingw32': - only_windows = normal -else: - only_windows = skip - -test('shared001', - [only_windows, - extra_clean(['Shared001.hi', 'Shared001.o', 'HSdll.dll.a', 'HSdll.dll', 'Shared001_stub.h', 'Shared001_stub.o'])], - run_command, - ['$MAKE -s --no-print-directory shared001']) - -test('dynHelloWorld', - only_ways(['dyn']), - compile_and_run, - ['']) - -# simple test that we can load and use the GHC package in all ways -# (in #5313 it was failing the dyn way) -p = subprocess.Popen([config.compiler, "--print-libdir"], stdout=subprocess.PIPE) -libdir = chop(p.stdout.read()) -p.stdout.close - -test('5313', extra_run_opts('"' + libdir + '"'), compile_and_run, ['-package ghc']) - -test('2464', normal, compile, ['']) -test('3674', ignore_output, run_command, - ['$MAKE -s --no-print-directory 3674']) - -test('rtsopts001', normal, run_command, - ['$MAKE -s --no-print-directory rtsopts001']) -test('rtsopts002', normal, run_command, - ['$MAKE -s --no-print-directory rtsopts002']) - -test('withRtsOpts', [ extra_clean(['withRtsOpts', 'withRtsOpts.exe', - 'withRtsOpts.hi', 'withRtsOpts.o', - 'withRtsOpts.out']) ], - run_command, - ['$MAKE -s --no-print-directory withRtsOpts']) -test('T3389', normal, compile_and_run, ['']) -test('T3364', normalise_fun(normalise_errmsg), run_command, - ['$MAKE -s --no-print-directory T3364']) -test('T4437', only_ways(['normal']), compile_and_run, ['-package ghc']) - -test('werror', normal, compile_fail, ['']) - -test('T706', req_interp, run_command, ['$MAKE -s --no-print-directory T706']) diff --git a/testsuite/tests/ghc-regress/driver/bug1677/Bar.hs b/testsuite/tests/ghc-regress/driver/bug1677/Bar.hs deleted file mode 100644 index e29f867394..0000000000 --- a/testsuite/tests/ghc-regress/driver/bug1677/Bar.hs +++ /dev/null @@ -1,2 +0,0 @@ -module Bar where -import Foo diff --git a/testsuite/tests/ghc-regress/driver/bug1677/Foo.hs b/testsuite/tests/ghc-regress/driver/bug1677/Foo.hs deleted file mode 100644 index df56d8c261..0000000000 --- a/testsuite/tests/ghc-regress/driver/bug1677/Foo.hs +++ /dev/null @@ -1 +0,0 @@ -Module Foo where diff --git a/testsuite/tests/ghc-regress/driver/bug1677/Makefile b/testsuite/tests/ghc-regress/driver/bug1677/Makefile deleted file mode 100644 index 482562fa43..0000000000 --- a/testsuite/tests/ghc-regress/driver/bug1677/Makefile +++ /dev/null @@ -1,7 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -bug1677 : - '$(TEST_HC)' $(TEST_HC_OPTS) -M Foo.hs Bar.hs || true - diff --git a/testsuite/tests/ghc-regress/driver/bug1677/all.T b/testsuite/tests/ghc-regress/driver/bug1677/all.T deleted file mode 100644 index d2bd077a4e..0000000000 --- a/testsuite/tests/ghc-regress/driver/bug1677/all.T +++ /dev/null @@ -1 +0,0 @@ -test('bug1677', normal, run_command, ['$MAKE bug1677 -s --no-print-directory']) diff --git a/testsuite/tests/ghc-regress/driver/bug1677/bug1677.stderr b/testsuite/tests/ghc-regress/driver/bug1677/bug1677.stderr deleted file mode 100644 index bc55b86c2f..0000000000 --- a/testsuite/tests/ghc-regress/driver/bug1677/bug1677.stderr +++ /dev/null @@ -1,5 +0,0 @@ - -Foo.hs:1:1: - File name does not match module name: - Saw: `Main' - Expected: `Foo' diff --git a/testsuite/tests/ghc-regress/driver/conflicting_flags/Makefile b/testsuite/tests/ghc-regress/driver/conflicting_flags/Makefile deleted file mode 100644 index ec2a7c768e..0000000000 --- a/testsuite/tests/ghc-regress/driver/conflicting_flags/Makefile +++ /dev/null @@ -1,7 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -conflicting_flags: - '$(TEST_HC)' $(TEST_HC_OPTS) -V --print-libdir 2>&1 | sed "s/, version.*//" - diff --git a/testsuite/tests/ghc-regress/driver/conflicting_flags/conflicting_flags.stdout b/testsuite/tests/ghc-regress/driver/conflicting_flags/conflicting_flags.stdout deleted file mode 100644 index 31ce6b16c6..0000000000 --- a/testsuite/tests/ghc-regress/driver/conflicting_flags/conflicting_flags.stdout +++ /dev/null @@ -1 +0,0 @@ -The Glorious Glasgow Haskell Compilation System diff --git a/testsuite/tests/ghc-regress/driver/conflicting_flags/test.T b/testsuite/tests/ghc-regress/driver/conflicting_flags/test.T deleted file mode 100644 index 0a6769a77a..0000000000 --- a/testsuite/tests/ghc-regress/driver/conflicting_flags/test.T +++ /dev/null @@ -1,3 +0,0 @@ -test('conflicting_flags', normal, run_command, - ['$MAKE -s --no-print-directory conflicting_flags']) - diff --git a/testsuite/tests/ghc-regress/driver/d026/P/Q.hs b/testsuite/tests/ghc-regress/driver/d026/P/Q.hs deleted file mode 100644 index 2466766bb0..0000000000 --- a/testsuite/tests/ghc-regress/driver/d026/P/Q.hs +++ /dev/null @@ -1 +0,0 @@ -module P.Q where diff --git a/testsuite/tests/ghc-regress/driver/d051_1/P/Q.hs b/testsuite/tests/ghc-regress/driver/d051_1/P/Q.hs deleted file mode 100644 index 2466766bb0..0000000000 --- a/testsuite/tests/ghc-regress/driver/d051_1/P/Q.hs +++ /dev/null @@ -1 +0,0 @@ -module P.Q where diff --git a/testsuite/tests/ghc-regress/driver/d051_2/R/S.hs b/testsuite/tests/ghc-regress/driver/d051_2/R/S.hs deleted file mode 100644 index b5c46f3179..0000000000 --- a/testsuite/tests/ghc-regress/driver/d051_2/R/S.hs +++ /dev/null @@ -1,2 +0,0 @@ -module R.S where -import P.Q diff --git a/testsuite/tests/ghc-regress/driver/d052_1/P/Q.hs b/testsuite/tests/ghc-regress/driver/d052_1/P/Q.hs deleted file mode 100644 index 2466766bb0..0000000000 --- a/testsuite/tests/ghc-regress/driver/d052_1/P/Q.hs +++ /dev/null @@ -1 +0,0 @@ -module P.Q where diff --git a/testsuite/tests/ghc-regress/driver/d052_2/R/S.hs b/testsuite/tests/ghc-regress/driver/d052_2/R/S.hs deleted file mode 100644 index b5c46f3179..0000000000 --- a/testsuite/tests/ghc-regress/driver/d052_2/R/S.hs +++ /dev/null @@ -1,2 +0,0 @@ -module R.S where -import P.Q diff --git a/testsuite/tests/ghc-regress/driver/d053_1/P/Q.hs b/testsuite/tests/ghc-regress/driver/d053_1/P/Q.hs deleted file mode 100644 index 2466766bb0..0000000000 --- a/testsuite/tests/ghc-regress/driver/d053_1/P/Q.hs +++ /dev/null @@ -1 +0,0 @@ -module P.Q where diff --git a/testsuite/tests/ghc-regress/driver/d053_2/R/S.hs b/testsuite/tests/ghc-regress/driver/d053_2/R/S.hs deleted file mode 100644 index b5c46f3179..0000000000 --- a/testsuite/tests/ghc-regress/driver/d053_2/R/S.hs +++ /dev/null @@ -1,2 +0,0 @@ -module R.S where -import P.Q diff --git a/testsuite/tests/ghc-regress/driver/driver062a.stdout b/testsuite/tests/ghc-regress/driver/driver062a.stdout deleted file mode 100644 index 9766475a41..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver062a.stdout +++ /dev/null @@ -1 +0,0 @@ -ok diff --git a/testsuite/tests/ghc-regress/driver/driver062b.stdout b/testsuite/tests/ghc-regress/driver/driver062b.stdout deleted file mode 100644 index 9766475a41..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver062b.stdout +++ /dev/null @@ -1 +0,0 @@ -ok diff --git a/testsuite/tests/ghc-regress/driver/driver062c.stdout b/testsuite/tests/ghc-regress/driver/driver062c.stdout deleted file mode 100644 index 9766475a41..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver062c.stdout +++ /dev/null @@ -1 +0,0 @@ -ok diff --git a/testsuite/tests/ghc-regress/driver/driver062d.stdout b/testsuite/tests/ghc-regress/driver/driver062d.stdout deleted file mode 100644 index 9766475a41..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver062d.stdout +++ /dev/null @@ -1 +0,0 @@ -ok diff --git a/testsuite/tests/ghc-regress/driver/driver062e.stdout b/testsuite/tests/ghc-regress/driver/driver062e.stdout deleted file mode 100644 index 9766475a41..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver062e.stdout +++ /dev/null @@ -1 +0,0 @@ -ok diff --git a/testsuite/tests/ghc-regress/driver/driver063.stderr b/testsuite/tests/ghc-regress/driver/driver063.stderr deleted file mode 100644 index 0a6801537e..0000000000 --- a/testsuite/tests/ghc-regress/driver/driver063.stderr +++ /dev/null @@ -1,4 +0,0 @@ - -D063.hs:2:8: - Could not find module `A063' - It is not a module in the current program, or in any known package. diff --git a/testsuite/tests/ghc-regress/driver/dynHelloWorld.hs b/testsuite/tests/ghc-regress/driver/dynHelloWorld.hs deleted file mode 100644 index 5c96396ae1..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynHelloWorld.hs +++ /dev/null @@ -1,5 +0,0 @@ - -module Main (main) where - -main :: IO () -main = putStrLn "Hello World" diff --git a/testsuite/tests/ghc-regress/driver/dynHelloWorld.stdout b/testsuite/tests/ghc-regress/driver/dynHelloWorld.stdout deleted file mode 100644 index 557db03de9..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynHelloWorld.stdout +++ /dev/null @@ -1 +0,0 @@ -Hello World diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/A.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_001/A.hs deleted file mode 100644 index 50c518be7e..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/A.hs +++ /dev/null @@ -1,13 +0,0 @@ - -{-# OPTIONS_GHC -fwarn-unused-binds #-} - -module A (a, a_type_default, a_missing_sig) where - -a :: Int -a = 4 - -a_type_default :: Int -a_type_default = 2 ^ 2 - -a_missing_sig = () - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/B.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_001/B.hs deleted file mode 100644 index f3f82dff98..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/B.hs +++ /dev/null @@ -1,13 +0,0 @@ - -{-# OPTIONS_GHC -fwarn-type-defaults #-} - -module B (b, b_unused_bind, b_missing_sig) where - -b :: Int -b = 5 - -b_unused_bind :: Int -> Int -b_unused_bind x = 2 - -b_missing_sig = () - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/C.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_001/C.hs deleted file mode 100644 index ac7ff06b95..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/C.hs +++ /dev/null @@ -1,17 +0,0 @@ - -{-# OPTIONS_GHC -fwarn-missing-signatures #-} - -module Main (main, c_type_default, c_unused_bind) where - -import A (a) -import B (b) - -main :: IO () -main = print (a + b) - -c_type_default :: Int -c_type_default = 2 ^ 2 - -c_unused_bind :: Int -> Int -c_unused_bind x = 2 - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/Makefile b/testsuite/tests/ghc-regress/driver/dynamic_flags_001/Makefile deleted file mode 100644 index 414f2b45b8..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/Makefile +++ /dev/null @@ -1,14 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# Dynamic flags tests - -clean: - rm -f *.o *.hi - -# 001: Flags turned on in one module's OPTIONS_GHC pragma shouldn't -# be on in when compiling other modules - -dynamic_flags_001: clean - '$(TEST_HC)' $(TEST_HC_OPTS) --make -Werror -v0 C.hs diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/all.T b/testsuite/tests/ghc-regress/driver/dynamic_flags_001/all.T deleted file mode 100644 index c487a0cb75..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_001/all.T +++ /dev/null @@ -1,6 +0,0 @@ -test('dynamic_flags_001', - [skip_if_fast, - clean_cmd('$MAKE -s clean')], - run_command, - ['$MAKE -s --no-print-directory dynamic_flags_001']) - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_First.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_First.hs deleted file mode 100644 index 94b0986dbd..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_First.hs +++ /dev/null @@ -1,5 +0,0 @@ - -{-# OPTIONS_GHC -Wall -Werror #-} - -module A_First where - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Main.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Main.hs deleted file mode 100644 index 19486af9cc..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Main.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module A_Main where - -import A_First () -- Turns on -Wall -Werror -import A_Second () -- Is not -Wall clean - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Second.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Second.hs deleted file mode 100644 index 6543b6b4cf..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/A_Second.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module A_Second where - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_First.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_First.hs deleted file mode 100644 index ef944f57f8..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_First.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module B_First where - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Main.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Main.hs deleted file mode 100644 index ed1367f0b4..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Main.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module B_Main where - -import B_First () -- Is not -Wall clean -import B_Second () -- Turns on -Wall -Werror - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Second.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Second.hs deleted file mode 100644 index a3efdb491c..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/B_Second.hs +++ /dev/null @@ -1,5 +0,0 @@ - -{-# OPTIONS_GHC -Wall -Werror #-} - -module B_Second where - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Child.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Child.hs deleted file mode 100644 index 86241fb3e4..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Child.hs +++ /dev/null @@ -1,5 +0,0 @@ - -{-# OPTIONS_GHC -Wall -Werror #-} - -module C_Child where - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Main.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Main.hs deleted file mode 100644 index c7decbc546..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/C_Main.hs +++ /dev/null @@ -1,8 +0,0 @@ - -module C_Main where - -import C_Child () -- Turns on -Wall -Werror - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Child.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Child.hs deleted file mode 100644 index bfe4d4a42d..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Child.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module D_Child where - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Main.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Main.hs deleted file mode 100644 index 2b69a8ce4c..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/D_Main.hs +++ /dev/null @@ -1,7 +0,0 @@ - -{-# OPTIONS_GHC -Wall -Werror #-} - -module D_Main where - -import D_Child () -- Is not -Wall clean - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/Makefile b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/Makefile deleted file mode 100644 index 50191fd8b9..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/Makefile +++ /dev/null @@ -1,4 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyFirst.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyFirst.hs deleted file mode 100644 index 0ecb0c2d42..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyFirst.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module ManyFirst where - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManySecond.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManySecond.hs deleted file mode 100644 index ac67a3be2b..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManySecond.hs +++ /dev/null @@ -1,5 +0,0 @@ - -{-# OPTIONS_GHC -Wall -Werror #-} - -module ManySecond where - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyThird.hs b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyThird.hs deleted file mode 100644 index 2f3df77398..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/ManyThird.hs +++ /dev/null @@ -1,6 +0,0 @@ - -module ManyThird where - --- Not -Wall clean: Missing signature: -a = 'c' - diff --git a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/all.T b/testsuite/tests/ghc-regress/driver/dynamic_flags_002/all.T deleted file mode 100644 index 3b0072ba6b..0000000000 --- a/testsuite/tests/ghc-regress/driver/dynamic_flags_002/all.T +++ /dev/null @@ -1,6 +0,0 @@ -test('dynamic_flags_002A', skip_if_fast, multimod_compile, ['A_Main', '-v0']) -test('dynamic_flags_002B', skip_if_fast, multimod_compile, ['B_Main', '-v0']) -test('dynamic_flags_002C', skip_if_fast, multimod_compile, ['C_Main', '-v0']) -test('dynamic_flags_002D', skip_if_fast, multimod_compile, ['D_Main', '-v0']) -test('dynamic_flags_002Many', skip_if_fast, multimod_compile, ['ManyFirst ManySecond ManyThird', '-v0']) - diff --git a/testsuite/tests/ghc-regress/driver/mode001.stdout b/testsuite/tests/ghc-regress/driver/mode001.stdout deleted file mode 100644 index 462d836f55..0000000000 --- a/testsuite/tests/ghc-regress/driver/mode001.stdout +++ /dev/null @@ -1,8 +0,0 @@ -Usage: -Usage: -Usage: -Usage: -The Glorious Glasgow Haskell Compilation System -Usage: -The Glorious Glasgow Haskell Compilation System -The Glorious Glasgow Haskell Compilation System diff --git a/testsuite/tests/ghc-regress/driver/objc/Makefile b/testsuite/tests/ghc-regress/driver/objc/Makefile deleted file mode 100644 index 50191fd8b9..0000000000 --- a/testsuite/tests/ghc-regress/driver/objc/Makefile +++ /dev/null @@ -1,4 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - diff --git a/testsuite/tests/ghc-regress/driver/objc/all.T b/testsuite/tests/ghc-regress/driver/objc/all.T deleted file mode 100644 index ee22934399..0000000000 --- a/testsuite/tests/ghc-regress/driver/objc/all.T +++ /dev/null @@ -1,10 +0,0 @@ -def if_not_platform(platforms, f): - if not (config.platform in platforms): - return f - else: - return normal - -skip_if_not_osx = if_not_platform(['i386-apple-darwin','x86_64-apple-darwin'], skip) - -test('objc-hi', [ skip_if_not_osx, objc_src ], - compile_and_run, ['-framework Foundation']) diff --git a/testsuite/tests/ghc-regress/driver/objc/objc-hi.m b/testsuite/tests/ghc-regress/driver/objc/objc-hi.m deleted file mode 100644 index 4580bd2dfb..0000000000 --- a/testsuite/tests/ghc-regress/driver/objc/objc-hi.m +++ /dev/null @@ -1,35 +0,0 @@ -#import <Foundation/Foundation.h> -#import <stdio.h> - -@interface HelloWorld : NSObject { - // no instance variables -} - -// methods -- (void)sayHello; - -@end - -@implementation HelloWorld - -- (void)sayHello -{ - printf("Hello world\n"); -} - -@end - -#import <Foundation/Foundation.h> - -int main (int argc, const char * argv[]) { - NSAutoreleasePool * pool = [[NSAutoreleasePool alloc] init]; - - // my stuff - HelloWorld *hw = [[HelloWorld alloc] init]; - [hw autorelease]; - - [hw sayHello]; - - [pool release]; - return 0; -} diff --git a/testsuite/tests/ghc-regress/driver/objc/objc-hi.stdout b/testsuite/tests/ghc-regress/driver/objc/objc-hi.stdout deleted file mode 100644 index 802992c422..0000000000 --- a/testsuite/tests/ghc-regress/driver/objc/objc-hi.stdout +++ /dev/null @@ -1 +0,0 @@ -Hello world diff --git a/testsuite/tests/ghc-regress/driver/overlap/List.hs b/testsuite/tests/ghc-regress/driver/overlap/List.hs deleted file mode 100644 index 8a6e4262dc..0000000000 --- a/testsuite/tests/ghc-regress/driver/overlap/List.hs +++ /dev/null @@ -1 +0,0 @@ -module List where diff --git a/testsuite/tests/ghc-regress/driver/overlap/Overlap.hs b/testsuite/tests/ghc-regress/driver/overlap/Overlap.hs deleted file mode 100644 index b82364f7cc..0000000000 --- a/testsuite/tests/ghc-regress/driver/overlap/Overlap.hs +++ /dev/null @@ -1,2 +0,0 @@ -module Overlap where -import List diff --git a/testsuite/tests/ghc-regress/driver/pragma001.hs b/testsuite/tests/ghc-regress/driver/pragma001.hs deleted file mode 100644 index 8c1b7aac94..0000000000 --- a/testsuite/tests/ghc-regress/driver/pragma001.hs +++ /dev/null @@ -1,29 +0,0 @@ - ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- ---------------------------------------------------------------------------- - --- There is enough comment to fill up one buffer (1024 bytes) of the code --- in GHC that looks for OPTIONS_GHC pragmas etc. - -{-# OPTIONS_GHC -w #-} - -module Pragma001 () where - --- This will make a warning if the pragam isn't picked up -foo _ = () -foo _ = () - diff --git a/testsuite/tests/ghc-regress/driver/pragma002.hs b/testsuite/tests/ghc-regress/driver/pragma002.hs deleted file mode 100644 index 48c66101bc..0000000000 --- a/testsuite/tests/ghc-regress/driver/pragma002.hs +++ /dev/null @@ -1,10 +0,0 @@ --- an options pragma that needs more than 1k of buffer to read -{-# OPTIONS_GHC - -w #-} - -module Pragma002 () where - --- This will make a warning if the pragam isn't picked up -foo _ = () -foo _ = () - diff --git a/testsuite/tests/ghc-regress/driver/recomp001/A.hs b/testsuite/tests/ghc-regress/driver/recomp001/A.hs deleted file mode 100644 index d7fc96e70e..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/A.hs +++ /dev/null @@ -1,4 +0,0 @@ -module A where - -foo :: Int -foo = 4 diff --git a/testsuite/tests/ghc-regress/driver/recomp001/B1.hs b/testsuite/tests/ghc-regress/driver/recomp001/B1.hs deleted file mode 100644 index d0efd79bf0..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/B1.hs +++ /dev/null @@ -1,3 +0,0 @@ -module B (foo) where - -import A (foo) diff --git a/testsuite/tests/ghc-regress/driver/recomp001/B2.hs b/testsuite/tests/ghc-regress/driver/recomp001/B2.hs deleted file mode 100644 index 213d77d5eb..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/B2.hs +++ /dev/null @@ -1,3 +0,0 @@ -module B () where - -import A () diff --git a/testsuite/tests/ghc-regress/driver/recomp001/C.hs b/testsuite/tests/ghc-regress/driver/recomp001/C.hs deleted file mode 100644 index d38b2ff51c..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/C.hs +++ /dev/null @@ -1,6 +0,0 @@ -module Main (main) where - -import B (foo) - -main :: IO () -main = print foo diff --git a/testsuite/tests/ghc-regress/driver/recomp001/Makefile b/testsuite/tests/ghc-regress/driver/recomp001/Makefile deleted file mode 100644 index f089f71ab7..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/Makefile +++ /dev/null @@ -1,19 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# Recompilation tests - -clean: - rm -f *.o *.hi - rm -f B.hs C - -# 001: removing an export should force a recompile of dependent modules. -# failed in GHC 6.4. - -recomp001: clean - cp B1.hs B.hs - '$(TEST_HC)' $(TEST_HC_OPTS) --make -v0 C.hs - sleep 1 - cp B2.hs B.hs - -'$(TEST_HC)' $(TEST_HC_OPTS) --make -v0 C.hs diff --git a/testsuite/tests/ghc-regress/driver/recomp001/all.T b/testsuite/tests/ghc-regress/driver/recomp001/all.T deleted file mode 100644 index f3672fa2f8..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/all.T +++ /dev/null @@ -1,6 +0,0 @@ -test('recomp001', - [skip_if_fast, - clean_cmd('$MAKE -s clean')], - run_command, - ['$MAKE -s --no-print-directory recomp001']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp001/recomp001.stderr b/testsuite/tests/ghc-regress/driver/recomp001/recomp001.stderr deleted file mode 100644 index 4b95415c89..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp001/recomp001.stderr +++ /dev/null @@ -1,2 +0,0 @@ - -C.hs:3:11: Module `B' does not export `foo' diff --git a/testsuite/tests/ghc-regress/driver/recomp002/Makefile b/testsuite/tests/ghc-regress/driver/recomp002/Makefile deleted file mode 100644 index d2375961d2..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/Makefile +++ /dev/null @@ -1,16 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# Recompilation tests - -clean: - rm -f *.o* - rm -f *.hi* - -# Only the first invocation should print any "Compiling" messages - -recomp002: clean - '$(TEST_HC)' $(TEST_HC_OPTS) --make Q.hs - echo Middle >&2 - '$(TEST_HC)' $(TEST_HC_OPTS) --make Q.hs diff --git a/testsuite/tests/ghc-regress/driver/recomp002/Q.hs b/testsuite/tests/ghc-regress/driver/recomp002/Q.hs deleted file mode 100644 index bdca9402bd..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/Q.hs +++ /dev/null @@ -1,5 +0,0 @@ - -module Q where - -import {-# SOURCE #-} W - diff --git a/testsuite/tests/ghc-regress/driver/recomp002/W.hs b/testsuite/tests/ghc-regress/driver/recomp002/W.hs deleted file mode 100644 index 0e2392d6c9..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/W.hs +++ /dev/null @@ -1,5 +0,0 @@ - -module W where - -import Q - diff --git a/testsuite/tests/ghc-regress/driver/recomp002/W.hs-boot b/testsuite/tests/ghc-regress/driver/recomp002/W.hs-boot deleted file mode 100644 index 62be698970..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/W.hs-boot +++ /dev/null @@ -1,3 +0,0 @@ - -module W where - diff --git a/testsuite/tests/ghc-regress/driver/recomp002/all.T b/testsuite/tests/ghc-regress/driver/recomp002/all.T deleted file mode 100644 index 5f8ddf5f1b..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/all.T +++ /dev/null @@ -1,6 +0,0 @@ -test('recomp002', - [skip_if_fast, - clean_cmd('$MAKE -s clean')], - run_command, - ['$MAKE -s --no-print-directory recomp002']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stderr b/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stderr deleted file mode 100644 index 56cdd85e1d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stderr +++ /dev/null @@ -1 +0,0 @@ -Middle diff --git a/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stdout b/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stdout deleted file mode 100644 index d9ddb2523a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp002/recomp002.stdout +++ /dev/null @@ -1,3 +0,0 @@ -[1 of 3] Compiling W[boot] ( W.hs-boot, W.o-boot ) -[2 of 3] Compiling Q ( Q.hs, Q.o ) -[3 of 3] Compiling W ( W.hs, W.o ) diff --git a/testsuite/tests/ghc-regress/driver/recomp003/A.hs b/testsuite/tests/ghc-regress/driver/recomp003/A.hs deleted file mode 100644 index 7fa4516161..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp003/A.hs +++ /dev/null @@ -1,3 +0,0 @@ -module A where -import Data.Char - diff --git a/testsuite/tests/ghc-regress/driver/recomp003/Makefile b/testsuite/tests/ghc-regress/driver/recomp003/Makefile deleted file mode 100644 index 45ae0cbbdf..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp003/Makefile +++ /dev/null @@ -1,18 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -OBJSUFFIX = .o - -# Test that adding a new module that shadows a package module causes -# recompilation. Part of bug #1372. -recomp003: - $(RM) A.hi A$(OBJSUFFIX) out - $(RM) -rf Data - mkdir Data - '$(TEST_HC)' $(TEST_HC_OPTS) -c A.hs - echo "module Data.Char where" > Data/Char.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -c Data/Char.hs - # Should now recompile A.hs, because Char is now a home module: - '$(TEST_HC)' $(TEST_HC_OPTS) -c A.hs 2>err - @if grep NOT err; then false; fi diff --git a/testsuite/tests/ghc-regress/driver/recomp003/all.T b/testsuite/tests/ghc-regress/driver/recomp003/all.T deleted file mode 100644 index c6653c2723..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp003/all.T +++ /dev/null @@ -1,6 +0,0 @@ -test('recomp003', - extra_clean(['Data/Char.hs', 'Data/Char.hi', 'Data/Char.o', - 'A.o', 'A.hi', - 'err']), - run_command, - ['$MAKE -s --no-print-directory recomp003']) diff --git a/testsuite/tests/ghc-regress/driver/recomp004/Main.hs b/testsuite/tests/ghc-regress/driver/recomp004/Main.hs deleted file mode 100644 index cbb16d21d3..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/Main.hs +++ /dev/null @@ -1,10 +0,0 @@ - -{-# LANGUAGE ForeignFunctionInterface #-} - -module Main where - -main :: IO () -main = foo - -foreign import ccall unsafe "c.h foo" foo :: IO () - diff --git a/testsuite/tests/ghc-regress/driver/recomp004/Makefile b/testsuite/tests/ghc-regress/driver/recomp004/Makefile deleted file mode 100644 index 120556827c..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/Makefile +++ /dev/null @@ -1,24 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -EXECUTABLE = Main$(exeext) -CLEAN_FILES = c.c c.o Main.o Main.hi $(EXECUTABLE) - -clean: - $(RM) $(CLEAN_FILES) - -# Test that updates to C modules are noticed -recomp004: - $(RM) $(CLEAN_FILES) - $(CP) c1.c c.c - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -c c.c -o c.o - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs c.o -o $(EXECUTABLE) - ./$(EXECUTABLE) - $(CP) c2.c c.c - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -c c.c -o c.o - # Hack to make sure c.o is really newer - touch -t 01010000 Main.hs Main.hi Main.o c.c $(EXECUTABLE) - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs c.o -o $(EXECUTABLE) - ./$(EXECUTABLE) - diff --git a/testsuite/tests/ghc-regress/driver/recomp004/all.T b/testsuite/tests/ghc-regress/driver/recomp004/all.T deleted file mode 100644 index 54d190d83a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/all.T +++ /dev/null @@ -1,4 +0,0 @@ -test('recomp004', - extra_clean(['Main', 'Main.exe', 'c.c']), - run_command, - ['$MAKE -s --no-print-directory recomp004']) diff --git a/testsuite/tests/ghc-regress/driver/recomp004/c.h b/testsuite/tests/ghc-regress/driver/recomp004/c.h deleted file mode 100644 index 12c941119c..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/c.h +++ /dev/null @@ -1,5 +0,0 @@ - -#include <stdio.h> - -void foo(void); - diff --git a/testsuite/tests/ghc-regress/driver/recomp004/c1.c b/testsuite/tests/ghc-regress/driver/recomp004/c1.c deleted file mode 100644 index 0b2101a826..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/c1.c +++ /dev/null @@ -1,6 +0,0 @@ - -#include "c.h" - -void foo(void) { - printf("Foo\n"); -} diff --git a/testsuite/tests/ghc-regress/driver/recomp004/c2.c b/testsuite/tests/ghc-regress/driver/recomp004/c2.c deleted file mode 100644 index decb52617a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/c2.c +++ /dev/null @@ -1,6 +0,0 @@ - -#include "c.h" - -void foo(void) { - printf("Bar\n"); -} diff --git a/testsuite/tests/ghc-regress/driver/recomp004/recomp004.stdout b/testsuite/tests/ghc-regress/driver/recomp004/recomp004.stdout deleted file mode 100644 index 3b71d5be87..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp004/recomp004.stdout +++ /dev/null @@ -1,2 +0,0 @@ -Foo -Bar diff --git a/testsuite/tests/ghc-regress/driver/recomp005/A.hs b/testsuite/tests/ghc-regress/driver/recomp005/A.hs deleted file mode 100644 index 4cf81d9c9f..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/A.hs +++ /dev/null @@ -1,4 +0,0 @@ -module A where - -f :: Int -> Int -f x = x + 1 diff --git a/testsuite/tests/ghc-regress/driver/recomp005/B.hs b/testsuite/tests/ghc-regress/driver/recomp005/B.hs deleted file mode 100644 index 84ef616bba..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/B.hs +++ /dev/null @@ -1,5 +0,0 @@ -module B where - -g :: Int -> Int -g x = x * 2 - diff --git a/testsuite/tests/ghc-regress/driver/recomp005/C1.hs b/testsuite/tests/ghc-regress/driver/recomp005/C1.hs deleted file mode 100644 index 8141245535..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/C1.hs +++ /dev/null @@ -1,5 +0,0 @@ - -module C (f, g) where - -import A -import B diff --git a/testsuite/tests/ghc-regress/driver/recomp005/C2.hs b/testsuite/tests/ghc-regress/driver/recomp005/C2.hs deleted file mode 100644 index 7764ed861b..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/C2.hs +++ /dev/null @@ -1,7 +0,0 @@ -{-# LANGUAGE RankNTypes #-} -module C (f, g) where - -import A -import B - -{-# RULES "f/g" forall x . f (g x) = x #-} diff --git a/testsuite/tests/ghc-regress/driver/recomp005/D.hs b/testsuite/tests/ghc-regress/driver/recomp005/D.hs deleted file mode 100644 index c8cd790be1..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/D.hs +++ /dev/null @@ -1,3 +0,0 @@ -module D () where - -import C () -- so we don't get a dependency on C's export list diff --git a/testsuite/tests/ghc-regress/driver/recomp005/E.hs b/testsuite/tests/ghc-regress/driver/recomp005/E.hs deleted file mode 100644 index e6e2e6b784..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/E.hs +++ /dev/null @@ -1,7 +0,0 @@ -module E where - -import D -- get the RULE from C via D -import A -import B - -z = f (g 3) diff --git a/testsuite/tests/ghc-regress/driver/recomp005/Makefile b/testsuite/tests/ghc-regress/driver/recomp005/Makefile deleted file mode 100644 index a588cff176..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/Makefile +++ /dev/null @@ -1,16 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -clean: - rm -f *.o* - rm -f *.hi* - rm -f C.hs - -recomp005: clean - cp C1.hs C.hs - '$(TEST_HC)' $(TEST_HC_OPTS) --make E.hs -O - sleep 1 - cp C2.hs C.hs - # Should recompile E, because C is now an orphan - '$(TEST_HC)' $(TEST_HC_OPTS) --make E.hs -O diff --git a/testsuite/tests/ghc-regress/driver/recomp005/all.T b/testsuite/tests/ghc-regress/driver/recomp005/all.T deleted file mode 100644 index d5d89b1712..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/all.T +++ /dev/null @@ -1,5 +0,0 @@ -test('recomp005', - [skip_if_fast, - clean_cmd('$MAKE -s clean')], - run_command, ['$MAKE -s --no-print-directory recomp005']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stderr b/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stderr deleted file mode 100644 index e69de29bb2..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stderr +++ /dev/null diff --git a/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stdout b/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stdout deleted file mode 100644 index 720a1ea74f..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp005/recomp005.stdout +++ /dev/null @@ -1,8 +0,0 @@ -[1 of 5] Compiling B ( B.hs, B.o ) -[2 of 5] Compiling A ( A.hs, A.o ) -[3 of 5] Compiling C ( C.hs, C.o ) -[4 of 5] Compiling D ( D.hs, D.o ) -[5 of 5] Compiling E ( E.hs, E.o ) -[3 of 5] Compiling C ( C.hs, C.o ) -[4 of 5] Compiling D ( D.hs, D.o ) -[5 of 5] Compiling E ( E.hs, E.o ) diff --git a/testsuite/tests/ghc-regress/driver/recomp006/A.hs b/testsuite/tests/ghc-regress/driver/recomp006/A.hs deleted file mode 100644 index a658ba6e3c..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/A.hs +++ /dev/null @@ -1,9 +0,0 @@ -{-# LANGUAGE TypeOperators #-} -module A where - -import B ((:-)) - --- assumes :- is right-associative -f :: Int :- Int :- Int -f = (1,(2,3)) - diff --git a/testsuite/tests/ghc-regress/driver/recomp006/B1.hs b/testsuite/tests/ghc-regress/driver/recomp006/B1.hs deleted file mode 100644 index aed449262f..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/B1.hs +++ /dev/null @@ -1,8 +0,0 @@ - -{-# LANGUAGE TypeOperators #-} - -module B where - -infixr 9 :- - -type a :- b = (a,b) diff --git a/testsuite/tests/ghc-regress/driver/recomp006/B2.hs b/testsuite/tests/ghc-regress/driver/recomp006/B2.hs deleted file mode 100644 index 905b6dbd9a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/B2.hs +++ /dev/null @@ -1,8 +0,0 @@ - -{-# LANGUAGE TypeOperators #-} - -module B where - -infixl 9 :- - -type a :- b = (a,b) diff --git a/testsuite/tests/ghc-regress/driver/recomp006/Makefile b/testsuite/tests/ghc-regress/driver/recomp006/Makefile deleted file mode 100644 index c71f5ec405..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/Makefile +++ /dev/null @@ -1,16 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -OBJSUFFIX = .o - -# Test that changing the fixity of a type synonym operator forces recompilation -# (see #3166). -recomp006: - $(RM) A.hi A$(OBJSUFFIX) - cp B1.hs B.hs - '$(TEST_HC)' $(TEST_HC_OPTS) --make A.hs 1>out 2>err - sleep 1 - cp B2.hs B.hs - # This should fail - if '$(TEST_HC)' $(TEST_HC_OPTS) --make A.hs; then false; fi diff --git a/testsuite/tests/ghc-regress/driver/recomp006/all.T b/testsuite/tests/ghc-regress/driver/recomp006/all.T deleted file mode 100644 index bc4f915bad..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/all.T +++ /dev/null @@ -1,3 +0,0 @@ -test('recomp006', - [ skip_if_fast, extra_clean(['A.o','A.hi','B.o','B.hi','err','out']) ], - run_command, ['$MAKE -s --no-print-directory recomp006']) diff --git a/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stderr b/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stderr deleted file mode 100644 index c449b5cd2d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stderr +++ /dev/null @@ -1,14 +0,0 @@ - -A.hs:8:6: - No instance for (Num (Int :- Int)) - arising from the literal `1' - Possible fix: add an instance declaration for (Num (Int :- Int)) - In the expression: 1 - In the expression: (1, (2, 3)) - In an equation for `f': f = (1, (2, 3)) - -A.hs:8:8: - Couldn't match expected type `Int' with actual type `(t0, t1)' - In the expression: (2, 3) - In the expression: (1, (2, 3)) - In an equation for `f': f = (1, (2, 3)) diff --git a/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stdout b/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stdout deleted file mode 100644 index f403e40d1a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp006/recomp006.stdout +++ /dev/null @@ -1,2 +0,0 @@ -[1 of 2] Compiling B ( B.hs, B.o ) -[2 of 2] Compiling A ( A.hs, A.o ) diff --git a/testsuite/tests/ghc-regress/driver/recomp007/Makefile b/testsuite/tests/ghc-regress/driver/recomp007/Makefile deleted file mode 100644 index 074be35b37..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/Makefile +++ /dev/null @@ -1,28 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -LOCAL_PKGCONF=local.package.conf - -clean: - rm -f Setup$(exeext) - rm -rf a1/dist a2/dist b/dist - rm -f *.o *.hi - rm -f clean.out prep.out - rm -rf $(LOCAL_PKGCONF) - -recomp007: - $(MAKE) clean - "$(GHC_PKG)" init $(LOCAL_PKGCONF) - "$(TEST_HC)" -v0 --make Setup.hs - $(MAKE) prep.a1 - $(MAKE) prep.b - "$(GHC_PKG)" unregister --package-conf=$(LOCAL_PKGCONF) a-1.0 - $(MAKE) prep.a2 - cd b && ../Setup configure -v0 --with-compiler="$(TEST_HC)" --with-hc-pkg="$(GHC_PKG)" --package-db=../$(LOCAL_PKGCONF) - cd b && ../Setup build - -prep.%: - cd $* && ../Setup configure -v0 --with-compiler="$(TEST_HC)" --with-hc-pkg="$(GHC_PKG)" --package-db=../$(LOCAL_PKGCONF) - cd $* && ../Setup build -v0 - cd $* && ../Setup register -v0 --inplace diff --git a/testsuite/tests/ghc-regress/driver/recomp007/Setup.hs b/testsuite/tests/ghc-regress/driver/recomp007/Setup.hs deleted file mode 100644 index 9a994af677..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/Setup.hs +++ /dev/null @@ -1,2 +0,0 @@ -import Distribution.Simple -main = defaultMain diff --git a/testsuite/tests/ghc-regress/driver/recomp007/a1/A.hs b/testsuite/tests/ghc-regress/driver/recomp007/a1/A.hs deleted file mode 100644 index 8e028dcab8..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/a1/A.hs +++ /dev/null @@ -1,3 +0,0 @@ -module A (a) where - -a = "1.0" diff --git a/testsuite/tests/ghc-regress/driver/recomp007/a1/a.cabal b/testsuite/tests/ghc-regress/driver/recomp007/a1/a.cabal deleted file mode 100644 index cb6d3c01b9..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/a1/a.cabal +++ /dev/null @@ -1,7 +0,0 @@ -name: a -version: 1.0 -exposed-modules: A -build-depends: base -build-type: Simple -ghc-options: -O0 - diff --git a/testsuite/tests/ghc-regress/driver/recomp007/a2/A.hs b/testsuite/tests/ghc-regress/driver/recomp007/a2/A.hs deleted file mode 100644 index 273896245c..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/a2/A.hs +++ /dev/null @@ -1,3 +0,0 @@ -module A (a) where - -a = "2.0" diff --git a/testsuite/tests/ghc-regress/driver/recomp007/a2/a.cabal b/testsuite/tests/ghc-regress/driver/recomp007/a2/a.cabal deleted file mode 100644 index 5c3ae6a74d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/a2/a.cabal +++ /dev/null @@ -1,7 +0,0 @@ -name: a -version: 2.0 -exposed-modules: A -build-depends: base -build-type: Simple -ghc-options: -O0 - diff --git a/testsuite/tests/ghc-regress/driver/recomp007/all.T b/testsuite/tests/ghc-regress/driver/recomp007/all.T deleted file mode 100644 index 5a93a12d68..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/all.T +++ /dev/null @@ -1,9 +0,0 @@ -# This tests for correct recompilation when a package version changes. -# See the patch -# "Fix a recompilation checking bug when a package dependency changes" - -test('recomp007', - [ skip_if_fast, clean_cmd('$MAKE -s clean'), normalise_slashes ], - run_command, - ['$MAKE -s --no-print-directory recomp007']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp007/b/B.hs b/testsuite/tests/ghc-regress/driver/recomp007/b/B.hs deleted file mode 100644 index 742c5d3a3f..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/b/B.hs +++ /dev/null @@ -1,5 +0,0 @@ -module B (b) where - -import A - -b = a diff --git a/testsuite/tests/ghc-regress/driver/recomp007/b/Main.hs b/testsuite/tests/ghc-regress/driver/recomp007/b/Main.hs deleted file mode 100644 index ca60a5902b..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/b/Main.hs +++ /dev/null @@ -1,5 +0,0 @@ -module Main (main) where - -import B - -main = print b diff --git a/testsuite/tests/ghc-regress/driver/recomp007/b/b.cabal b/testsuite/tests/ghc-regress/driver/recomp007/b/b.cabal deleted file mode 100644 index 988ef871a2..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/b/b.cabal +++ /dev/null @@ -1,10 +0,0 @@ -name: b -version: 1.0 -build-type: Simple -cabal-version: >= 1.2 -executable test { - build-depends: base, a - main-is: Main.hs - other-modules: B - ghc-options: -O0 -} diff --git a/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stderr b/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stderr deleted file mode 100644 index 290be5f14d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stderr +++ /dev/null @@ -1 +0,0 @@ -Linking dist/build/test/test ... diff --git a/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stdout b/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stdout deleted file mode 100644 index b956b8f9a3..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp007/recomp007.stdout +++ /dev/null @@ -1,4 +0,0 @@ -Building b-1.0... -Preprocessing executable 'test' for b-1.0... -[1 of 2] Compiling B ( B.hs, dist/build/test/test-tmp/B.o ) -[2 of 2] Compiling Main ( Main.hs, dist/build/test/test-tmp/Main.o ) diff --git a/testsuite/tests/ghc-regress/driver/recomp008/A1.hs b/testsuite/tests/ghc-regress/driver/recomp008/A1.hs deleted file mode 100644 index 224258034a..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/A1.hs +++ /dev/null @@ -1,8 +0,0 @@ -module A (T,t) where - -data T = T -t = T - -instance Eq T where - t1 == t2 = True - diff --git a/testsuite/tests/ghc-regress/driver/recomp008/A2.hs b/testsuite/tests/ghc-regress/driver/recomp008/A2.hs deleted file mode 100644 index efc9207399..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/A2.hs +++ /dev/null @@ -1,8 +0,0 @@ -module A (T,t) where - -data T = T -t = T - -instance Eq T where - t1 == t2 = False - diff --git a/testsuite/tests/ghc-regress/driver/recomp008/B.hs b/testsuite/tests/ghc-regress/driver/recomp008/B.hs deleted file mode 100644 index b1b7491b07..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/B.hs +++ /dev/null @@ -1,4 +0,0 @@ -module B (T,t) where - -import A - diff --git a/testsuite/tests/ghc-regress/driver/recomp008/Main.hs b/testsuite/tests/ghc-regress/driver/recomp008/Main.hs deleted file mode 100644 index df246a3303..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/Main.hs +++ /dev/null @@ -1,5 +0,0 @@ -module Main where - -import B - -main = print (t == t) diff --git a/testsuite/tests/ghc-regress/driver/recomp008/Makefile b/testsuite/tests/ghc-regress/driver/recomp008/Makefile deleted file mode 100644 index 16392f5dd0..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/Makefile +++ /dev/null @@ -1,28 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -Main.o : B.hi -B.o : A.hi - -%.o : %.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -O -c $< -o $@ - -# magic .hi rule: see rules/hi-rule.mk in the GHC source tree -%.hi : %.o ; - -prog : A.o B.o Main.o - '$(TEST_HC)' $(TEST_HC_OPTS) -o prog A.o B.o Main.o - -clean : - $(RM) *.hi *.o prog - -recomp008 : - $(MAKE) clean - cp A1.hs A.hs - $(MAKE) prog - ./prog - sleep 1 - cp A2.hs A.hs - $(MAKE) prog - ./prog diff --git a/testsuite/tests/ghc-regress/driver/recomp008/all.T b/testsuite/tests/ghc-regress/driver/recomp008/all.T deleted file mode 100644 index a59b1512e0..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/all.T +++ /dev/null @@ -1,7 +0,0 @@ -# Test for #4469, a recompilation bug related to instances - -test('recomp008', - [ skip_if_fast, clean_cmd('$MAKE -s clean'), normalise_slashes ], - run_command, - ['$MAKE -s --no-print-directory recomp008']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp008/recomp008.stdout b/testsuite/tests/ghc-regress/driver/recomp008/recomp008.stdout deleted file mode 100644 index 1cc8b5e10d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp008/recomp008.stdout +++ /dev/null @@ -1,2 +0,0 @@ -True -False diff --git a/testsuite/tests/ghc-regress/driver/recomp009/Main.hs b/testsuite/tests/ghc-regress/driver/recomp009/Main.hs deleted file mode 100644 index b5e5424f9b..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/Main.hs +++ /dev/null @@ -1,4 +0,0 @@ -{-# LANGUAGE TemplateHaskell #-} -module Main where -import Sub -main = print $x diff --git a/testsuite/tests/ghc-regress/driver/recomp009/Makefile b/testsuite/tests/ghc-regress/driver/recomp009/Makefile deleted file mode 100644 index 7ebcae66af..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/Makefile +++ /dev/null @@ -1,20 +0,0 @@ -TOP=../../../.. -include $(TOP)/mk/boilerplate.mk -include $(TOP)/mk/test.mk - -# Recompilation tests - -clean: - rm -f *.o *.hi - rm -f B.hs C - -# bug #481 - -recomp009: clean - cp Sub1.hs Sub.hs - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs - ./Main - sleep 1 - cp Sub2.hs Sub.hs - -'$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make Main.hs - ./Main diff --git a/testsuite/tests/ghc-regress/driver/recomp009/Sub1.hs b/testsuite/tests/ghc-regress/driver/recomp009/Sub1.hs deleted file mode 100644 index 25ea7552e4..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/Sub1.hs +++ /dev/null @@ -1,3 +0,0 @@ -{-# LANGUAGE TemplateHaskell #-} -module Sub where -x = [| 1 |] diff --git a/testsuite/tests/ghc-regress/driver/recomp009/Sub2.hs b/testsuite/tests/ghc-regress/driver/recomp009/Sub2.hs deleted file mode 100644 index 7ca8b12c33..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/Sub2.hs +++ /dev/null @@ -1,3 +0,0 @@ -{-# LANGUAGE TemplateHaskell #-} -module Sub where -x = [| 2 |] diff --git a/testsuite/tests/ghc-regress/driver/recomp009/all.T b/testsuite/tests/ghc-regress/driver/recomp009/all.T deleted file mode 100644 index 368f6cf2f8..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/all.T +++ /dev/null @@ -1,7 +0,0 @@ -# Test for #481, a recompilation bug with Template Haskell - -test('recomp009', - [ clean_cmd('$MAKE -s clean') ], - run_command, - ['$MAKE -s --no-print-directory recomp009']) - diff --git a/testsuite/tests/ghc-regress/driver/recomp009/recomp009.stdout b/testsuite/tests/ghc-regress/driver/recomp009/recomp009.stdout deleted file mode 100644 index 1191247b6d..0000000000 --- a/testsuite/tests/ghc-regress/driver/recomp009/recomp009.stdout +++ /dev/null @@ -1,2 +0,0 @@ -1 -2 diff --git a/testsuite/tests/ghc-regress/driver/rtsOpts.hs b/testsuite/tests/ghc-regress/driver/rtsOpts.hs deleted file mode 100644 index 0634af001e..0000000000 --- a/testsuite/tests/ghc-regress/driver/rtsOpts.hs +++ /dev/null @@ -1,3 +0,0 @@ - -main :: IO () -main = return () diff --git a/testsuite/tests/ghc-regress/driver/rtsopts001.stdout b/testsuite/tests/ghc-regress/driver/rtsopts001.stdout deleted file mode 100644 index b9f151026d..0000000000 --- a/testsuite/tests/ghc-regress/driver/rtsopts001.stdout +++ /dev/null @@ -1,3 +0,0 @@ -Normal -No RTS opts -rtsOpts: Most RTS options are disabled. Link with -rtsopts to enable them. diff --git a/testsuite/tests/ghc-regress/driver/rtsopts002.hs b/testsuite/tests/ghc-regress/driver/rtsopts002.hs deleted file mode 100644 index 473bb8a252..0000000000 --- a/testsuite/tests/ghc-regress/driver/rtsopts002.hs +++ /dev/null @@ -1 +0,0 @@ -main = print "hello" diff --git a/testsuite/tests/ghc-regress/driver/rtsopts002.stderr b/testsuite/tests/ghc-regress/driver/rtsopts002.stderr deleted file mode 100644 index a92deb2b05..0000000000 --- a/testsuite/tests/ghc-regress/driver/rtsopts002.stderr +++ /dev/null @@ -1,2 +0,0 @@ -rtsopts002: Most RTS options are disabled. Link with -rtsopts to enable them. -rtsopts002: Most RTS options are disabled. Link with -rtsopts to enable them. diff --git a/testsuite/tests/ghc-regress/driver/rtsopts002.stdout b/testsuite/tests/ghc-regress/driver/rtsopts002.stdout deleted file mode 100644 index ac8108a43d..0000000000 --- a/testsuite/tests/ghc-regress/driver/rtsopts002.stdout +++ /dev/null @@ -1,2 +0,0 @@ -"hello" -"hello" diff --git a/testsuite/tests/ghc-regress/driver/shared001.stderr b/testsuite/tests/ghc-regress/driver/shared001.stderr deleted file mode 100644 index 26204ba300..0000000000 --- a/testsuite/tests/ghc-regress/driver/shared001.stderr +++ /dev/null @@ -1 +0,0 @@ -Creating library file: HSdll.dll.a diff --git a/testsuite/tests/ghc-regress/driver/werror.hs b/testsuite/tests/ghc-regress/driver/werror.hs deleted file mode 100644 index ddfa8449d6..0000000000 --- a/testsuite/tests/ghc-regress/driver/werror.hs +++ /dev/null @@ -1,13 +0,0 @@ -{-# OPTIONS_GHC -Wall -fwarn-tabs -Werror #-} - --- check that all warnings are emitted before failing due to -Werror (#1666) - --- missing type sig warning (type checker) -main = do - let main = main -- shadowing warning (renamer) - putStrLn "hello" -- tab warning (lexer) - -f [] = [] -f [] = [] -- overlapping pattern --- incomplete pattern - diff --git a/testsuite/tests/ghc-regress/driver/werror.stderr b/testsuite/tests/ghc-regress/driver/werror.stderr deleted file mode 100644 index c8e7894085..0000000000 --- a/testsuite/tests/ghc-regress/driver/werror.stderr +++ /dev/null @@ -1,28 +0,0 @@ - -werror.hs:6:1: - Warning: Top-level binding with no type signature: main :: IO () - -werror.hs:7:13: - Warning: This binding for `main' shadows the existing binding - defined at werror.hs:6:1 - -werror.hs:7:13: Warning: Defined but not used: `main' - -werror.hs:8:1: Warning: Tab character - -werror.hs:10:1: Warning: Defined but not used: `f' - -werror.hs:10:1: - Warning: Top-level binding with no type signature: - f :: forall t a. [t] -> [a] - -werror.hs:10:1: - Warning: Pattern match(es) are overlapped - In an equation for `f': f [] = ... - -werror.hs:10:1: - Warning: Pattern match(es) are non-exhaustive - In an equation for `f': Patterns not matched: _ : _ - -<no location info>: -Failing due to -Werror. diff --git a/testsuite/tests/ghc-regress/driver/withRtsOpts.hs b/testsuite/tests/ghc-regress/driver/withRtsOpts.hs deleted file mode 100644 index 0634af001e..0000000000 --- a/testsuite/tests/ghc-regress/driver/withRtsOpts.hs +++ /dev/null @@ -1,3 +0,0 @@ - -main :: IO () -main = return () diff --git a/testsuite/tests/ghc-regress/driver/withRtsOpts.stdout b/testsuite/tests/ghc-regress/driver/withRtsOpts.stdout deleted file mode 100644 index 0a21aace86..0000000000 --- a/testsuite/tests/ghc-regress/driver/withRtsOpts.stdout +++ /dev/null @@ -1 +0,0 @@ - [("GHC RTS", "YES") |