mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-17 04:44:39 +03:00
Some documentation.
This commit is contained in:
parent
ef09fde6e5
commit
f71b951108
@ -114,6 +114,7 @@ import Prelude.Compat
|
|||||||
|
|
||||||
-- REPL Environment ------------------------------------------------------------
|
-- REPL Environment ------------------------------------------------------------
|
||||||
|
|
||||||
|
-- | The currently focused module.
|
||||||
data LoadedModule = LoadedModule
|
data LoadedModule = LoadedModule
|
||||||
{ lName :: Maybe P.ModName -- ^ Focused module
|
{ lName :: Maybe P.ModName -- ^ Focused module
|
||||||
, lPath :: FilePath -- ^ Focused file
|
, lPath :: FilePath -- ^ Focused file
|
||||||
@ -122,13 +123,30 @@ data LoadedModule = LoadedModule
|
|||||||
-- | REPL RW Environment.
|
-- | REPL RW Environment.
|
||||||
data RW = RW
|
data RW = RW
|
||||||
{ eLoadedMod :: Maybe LoadedModule
|
{ eLoadedMod :: Maybe LoadedModule
|
||||||
|
-- ^ This is the name of the currently "focused" module.
|
||||||
|
-- This is what we edit (:e) or reload (:r)
|
||||||
|
|
||||||
, eContinue :: Bool
|
, eContinue :: Bool
|
||||||
|
-- ^ Should we keep going when we encounter an error, or give up.
|
||||||
|
|
||||||
, eIsBatch :: Bool
|
, eIsBatch :: Bool
|
||||||
|
-- ^ Are we in batch mode.
|
||||||
|
|
||||||
, eModuleEnv :: M.ModuleEnv
|
, eModuleEnv :: M.ModuleEnv
|
||||||
|
-- ^ The current environment of all things loaded.
|
||||||
|
|
||||||
, eUserEnv :: UserEnv
|
, eUserEnv :: UserEnv
|
||||||
|
-- ^ User settings
|
||||||
|
|
||||||
, eLogger :: Logger
|
, eLogger :: Logger
|
||||||
|
-- ^ Use this to send messages to the user
|
||||||
|
|
||||||
, eLetEnabled :: Bool
|
, eLetEnabled :: Bool
|
||||||
|
-- ^ Should we allow `let` on the command line
|
||||||
|
|
||||||
, eUpdateTitle :: REPL ()
|
, eUpdateTitle :: REPL ()
|
||||||
|
-- ^ Execute this every time we load a module.
|
||||||
|
-- This is used to change the title of terminal when loading a module.
|
||||||
}
|
}
|
||||||
|
|
||||||
-- | Initial, empty environment.
|
-- | Initial, empty environment.
|
||||||
|
Loading…
Reference in New Issue
Block a user