From 65f93904c079cb5cfc0302e102cb72ee86d104cd Mon Sep 17 00:00:00 2001 From: Philippe Pittoli Date: Sat, 20 May 2023 00:48:49 +0200 Subject: [PATCH] No more redundant imports. --- src/App/IPC.purs | 23 ++++++----------------- 1 file changed, 6 insertions(+), 17 deletions(-) diff --git a/src/App/IPC.purs b/src/App/IPC.purs index 6323613..efaead7 100644 --- a/src/App/IPC.purs +++ b/src/App/IPC.purs @@ -1,18 +1,13 @@ module App.IPC (toIPC, fromIPC) where -import Prelude +import Prelude (bind, discard, ($), (>>>)) import Effect (Effect) -import Effect.Class (class MonadEffect, liftEffect) -import Effect.Class.Console as Console +import Effect.Class (liftEffect) -import Data.Maybe -import Data.UInt (UInt, fromInt, toInt) -import Data.Array (drop, cons) +import Data.UInt (fromInt) import Data.ArrayBuffer.ArrayBuffer as ArrayBuffer -import Data.ArrayBuffer.Types (DataView, ArrayBuffer(..)) -import Data.ArrayBuffer.Typed (buffer) -import Data.ArrayBuffer.ArrayBuffer as AB +import Data.ArrayBuffer.Types (ArrayBuffer, DataView) import Data.ArrayBuffer.Builder as Builder import Data.ArrayBuffer.Cast as Cast @@ -23,19 +18,13 @@ import Data.ArrayBuffer.Typed as Typed import Data.ArrayBuffer.DataView as DataView import Parsing.DataView as Parsing.DataView import Parsing as Parsing -import Parsing (ParserT(..), ParseError(..), runParserT) - -import Data.String.CodeUnits as CU +import Parsing (ParseError, ParserT, runParserT) import Web.Encoding.TextEncoder as TextEncoder import Web.Encoding.TextDecoder as TextDecoder import Web.Encoding.UtfLabel as UtfLabel -import Data.Char (fromCharCode) - -import Data.ArrayBuffer.DataView as DV -import Effect.Unsafe -import Data.Either (Either(Left, Right), either, note, hush) +import Data.Either (Either) import Effect.Exception as Exception utf8ToArrayBuffer :: String -> Effect ArrayBuffer