From 5bc1f5555ff9cd42ca4e1efb2770d4943e74f4bf Mon Sep 17 00:00:00 2001 From: Gary Burgess Date: Mon, 6 May 2019 23:24:59 +0100 Subject: [PATCH 1/2] Fix shadowed variable warning --- src/Data/List/Lazy/Types.purs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Data/List/Lazy/Types.purs b/src/Data/List/Lazy/Types.purs index 7728ead..57f9d26 100644 --- a/src/Data/List/Lazy/Types.purs +++ b/src/Data/List/Lazy/Types.purs @@ -195,10 +195,10 @@ instance extendList :: Extend List where Nil -> nil Cons a as -> f l : (foldr go { val: nil, acc: nil } as).val - where - go a { val, acc } = - let acc' = a : acc - in { val: f acc' : val, acc: acc' } + where + go a { val, acc } = + let acc' = a : acc + in { val: f acc' : val, acc: acc' } newtype NonEmptyList a = NonEmptyList (Lazy (NonEmpty List a)) From 6ffd6b436c7cb9bb006ca7d69301508a97ae124f Mon Sep 17 00:00:00 2001 From: Gary Burgess Date: Mon, 6 May 2019 23:25:25 +0100 Subject: [PATCH 2/2] Remove unused imports --- test/Test/Data/List/NonEmpty.purs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/Test/Data/List/NonEmpty.purs b/test/Test/Data/List/NonEmpty.purs index 71640d4..e3cd1ee 100644 --- a/test/Test/Data/List/NonEmpty.purs +++ b/test/Test/Data/List/NonEmpty.purs @@ -11,7 +11,7 @@ import Data.Monoid.Additive (Additive(..)) import Data.NonEmpty ((:|)) import Data.TraversableWithIndex (traverseWithIndex) import Data.Tuple (Tuple(..)) -import Data.Unfoldable (replicate, replicate1, unfoldr, unfoldr1) +import Data.Unfoldable (replicate1, unfoldr1) import Effect (Effect) import Effect.Console (log) import Test.Assert (assert)