From 74eeb7160e7c44e4dd82daae71daf7df639eec57 Mon Sep 17 00:00:00 2001
From: Jonathan Shih <joncshih@gmail.com>
Date: Mon, 18 Apr 2016 06:52:26 -0700
Subject: [PATCH] Fix typo
---
exercises/list-ops/ListOpsTests.elm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/exercises/list-ops/ListOpsTests.elm b/exercises/list-ops/ListOpsTests.elm
index 6338ae1..129a74d 100644
--- a/exercises/list-ops/ListOpsTests.elm
+++ b/exercises/list-ops/ListOpsTests.elm
@@ -23,7 +23,7 @@ tests =
, suite
"map"
[ test "empty list" (assertEqual [] (map ((+) 1) []))
- , test "non-empty list" (assertEqual [ 2, 3, 4, 5 ] (map ((+) 1) [1..4]))
+ , test "non-empty list" (assertEqual [2..5] (map ((+) 1) [1..4]))
]
, suite
"filter"
@@ -33,7 +33,7 @@ tests =
(assertEqual [ 2, 4 ] (filter (\x -> x % 2 == 0) [1..4]))
]
, suite
- "foldr"
+ "foldl"
[ test "empty list" (assertEqual 0 (foldl (+) 0 []))
, test "non-empty list" (assertEqual 10 (foldl (+) 0 [1..4]))
]