Skip to content

Commit 9f5d7b6

Browse files
committed
Add a test for reevaluation
1 parent 020a923 commit 9f5d7b6

File tree

3 files changed

+14
-1
lines changed

3 files changed

+14
-1
lines changed

test/functional/Eval.hs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -49,7 +49,8 @@ tests =
4949
testCase "Evaluation of expressions" $ goldenTest "T1.hs",
5050
testCase "Reevaluation of expressions" $ goldenTest "T2.hs",
5151
testCase "Evaluation of expressions w/ imports" $ goldenTest "T3.hs",
52-
testCase "Evaluation of expressions w/ lets" $ goldenTest "T4.hs"
52+
testCase "Refresh an evaluation" $ goldenTest "T5.hs"
53+
testCase "Evaluation of expressions w/ lets" $ goldenTest "T4.hs",
5354
]
5455

5556
goldenTest :: FilePath -> IO ()

test/testdata/eval/T5.hs

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
module T5 where
2+
3+
-- >>> unwords example
4+
-- "This is a stale example of evaluation"
5+
example :: [String]
6+
example = ["This","is","an","example","of","evaluation"]

test/testdata/eval/T5.hs.expected

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
module T5 where
2+
3+
-- >>> unwords example
4+
-- "This is an example of evaluation"
5+
example :: [String]
6+
example = ["This","is","an","example","of","evaluation"]

0 commit comments

Comments
 (0)