File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed
plugins/default/src/Ide/Plugin Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -192,11 +192,11 @@ extractMinimalImports ::
192
192
Maybe (HscEnvEq ) ->
193
193
Maybe (TcModuleResult ) ->
194
194
IO ([LImportDecl GhcRn ], Maybe [LImportDecl GhcRn ])
195
- extractMinimalImports (Just (hsc)) (Just (tmrModule -> TypecheckedModule {.. })) = do
195
+ extractMinimalImports (Just (hsc)) (Just (TcModuleResult {.. })) = do
196
196
-- extract the original imports and the typechecking environment
197
- let ( tcEnv, _) = tm_internals_
198
- Just (_, imports, _, _) = tm_renamed_source
199
- ParsedModule {pm_parsed_source = L loc _} = tm_parsed_module
197
+ let tcEnv = tmrTypechecked
198
+ (_, imports, _, _) = tmrRenamed
199
+ ParsedModule {pm_parsed_source = L loc _} = tmrParsed
200
200
span = fromMaybe (error " expected real" ) $ realSpan loc
201
201
202
202
-- GHC is secretly full of mutable state
You can’t perform that action at this time.
0 commit comments