1
1
mirror of https://github.com/github/semantic.git synced 2024-12-20 21:31:48 +03:00

Align Configuration fields.

This commit is contained in:
Rob Rix 2018-03-14 11:09:20 -04:00
parent 12824b018a
commit f105ecbdaa

View File

@ -14,10 +14,10 @@ type ConfigurationFor term value = Configuration (LocationFor value) term value
-- | A single point in a programs execution.
data Configuration l t v
= Configuration
{ configurationTerm :: t -- ^ The “instruction,” i.e. the current term to evaluate.
, configurationRoots :: Live l v -- ^ The set of rooted addresses.
{ configurationTerm :: t -- ^ The “instruction,” i.e. the current term to evaluate.
, configurationRoots :: Live l v -- ^ The set of rooted addresses.
, configurationEnvironment :: Environment l v -- ^ The environment binding any free variables in 'configurationTerm'.
, configurationStore :: Store l v -- ^ The store of values.
, configurationStore :: Store l v -- ^ The store of values.
}
deriving (Generic1)