summaryrefslogtreecommitdiff
path: root/Data/FastQ.hs
diff options
context:
space:
mode:
authorJustin Bedo <cu@cua0.org>2023-08-03 16:25:16 +1000
committerJustin Bedo <cu@cua0.org>2023-08-03 23:34:27 +1000
commit04685332602ebcb6c0429026aa1def55f4c8c483 (patch)
tree23dd44766e5d5206aafa9187187cae16872e3808 /Data/FastQ.hs
parentae32b54617ab7bd5d24764d0d85a7a08a9e8d461 (diff)
tidy code
Diffstat (limited to 'Data/FastQ.hs')
-rw-r--r--Data/FastQ.hs7
1 files changed, 2 insertions, 5 deletions
diff --git a/Data/FastQ.hs b/Data/FastQ.hs
index 217d58a..850ac5c 100644
--- a/Data/FastQ.hs
+++ b/Data/FastQ.hs
@@ -3,33 +3,30 @@
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE ViewPatterns #-}
+{-# OPTIONS_GHC -Wno-incomplete-uni-patterns #-}
module Data.FastQ where
import Codec.Compression.GZip
-import Data.Bifunctor (bimap)
import Control.Monad
import Control.Monad.IO.Class (MonadIO, liftIO)
+import Data.Bifunctor (bimap)
import Data.ByteString (ByteString)
import qualified Data.ByteString as B
import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy as BSL
import qualified Data.ByteString.Lazy.Internal as BSL
import Data.Function
-import Data.Void
import Data.Word (Word8)
-import Debug.Trace
import Lens.Micro
import Lens.Micro.TH
import Streamly.Data.Array (Array)
-import Streamly.Data.Fold as F
import Streamly.Data.Stream (Stream)
import qualified Streamly.Data.Stream as S
import qualified Streamly.External.ByteString as SB
import Streamly.Internal.Data.Stream.Chunked as AS
import Streamly.Internal.Data.Stream.StreamD.Type (Step (..))
import Streamly.Internal.Data.Unfold.Type (Unfold (..))
-import qualified Streamly.Internal.FileSystem.File as File
import System.IO
import System.IO.Unsafe (unsafeInterleaveIO)
import Prelude hiding (Read)