From e442b9781c26b1a321794ed1b348921695680f9d Mon Sep 17 00:00:00 2001
From: Shane <me@shane.sh>
Date: Fri, 19 Jun 2020 00:45:48 +0100
Subject: [PATCH] Remove unused extension

---
 src/Rel8/Lit.hs   | 1 -
 src/Rel8/Table.hs | 2 +-
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/Rel8/Lit.hs b/src/Rel8/Lit.hs
index 04d57d7..86c7719 100644
--- a/src/Rel8/Lit.hs
+++ b/src/Rel8/Lit.hs
@@ -1,7 +1,6 @@
 {-# language FlexibleContexts #-}
 {-# language TypeApplications #-}
 {-# language TypeFamilies #-}
-{-# language UndecidableSuperClasses #-}
 
 module Rel8.Lit
   ( litTable
diff --git a/src/Rel8/Table.hs b/src/Rel8/Table.hs
index f36f1dc..def7053 100644
--- a/src/Rel8/Table.hs
+++ b/src/Rel8/Table.hs
@@ -356,7 +356,7 @@ newtype HIdentity a f = HIdentity { unHIdentity :: Column f a }
   deriving ( Generic, HigherKindedTable )
 
 
--- | Any 'Expr' can be seen as a 'Table' with only one column.
+-- | Any 'Identity' can be seen as a 'Table' with only one column.
 instance Table (Identity a) where
   type Context (Identity a) = Identity
   type Structure (Identity a) = HIdentity a