CurryInfo: currybrowse-3.0.0 / BrowserGUI.startBrowser
definition: 
|
startBrowser :: String -> IO ()
startBrowser modname = do
initializeAnalysisSystem
putStr "Please be patient, reading all interfaces..."
helptxt <- readFileInBrowserDir readmeFile
mods <- getImportedInterfaces modname
putStrLn "done"
let mainmod = progName (progOfIFFP (snd (head mods)))
trees = [Leaf mainmod
(mainmod,map (moduleImports . progOfIFFP . snd) mods)]
stateref <- newIORef (GS trees modname mods
[] ("",OtherText,"") False Nothing)
runInitGUI title
(browserGUI stateref rmod rtxt (trees2strings trees))
(\gp -> setValue rtxt helptxt gp >> setValue rmod "0" gp >>
return [])
where rmod,rtxt free
|
|
demand:
|
no demanded arguments |
|
deterministic:
|
possibly non-deterministic operation |
|
indeterministic:
|
might be indeterministic |
|
infix:
|
no fixity defined |
|
iotype:
|
{(_) |-> _}
|
|
name:
|
startBrowser |
|
precedence:
|
no precedence defined |
|
result-values:
|
_ |
|
signature:
|
String -> Prelude.IO () |
|
solution-complete:
|
operation might suspend on free variables |
|
terminating:
|
possibly non-terminating |
|
totally-defined:
|
possibly non-reducible on same data term |