Disable debug logging on thunk force
This commit is contained in:
parent
59698de718
commit
48ed345075
|
@ -15,7 +15,6 @@ import Control.Exception hiding ( catch )
|
|||
import Control.Monad.Catch
|
||||
|
||||
import Nix.Thunk
|
||||
import Nix.Utils
|
||||
import Nix.Var
|
||||
|
||||
data Deferred m v = Deferred (m v) | Computed v
|
||||
|
@ -75,7 +74,6 @@ forceThunk (Thunk n active ref) k = do
|
|||
if nowActive
|
||||
then throwM $ ThunkLoop $ show n
|
||||
else do
|
||||
traceM $ "Forcing " ++ show n
|
||||
v <- catch action $ \(e :: SomeException) -> do
|
||||
_ <- atomicModifyVar active (False, )
|
||||
throwM e
|
||||
|
|
Loading…
Reference in New Issue