diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2025-11-10 21:57:54 +0100 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2025-11-10 21:57:54 +0100 |
| commit | 57eb321eaeabc53c8c8b83d0554d8a8cca6eed76 (patch) | |
| tree | d1343698f4918480b53f57ebb063f08fb068550a /src/CHAD/Compile.hs | |
| parent | 174af2ba568de66e0d890825b8bda930b8e7bb96 (diff) | |
Use ImportQualifiedPost
Diffstat (limited to 'src/CHAD/Compile.hs')
| -rw-r--r-- | src/CHAD/Compile.hs | 13 |
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). |
