From 3705f960f405f12241a8651a0c1f91a077dd4d3c Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Mon, 24 Apr 2017 13:47:21 -0400 Subject: [PATCH] Reformat AssignmentState across several lines. --- src/Data/Syntax/Assignment.hs | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/Data/Syntax/Assignment.hs b/src/Data/Syntax/Assignment.hs index 1dacb5b06..d51d7baff 100644 --- a/src/Data/Syntax/Assignment.hs +++ b/src/Data/Syntax/Assignment.hs @@ -147,7 +147,12 @@ advanceState state@AssignmentState{..} | Rose (_ :. range :. span :. _) _ : rest <- stateNodes = AssignmentState (Info.end range) (Info.spanEnd span) (Source.drop (Info.end range - stateOffset) stateSource) rest | otherwise = state -data AssignmentState grammar = AssignmentState { stateOffset :: Int, statePos :: Info.SourcePos, stateSource :: Source.Source, stateNodes :: [AST grammar] } +data AssignmentState grammar = AssignmentState + { stateOffset :: Int + , statePos :: Info.SourcePos + , stateSource :: Source.Source + , stateNodes :: [AST grammar] + } deriving (Eq, Show) instance Alternative (Assignment symbol) where