From f105ecbdaa7ae2701e7b09f749031344d31029a0 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Wed, 14 Mar 2018 11:09:20 -0400 Subject: [PATCH] Align Configuration fields. --- src/Data/Abstract/Configuration.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Data/Abstract/Configuration.hs b/src/Data/Abstract/Configuration.hs index 8f355cd6e..0028c09f8 100644 --- a/src/Data/Abstract/Configuration.hs +++ b/src/Data/Abstract/Configuration.hs @@ -14,10 +14,10 @@ type ConfigurationFor term value = Configuration (LocationFor value) term value -- | A single point in a program’s 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)