Skip to content

Commit 8e99c39

Browse files
remove unused parameters
1 parent 8d6d263 commit 8e99c39

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

test/Test/Data/String/CodePoints.purs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -46,8 +46,8 @@ testStringCodePoints = do
4646
assert $ drop 8 str == ""
4747

4848
log "dropWhile"
49-
assert $ dropWhile (\c -> true) str == ""
50-
assert $ dropWhile (\c -> false) str == str
49+
assert $ dropWhile (\_ -> true) str == ""
50+
assert $ dropWhile (\_ -> false) str == str
5151
assert $ dropWhile (\c -> codePointToInt c < 0xFFFF) str == "\x16805\x16A06\&z"
5252
assert $ dropWhile (\c -> codePointToInt c < 0xDC00) str == "\xDC00\xD800\xD800\x16805\x16A06\&z"
5353

@@ -161,8 +161,8 @@ testStringCodePoints = do
161161
assert $ take 8 str == str
162162

163163
log "takeWhile"
164-
assert $ takeWhile (\c -> true) str == str
165-
assert $ takeWhile (\c -> false) str == ""
164+
assert $ takeWhile (\_ -> true) str == str
165+
assert $ takeWhile (\_ -> false) str == ""
166166
assert $ takeWhile (\c -> codePointToInt c < 0xFFFF) str == "a\xDC00\xD800\xD800"
167167
assert $ takeWhile (\c -> codePointToInt c < 0xDC00) str == "a"
168168

0 commit comments

Comments
 (0)