aboutsummaryrefslogtreecommitdiff
path: root/src/CHAD/Compile.hs
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2025-11-10 21:57:54 +0100
committerTom Smeding <tom@tomsmeding.com>2025-11-10 21:57:54 +0100
commit57eb321eaeabc53c8c8b83d0554d8a8cca6eed76 (patch)
treed1343698f4918480b53f57ebb063f08fb068550a /src/CHAD/Compile.hs
parent174af2ba568de66e0d890825b8bda930b8e7bb96 (diff)
Use ImportQualifiedPost
Diffstat (limited to 'src/CHAD/Compile.hs')
-rw-r--r--src/CHAD/Compile.hs13
1 files changed, 7 insertions, 6 deletions
diff --git a/src/CHAD/Compile.hs b/src/CHAD/Compile.hs
index 5b71651..38bef8c 100644
--- a/src/CHAD/Compile.hs
+++ b/src/CHAD/Compile.hs
@@ -2,6 +2,7 @@
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
+{-# LANGUAGE ImportQualifiedPost #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE MultiWayIf #-}
@@ -20,16 +21,16 @@ import Data.Bifunctor (first)
import Data.Char (ord)
import Data.Foldable (toList)
import Data.Functor.Const
-import qualified Data.Functor.Product as Product
+import Data.Functor.Product qualified as Product
import Data.Functor.Product (Product)
import Data.IORef
import Data.List (foldl1', intersperse, intercalate)
-import qualified Data.Map.Strict as Map
+import Data.Map.Strict qualified as Map
import Data.Maybe (fromMaybe)
-import qualified Data.Set as Set
+import Data.Set qualified as Set
import Data.Set (Set)
import Data.Some
-import qualified Data.Vector as V
+import Data.Vector qualified as V
import Foreign
import GHC.Exts (int2Word#, addr2Int#)
import GHC.Num (integerFromWord#)
@@ -41,7 +42,7 @@ import System.IO.Error (mkIOError, userErrorType)
import System.IO.Unsafe (unsafePerformIO)
import Prelude hiding ((^))
-import qualified Prelude
+import Prelude qualified
import CHAD.Array
import CHAD.AST
@@ -50,7 +51,7 @@ import CHAD.AST.Sparse.Types (isDense)
import CHAD.Compile.Exec
import CHAD.Data
import CHAD.Interpreter.Rep
-import qualified CHAD.Util.IdGen as IdGen
+import CHAD.Util.IdGen qualified as IdGen
-- In shape and index arrays, the innermost dimension is on the right (last index).