From 5ed6e2a148acba7702f383b15077e488eff108b7 Mon Sep 17 00:00:00 2001 From: Justin Bedo Date: Thu, 8 Jan 2026 10:33:47 +1100 Subject: add HLS and switch to qualified post --- src/PPL/Internal.hs | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'src/PPL/Internal.hs') diff --git a/src/PPL/Internal.hs b/src/PPL/Internal.hs index a5b3758..7ac884b 100644 --- a/src/PPL/Internal.hs +++ b/src/PPL/Internal.hs @@ -1,6 +1,7 @@ {-# LANGUAGE DataKinds #-} {-# LANGUAGE GADTs #-} {-# LANGUAGE GeneralizedNewtypeDeriving #-} +{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ScopedTypeVariables #-} @@ -27,14 +28,14 @@ import Data.Bifunctor import Data.Bits import Data.IORef import Data.Monoid -import qualified Data.Vector.Hashtables as H -import qualified Data.Vector.Unboxed.Mutable as UM +import Data.Vector.Hashtables qualified as H +import Data.Vector.Unboxed.Mutable qualified as UM import Data.Word -import qualified Language.Haskell.TH.Syntax as TH +import Language.Haskell.TH.Syntax qualified as TH import Numeric.Log import System.IO.Unsafe import System.Random hiding (split, uniform) -import qualified System.Random as R +import System.Random qualified as R type HashMap k v = H.Dictionary (H.PrimState IO) UM.MVector k UM.MVector v -- cgit v1.2.3