@@ -354,6 +354,9 @@ handleTypeOf value = do
354 Just (ty, _, _) -> PSCI . outputStrLn . P.prettyPrintType $ ty
354 Just (ty, _, _) -> PSCI . outputStrLn . P.prettyPrintType $ ty
355 Nothing -> PSCI $ outputStrLn "Could not find type"
355 Nothing -> PSCI $ outputStrLn "Could not find type"
358+-- Browse a module and displays its signature (if module exists).
357handleBrowse :: P.ModuleName -> PSCI ()
360handleBrowse :: P.ModuleName -> PSCI ()
358handleBrowse moduleName = do
361handleBrowse moduleName = do
359 st <- PSCI $ lift get
362 st <- PSCI $ lift get