From 8d89393e49f577e30991e3ef64ba30c3d21aa1f2 Mon Sep 17 00:00:00 2001 From: joshvera Date: Thu, 13 Sep 2018 17:46:25 -0400 Subject: [PATCH] Add Ord constraint --- src/Semantic/Graph.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Semantic/Graph.hs b/src/Semantic/Graph.hs index 057accc7e..f77b23d35 100644 --- a/src/Semantic/Graph.hs +++ b/src/Semantic/Graph.hs @@ -351,6 +351,7 @@ resumingLoadError :: ( Applicative (m address value effects) , Effectful (m address value) , Effects effects , Member Trace effects + , Ord address ) => m address value (Resumable (BaseError (LoadError address)) ': effects) a -> m address value effects a