Merge pull request #234 from MangoIV/mangoiv/perf

[fix] remove space leaks in (,) by using strict state
NixOS · Aug 16, 2024 · 14be7e6 · 14be7e6
2 parents 2d79e0f + f2d0b17
commit 14be7e6
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/Nixfmt/Lexer.hs b/src/Nixfmt/Lexer.hs
@@ -5,7 +5,7 @@
 
 module Nixfmt.Lexer (lexeme, pushTrivia, takeTrivia, whole) where
 
-import Control.Monad.State (MonadState, evalStateT, get, modify, put)
+import Control.Monad.State.Strict (MonadState, evalStateT, get, modify, put)
 import Data.Char (isSpace)
 import Data.List (dropWhileEnd)
 import Data.Maybe (fromMaybe)

diff --git a/src/Nixfmt/Types.hs b/src/Nixfmt/Types.hs
@@ -44,7 +44,7 @@ module Nixfmt.Types (
   walkSubprograms,
 ) where
 
-import Control.Monad.State (StateT)
+import Control.Monad.State.Strict (StateT)
 import Data.Bifunctor (first)
 import Data.Foldable (toList)
 import Data.Function (on)