From 257290085867b1214950dc26722432ea3e76ef8f Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Tue, 24 Sep 2019 11:23:10 -0400 Subject: [PATCH] Revert "Define a GSum instance for M1." This reverts commit 30dad2da720c2c070b1c1df4ab765076f32e92d4. --- semantic-tags/src/Tags/Taggable/Precise.hs | 4 ---- 1 file changed, 4 deletions(-) diff --git a/semantic-tags/src/Tags/Taggable/Precise.hs b/semantic-tags/src/Tags/Taggable/Precise.hs index 9fdca6d64..48b80d0dc 100644 --- a/semantic-tags/src/Tags/Taggable/Precise.hs +++ b/semantic-tags/src/Tags/Taggable/Precise.hs @@ -183,7 +183,3 @@ instance {-# OVERLAPPABLE #-} class GSum t where type Members t :: (* -> *) gmembers :: t a -> Members t a - -instance GSum f => GSum (M1 i c f) where - type Members (M1 i c f) = Members f - gmembers = gmembers . unM1