From 0daa03d95812478bba8c627da25117dc480ad8be Mon Sep 17 00:00:00 2001 From: Tissevert Date: Tue, 21 May 2019 09:07:37 +0200 Subject: [PATCH] Remove commented out dead code --- src/PDF/Output.hs | 11 ----------- 1 file changed, 11 deletions(-) diff --git a/src/PDF/Output.hs b/src/PDF/Output.hs index f310b89..bcbb01a 100644 --- a/src/PDF/Output.hs +++ b/src/PDF/Output.hs @@ -19,29 +19,18 @@ module PDF.Output ( , render ) where ---import Data.ByteString.Builder (Builder, char8, lazyByteString, string8) import Data.ByteString.Builder (Builder, char8, lazyByteString, string8, toLazyByteString) import Data.ByteString.Lazy.Char8 (ByteString) import qualified Data.ByteString.Lazy.Char8 as BS (length) import Data.Int (Int64) import Data.Map (Map) import qualified Data.Map as Map (singleton) --- #if MIN_VERSION_base(4,9,0) --- import qualified Data.Semigroup as Sem --- #endif import Data.String (IsString(..)) ---import Control.Monad.Reader (MonadReader(..), Reader, runReader) ---import Control.Monad.Reader (MonadReader(..), Reader, runReader) ---import Control.Monad.Reader (MonadReader(..), Reader, runReader) import Control.Monad.RWS (RWS, runRWS, ask, get, listen, modify, tell) import qualified PDF.EOL as EOL (Style(..)) data Offset = StartXRef | ObjectId Int deriving (Eq, Ord) -{- -incrOffset :: (Int64 -> Int64) -> OutputState --} - newtype OContext a = OContext (RWS EOL.Style (Map Offset Int64) Int64 a) type OBuilder = OContext Builder