From 07578db85b64b58190a7416fadb100438d9fff01 Mon Sep 17 00:00:00 2001 From: joshvera Date: Mon, 21 Aug 2017 15:20:37 -0400 Subject: [PATCH] Change order of classIdentifier and classContext --- src/Data/Syntax/Declaration.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/Syntax/Declaration.hs b/src/Data/Syntax/Declaration.hs index 82efe400c..ef848f08e 100644 --- a/src/Data/Syntax/Declaration.hs +++ b/src/Data/Syntax/Declaration.hs @@ -43,7 +43,7 @@ instance Eq1 Variable where liftEq = genericLiftEq instance Show1 Variable where liftShowsPrec = genericLiftShowsPrec -data Class a = Class { classIdentifier :: !a, classContext :: ![a], classSuperclasses :: ![a], classBody :: ![a] } +data Class a = Class { classContext :: ![a], classIdentifier :: !a, classSuperclasses :: ![a], classBody :: ![a] } deriving (Diffable, Eq, Foldable, Functor, GAlign, Generic1, Show, Traversable) instance Eq1 Class where liftEq = genericLiftEq