add HLS and switch to qualified post

1 files changed, 4 insertions, 3 deletions

diff --git a/src/PPL/Sampling.hs b/src/PPL/Sampling.hs
index 7c2cb54..d397ca8 100644
--- a/src/PPL/Sampling.hs
+++ b/src/PPL/Sampling.hs
@@ -1,5 +1,6 @@
 {-# LANGUAGE BangPatterns #-}
 {-# LANGUAGE BlockArguments #-}
+{-# LANGUAGE ImportQualifiedPost #-}
 {-# LANGUAGE LambdaCase #-}
 {-# LANGUAGE TupleSections #-}
 {-# LANGUAGE ViewPatterns #-}
@@ -12,14 +13,14 @@ where
 import Control.Monad
 import Control.Monad.IO.Class
 import Data.IORef
-import qualified Data.Vector.Hashtables as H
-import qualified Data.Vector.Unboxed as V
+import Data.Vector.Hashtables qualified as H
+import Data.Vector.Unboxed qualified as V
 import Data.Word
 import Numeric.Log
 import PPL.Internal
 import Streaming.Prelude (Of, Stream, yield)
 import System.Random (StdGen)
-import qualified System.Random as R
+import System.Random qualified as R
 
 mh :: (MonadIO m) => StdGen -> Double -> Meas a -> Stream (Of (a, Log Double)) m ()
 mh g p m = do