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/ghci/prog005 | |
| parent | ebd422aed41048476aa61dd4c520d43becd78682 (diff) | |
| download | haskell-16514f272fb42af6e9c7674a9bd6c9dce369231f.tar.gz | |
Move tests from tests/ghc-regress/* to just tests/*
Diffstat (limited to 'testsuite/tests/ghci/prog005')
| -rw-r--r-- | testsuite/tests/ghci/prog005/A.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/ghci/prog005/B.hs | 4 | ||||
| -rw-r--r-- | testsuite/tests/ghci/prog005/Makefile | 3 | ||||
| -rw-r--r-- | testsuite/tests/ghci/prog005/prog005.T | 2 | ||||
| -rw-r--r-- | testsuite/tests/ghci/prog005/prog005.script | 17 | ||||
| -rw-r--r-- | testsuite/tests/ghci/prog005/prog005.stdout | 2 |
6 files changed, 30 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/prog005/A.hs b/testsuite/tests/ghci/prog005/A.hs new file mode 100644 index 0000000000..e14d0ebe45 --- /dev/null +++ b/testsuite/tests/ghci/prog005/A.hs @@ -0,0 +1,2 @@ +module A where +x = 1 :: Int diff --git a/testsuite/tests/ghci/prog005/B.hs b/testsuite/tests/ghci/prog005/B.hs new file mode 100644 index 0000000000..57b34b2be2 --- /dev/null +++ b/testsuite/tests/ghci/prog005/B.hs @@ -0,0 +1,4 @@ +module B (y) where +import A +y = 2 :: Int +z = 3 :: Int diff --git a/testsuite/tests/ghci/prog005/Makefile b/testsuite/tests/ghci/prog005/Makefile new file mode 100644 index 0000000000..9101fbd40a --- /dev/null +++ b/testsuite/tests/ghci/prog005/Makefile @@ -0,0 +1,3 @@ +TOP=../../.. +include $(TOP)/mk/boilerplate.mk +include $(TOP)/mk/test.mk diff --git a/testsuite/tests/ghci/prog005/prog005.T b/testsuite/tests/ghci/prog005/prog005.T new file mode 100644 index 0000000000..ca2bfe5237 --- /dev/null +++ b/testsuite/tests/ghci/prog005/prog005.T @@ -0,0 +1,2 @@ +test('prog005', normal, ghci_script, ['prog005.script']) + diff --git a/testsuite/tests/ghci/prog005/prog005.script b/testsuite/tests/ghci/prog005/prog005.script new file mode 100644 index 0000000000..d7ca33fa83 --- /dev/null +++ b/testsuite/tests/ghci/prog005/prog005.script @@ -0,0 +1,17 @@ +:unset +s +:unset +t + +:load B + +-- eval something that isn't exported from B +z + +:!sleep 1 +:!touch A.hs +:reload + +-- A should be recompiled, B will be skipped. We should still have +-- the full top-level scope of B available, though. This was +-- nearly broken in GHC 6.4 +z + diff --git a/testsuite/tests/ghci/prog005/prog005.stdout b/testsuite/tests/ghci/prog005/prog005.stdout new file mode 100644 index 0000000000..a5c8806279 --- /dev/null +++ b/testsuite/tests/ghci/prog005/prog005.stdout @@ -0,0 +1,2 @@ +3 +3 |