aboutsummaryrefslogtreecommitdiff
path: root/src/PPL/Internal.hs
diff options
context:
space:
mode:
authorJustin Bedo <cu@cua0.org>2026-01-08 10:33:47 +1100
committerJustin Bedo <cu@cua0.org>2026-01-08 10:33:47 +1100
commit5ed6e2a148acba7702f383b15077e488eff108b7 (patch)
treed1ee94363b2d624a286213ad0a04443fa954bf4d /src/PPL/Internal.hs
parent41e567d5e2e105ba391536f46571995b4cfa009f (diff)
add HLS and switch to qualified post
Diffstat (limited to 'src/PPL/Internal.hs')
-rw-r--r--src/PPL/Internal.hs9
1 files changed, 5 insertions, 4 deletions
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