From ff57f0db46e757fc814886066d5e001279fcb5f0 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Wed, 2 Mar 2016 11:52:20 -0500 Subject: [PATCH] Rename the Annotated field accessors. --- src/Diff.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Diff.hs b/src/Diff.hs index 47706837e..e281f944c 100644 --- a/src/Diff.hs +++ b/src/Diff.hs @@ -10,7 +10,7 @@ import Syntax import Term -- | An annotated syntax in a diff tree. -data Annotated a annotation f = Annotated { getAnnotation :: !annotation, getSyntax :: !(Syntax a f) } +data Annotated a annotation f = Annotated { annotation :: !annotation, syntax :: !(Syntax a f) } deriving (Functor, Eq, Show, Foldable) -- | An annotation for a source file, including the source range and semantic