summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-api/T10052
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghc-api/T10052')
-rw-r--r--testsuite/tests/ghc-api/T10052/Makefile12
-rw-r--r--testsuite/tests/ghc-api/T10052/T10052-input.hs1
-rw-r--r--testsuite/tests/ghc-api/T10052/T10052.hs30
-rw-r--r--testsuite/tests/ghc-api/T10052/T10052.stderr3
-rw-r--r--testsuite/tests/ghc-api/T10052/T10052.stdout1
-rw-r--r--testsuite/tests/ghc-api/T10052/all.T2
6 files changed, 0 insertions, 49 deletions
diff --git a/testsuite/tests/ghc-api/T10052/Makefile b/testsuite/tests/ghc-api/T10052/Makefile
deleted file mode 100644
index a94ec4ed39..0000000000
--- a/testsuite/tests/ghc-api/T10052/Makefile
+++ /dev/null
@@ -1,12 +0,0 @@
-TOP=../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
-
-clean:
- rm -f *.o *.hi
-
-T10052: clean
- '$(TEST_HC)' $(TEST_HC_OPTS) --make -v0 -package ghc T10052
- ./T10052 "`'$(TEST_HC)' $(TEST_HC_OPTS) --print-libdir | tr -d '\r'`" -XScopedTypeVariables -O
-
-.PHONY: clean T10052
diff --git a/testsuite/tests/ghc-api/T10052/T10052-input.hs b/testsuite/tests/ghc-api/T10052/T10052-input.hs
deleted file mode 100644
index 89879a7195..0000000000
--- a/testsuite/tests/ghc-api/T10052/T10052-input.hs
+++ /dev/null
@@ -1 +0,0 @@
-main = let (x :: String) = "hello" in putStrLn x
diff --git a/testsuite/tests/ghc-api/T10052/T10052.hs b/testsuite/tests/ghc-api/T10052/T10052.hs
deleted file mode 100644
index c2df4ae983..0000000000
--- a/testsuite/tests/ghc-api/T10052/T10052.hs
+++ /dev/null
@@ -1,30 +0,0 @@
-{-# LANGUAGE RecordWildCards #-}
-{-# OPTIONS_GHC -Wall #-}
-module Main where
-
-import System.Environment
-import GHC
-
-main :: IO ()
-main = do
- flags <- getArgs
- runGhc' flags $ do
- setTargets [Target (TargetFile "T10052-input.hs" Nothing) True Nothing]
- _success <- load LoadAllTargets
- return ()
-
-runGhc' :: [String] -> Ghc a -> IO a
-runGhc' args act = do
- let libdir = head args
- flags = tail args
- (dynFlags, _warns) <- parseStaticFlags (map noLoc flags)
- runGhc (Just libdir) $ do
- dflags0 <- getSessionDynFlags
- (dflags1, _leftover, _warns) <- parseDynamicFlags dflags0 dynFlags
- let dflags2 = dflags1 {
- hscTarget = HscInterpreted
- , ghcLink = LinkInMemory
- , verbosity = 1
- }
- _newPkgs <- setSessionDynFlags dflags2
- act
diff --git a/testsuite/tests/ghc-api/T10052/T10052.stderr b/testsuite/tests/ghc-api/T10052/T10052.stderr
deleted file mode 100644
index d298a59365..0000000000
--- a/testsuite/tests/ghc-api/T10052/T10052.stderr
+++ /dev/null
@@ -1,3 +0,0 @@
-
-<no location info>: Warning:
- -O conflicts with --interactive; -O ignored.
diff --git a/testsuite/tests/ghc-api/T10052/T10052.stdout b/testsuite/tests/ghc-api/T10052/T10052.stdout
deleted file mode 100644
index 1a909eb36f..0000000000
--- a/testsuite/tests/ghc-api/T10052/T10052.stdout
+++ /dev/null
@@ -1 +0,0 @@
-[1 of 1] Compiling Main ( T10052-input.hs, interpreted )
diff --git a/testsuite/tests/ghc-api/T10052/all.T b/testsuite/tests/ghc-api/T10052/all.T
deleted file mode 100644
index bb73f85fa1..0000000000
--- a/testsuite/tests/ghc-api/T10052/all.T
+++ /dev/null
@@ -1,2 +0,0 @@
-test('T10052', normal, run_command,
- ['$MAKE -s --no-print-directory T10052'])