@@ -199,7 +199,7 @@ createTemporaryModule exec imports lets value =
200 moduleName = P.ModuleName [P.ProperName "Main"]
200 moduleName = P.ModuleName [P.ProperName "Main"]
201 importDecl m = P.ImportDeclaration m Nothing
201 importDecl m = P.ImportDeclaration m Nothing
202− traceModule = P.ModuleName [P.ProperName "Trace"]
202+ traceModule = P.ModuleName [P.ProperName "Debug", P.ProperName "Trace"]
203 trace = P.Var (P.Qualified (Just traceModule) (P.Ident "print"))
203 trace = P.Var (P.Qualified (Just traceModule) (P.Ident "print"))
204 value' = foldr ($) value lets
204 value' = foldr ($) value lets
205 itDecl = P.ValueDeclaration (P.Ident "it") [] Nothing value'
205 itDecl = P.ValueDeclaration (P.Ident "it") [] Nothing value'