summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/ghci/prog002
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghc-regress/ghci/prog002')
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/A.hs6
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/A1.hs6
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/A2.hs6
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/B.hs7
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/C.hs5
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/D.hs5
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/prog002.T2
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/prog002.script45
-rw-r--r--testsuite/tests/ghc-regress/ghci/prog002/prog002.stdout12
10 files changed, 0 insertions, 97 deletions
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/A.hs b/testsuite/tests/ghc-regress/ghci/prog002/A.hs
deleted file mode 100644
index 6dc493aaa2..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/A.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module A where
-
-data T = A Int | B Float deriving Eq
-
-f :: Int -> Int
-f x = x + 3
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/A1.hs b/testsuite/tests/ghc-regress/ghci/prog002/A1.hs
deleted file mode 100644
index 069e8ef07a..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/A1.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module A where
-
-data T = A Int | B Float deriving Eq
-
-f :: Double -> Double
-f x = x + x
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/A2.hs b/testsuite/tests/ghc-regress/ghci/prog002/A2.hs
deleted file mode 100644
index 6dc493aaa2..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/A2.hs
+++ /dev/null
@@ -1,6 +0,0 @@
-module A where
-
-data T = A Int | B Float deriving Eq
-
-f :: Int -> Int
-f x = x + 3
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/B.hs b/testsuite/tests/ghc-regress/ghci/prog002/B.hs
deleted file mode 100644
index 6aced23415..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/B.hs
+++ /dev/null
@@ -1,7 +0,0 @@
-module B (f, g, h) where
-
-import A
-
-g x = f x + 1
-
-h x = x `div` 2
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/C.hs b/testsuite/tests/ghc-regress/ghci/prog002/C.hs
deleted file mode 100644
index b3baac2979..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/C.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module C (module B, module C) where
-
-import B
-
-k x = x `mod` 11
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/D.hs b/testsuite/tests/ghc-regress/ghci/prog002/D.hs
deleted file mode 100644
index 35672bd88c..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/D.hs
+++ /dev/null
@@ -1,5 +0,0 @@
-module Main where
-
-import C
-
-main = print ("hello world" ++ show (f 42))
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/Makefile b/testsuite/tests/ghc-regress/ghci/prog002/Makefile
deleted file mode 100644
index 1c39d1c1fe..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/Makefile
+++ /dev/null
@@ -1,3 +0,0 @@
-TOP=../../../..
-include $(TOP)/mk/boilerplate.mk
-include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/prog002.T b/testsuite/tests/ghc-regress/ghci/prog002/prog002.T
deleted file mode 100644
index ea39005f6f..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/prog002.T
+++ /dev/null
@@ -1,2 +0,0 @@
-test('prog002', extra_clean(['A.hi']), ghci_script, ['prog002.script'])
-
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/prog002.script b/testsuite/tests/ghc-regress/ghci/prog002/prog002.script
deleted file mode 100644
index cecbe4091a..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/prog002.script
+++ /dev/null
@@ -1,45 +0,0 @@
-:unset +s
-:unset +t
-
-:l ../shell.hs
-:def shell (\s -> do shell s; return "")
-
--- first, clean up:
-:shell rm -f *.hi *.o *~
-:shell cp A1.hs A.hs
-
-:load D.hs
-
--- compile A & reload
-:shell "$HC" $HC_OPTS -fforce-recomp -c A.hs
-:reload
-
-B.g 42
-B.g 42
-B.g 42
-
--- swap A2 for A, compile & reload
-:shell sleep 1
-:shell cp A2.hs A.hs
-:shell "$HC" $HC_OPTS -fforce-recomp -c A.hs
-:reload
--- the system should ignore the compiled version and compile its own.
-
-B.g 42
-B.g 42
-B.g 42
-
--- pick up newly compiled A
-:load D.hs
-
-B.g 42
-B.g 42
-B.g 42
-
--- remove A.o: system should recompile A
-:shell rm A.o
-:reload
-
-B.g 42
-B.g 42
-B.g 42
diff --git a/testsuite/tests/ghc-regress/ghci/prog002/prog002.stdout b/testsuite/tests/ghc-regress/ghci/prog002/prog002.stdout
deleted file mode 100644
index aece15514e..0000000000
--- a/testsuite/tests/ghc-regress/ghci/prog002/prog002.stdout
+++ /dev/null
@@ -1,12 +0,0 @@
-85.0
-85.0
-85.0
-46
-46
-46
-46
-46
-46
-46
-46
-46