From f614a840036aabb059017d03cf365f4199b9547b Mon Sep 17 00:00:00 2001
From: Dzmitry Shuysky <errfrom@yandex.ru>
Date: Fri, 7 Jul 2023 13:59:38 +0200
Subject: [PATCH] build!: drop `sequences` dependency

---
 packages.dhall | 25 +------------------------
 spago.dhall    |  1 -
 src/Aeson.purs |  7 -------
 3 files changed, 1 insertion(+), 32 deletions(-)

diff --git a/packages.dhall b/packages.dhall
index 2837f27..777ecf8 100644
--- a/packages.dhall
+++ b/packages.dhall
@@ -109,30 +109,7 @@ let upstream =
         sha256:3e9fbc9ba03e9a1fcfd895f65e2d50ee2f5e86c4cd273f3d5c841b655a0e1bda
 
 let additions =
-      { sequences =
-        { dependencies =
-          [ "arrays"
-          , "assert"
-          , "console"
-          , "effect"
-          , "lazy"
-          , "maybe"
-          , "newtype"
-          , "nonempty"
-          , "partial"
-          , "prelude"
-          , "profunctor"
-          , "psci-support"
-          , "quickcheck"
-          , "quickcheck-laws"
-          , "tuples"
-          , "unfoldable"
-          , "unsafe-coerce"
-          ]
-        , repo = "https://github.com/garganscript/purescript-sequences"
-        , version = "cae456c1a7463785ad33981a93e7a9cb5fc7872c"
-        }
-      , mote =
+      { mote =
         { dependencies = [ "these", "transformers", "arrays" ]
         , repo = "https://github.com/garyb/purescript-mote"
         , version = "v1.1.0"
diff --git a/spago.dhall b/spago.dhall
index 079e926..2a1f6e8 100644
--- a/spago.dhall
+++ b/spago.dhall
@@ -29,7 +29,6 @@ You can edit this file as you like.
   , "prelude"
   , "quickcheck"
   , "record"
-  , "sequences"
   , "spec"
   , "strings"
   , "tuples"
diff --git a/src/Aeson.purs b/src/Aeson.purs
index 624b1ba..73e548f 100644
--- a/src/Aeson.purs
+++ b/src/Aeson.purs
@@ -118,7 +118,6 @@ import Data.Map (Map)
 import Data.Map as Map
 import Data.Maybe (Maybe(..), fromJust, maybe)
 import Data.Number (isFinite, isNaN) as Number
-import Data.Sequence (Seq)
 import Data.Set (Set)
 import Data.Set as Set
 import Data.Symbol (class IsSymbol, reflectSymbol)
@@ -666,9 +665,6 @@ instance DecodeAeson a => DecodeAeson (L.List a) where
 instance DecodeAeson a => DecodeAeson (LL.List a) where
   decodeAeson x = toUnfoldable <$> decodeAeson x
 
-instance DecodeAeson a => DecodeAeson (Seq a) where
-  decodeAeson x = toUnfoldable <$> decodeAeson x
-
 instance (Ord a, DecodeAeson a) => DecodeAeson (Set a) where
   decodeAeson x = Set.fromFoldable <$> (decodeAeson x :: _ (Array _))
 
@@ -835,9 +831,6 @@ instance EncodeAeson a => EncodeAeson (L.List a) where
 instance EncodeAeson a => EncodeAeson (LL.List a) where
   encodeAeson = encodeAeson <<< fromFoldable
 
-instance EncodeAeson a => EncodeAeson (Seq a) where
-  encodeAeson = encodeAeson <<< fromFoldable
-
 instance (EncodeAeson a) => EncodeAeson (Set a) where
   encodeAeson x = encodeAeson $ (Set.toUnfoldable x :: Array _)