io-classes: fixed building haddocks with ghc-8.10

Author: coot

io-classes/src/Control/Monad/Class/MonadSTM/Internal.hs

@@ -99,12 +99,6 @@ module Control.Monad.Class.MonadSTM.Internal
   , labelTChanDefault
   ) where
 
--- $default-implementations
---
--- The default implementations are based on a `TVar` defined in the class.  They
--- are tailored towards `IOSim` rather than instances which would like to derive
--- from `IO` or monad transformers.
-
 import           Prelude hiding (read)
 
 import qualified Control.Concurrent.STM.TArray as STM
@@ -136,6 +130,13 @@ import           GHC.Stack
 import           Numeric.Natural (Natural)
 
 
+-- $default-implementations
+--
+-- The default implementations are based on a `TVar` defined in the class.  They
+-- are tailored towards `IOSim` rather than instances which would like to derive
+-- from `IO` or monad transformers.
+
+
 -- | The STM primitives parametrised by a monad `m`.
 --
 class (Monad m, Monad (STM m)) => MonadSTM m where