Skip to content

Commit f42e4c9

Browse files
committed
Remove very verbose debug statements
1 parent eb60c44 commit f42e4c9

File tree

1 file changed

+0
-3
lines changed

1 file changed

+0
-3
lines changed

src/Nix/Exec.hs

Lines changed: 0 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -298,13 +298,11 @@ callFunc fun arg = demand fun $ \fun' -> do
298298
"Function call stack exhausted"
299299
case fun' of
300300
NVClosure params f -> do
301-
traceM $ "callFunc:NVFunction taking " ++ show params
302301
f arg
303302
NVBuiltin name f -> do
304303
span <- currentPos
305304
withFrame Info (Calling @m @t name span) (f arg)
306305
s@(NVSet m _) | Just f <- M.lookup "__functor" m -> do
307-
traceM "callFunc:__functor"
308306
demand f $ (`callFunc` s) >=> (`callFunc` arg)
309307
x -> throwError $ ErrorCall $ "Attempt to call non-function: " ++ show x
310308

@@ -316,7 +314,6 @@ execUnaryOp
316314
-> NValue t f m
317315
-> m (NValue t f m)
318316
execUnaryOp scope span op arg = do
319-
traceM "NUnary"
320317
case arg of
321318
NVConstant c -> case (op, c) of
322319
(NNeg, NInt i ) -> unaryOp $ NInt (-i)

0 commit comments

Comments
 (0)