Remove the access to the state since we do not touch it.
https://github.com/purescript/purescript/pull/662#discussion_r19645354
commitbe31e6e21d21de2b15841c632d80bb2dfc79d580
authorAntoine R. Dumont <antoine.romain.dumont@gmail.com>
dateFri 31 Oct 2014, 01:22 (12 years ago)
parent852794e
psci/Main.hs−2
@@ -340,9 +340,7 @@ readModuleTypes moduleName = let moduleFile = externPursFile moduleName in
340340--
341341handleBrowse :: P.ModuleName -> PSCI ()
342342handleBrowse moduleName = do
343− st <- PSCI $ lift get
344343 psciIO $ (readModuleTypes . N.runModuleName) moduleName >>= putStrLn
345− PSCI $ lift $ put st
346344 return ()
347345
348346-- |