@@ -222,12 +222,12 @@ createTemporaryModule exec PSCiState{psciImportedModules = imports, psciLetBindi
222222-- Makes a volatile module to hold a non-qualified type synonym for a fully-qualified data type declaration.
223223--
224224createTemporaryModuleForKind :: PSCiState -> P.Type -> P.Module
225−createTemporaryModuleForKind PSCiState{psciImportedModules = imports} typ =
225+createTemporaryModuleForKind PSCiState{psciImportedModules = imports, psciLetBindings = lets} typ =
226226 let
227227 moduleName = P.ModuleName [P.ProperName "$PSCI"]
228228 itDecl = P.TypeSynonymDeclaration (P.ProperName "IT") [] typ
229229 in
230− P.Module [] moduleName ((importDecl `map` imports) ++ [itDecl]) Nothing
230+ P.Module [] moduleName ((importDecl `map` imports) ++ lets ++ [itDecl]) Nothing
231231
232232-- |
233233-- Makes a volatile module to execute the current imports.