diff --git a/Data/Generics/Geniplate.hs b/Data/Generics/Geniplate.hs
--- a/Data/Generics/Geniplate.hs
+++ b/Data/Generics/Geniplate.hs
@@ -80,7 +80,11 @@
 funDef f e = [FunD f [Clause [] (NormalB e) []]]
 
 instDef :: Name -> [Type] -> Name -> Exp -> [Dec]
+#if __GLASGOW_HASKELL__ <= 710
 instDef cls ts met e = [InstanceD [] (foldl AppT (ConT cls) ts) (funDef met e)]
+#else
+instDef cls ts met e = [InstanceD Nothing [] (foldl AppT (ConT cls) ts) (funDef met e)]
+#endif
 
 -- | Create a 'TransformBi' instance.
 -- The 'TypeQ' argument should be a pair; the /inner/ and /outer/ types for 'transformBi'.
diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -1,6 +1,9 @@
-geniplate 0.7.3 (released 2016-04-24):
+geniplate 0.7.4 (released 2016-04-24):
 * Fix the template-haskell 2.11.* support
   Contributed by Andrés Sicard-Ramírez.
+
+geniplate 0.7.3 (released 2016-04-24)
+* Accidentally the same as 0.7.2
 
 geniplate 0.7.2 (released 2016-01-04):
 * Support template-haskell 2.11.*.
diff --git a/geniplate-mirror.cabal b/geniplate-mirror.cabal
--- a/geniplate-mirror.cabal
+++ b/geniplate-mirror.cabal
@@ -1,5 +1,5 @@
 Name:           geniplate-mirror
-Version:        0.7.3
+Version:        0.7.4
 Synopsis:       Use Template Haskell to generate Uniplate-like functions.
 Description:    Use Template Haskell to generate Uniplate-like functions.
                 .