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