diff --git a/domain.cabal b/domain.cabal
--- a/domain.cabal
+++ b/domain.cabal
@@ -1,5 +1,5 @@
 name: domain
-version: 0.1.1.1
+version: 0.1.1.2
 synopsis: Codegen helping you define domain models
 description:
   - For introduction and demo skip to [Readme](#readme).
@@ -43,15 +43,15 @@
     Domain.TH.TypeDec
     Domain.YamlUnscrambler.TypeCentricDoc
   build-depends:
-    attoparsec >=0.13 && <0.14,
+    attoparsec >=0.13 && <0.15,
     base >=4.9 && <5,
     bytestring >=0.10 && <0.12,
     domain-core >=0.1 && <0.2,
     foldl >=1.4.9 && <2,
     hashable >=1 && <2,
-    parser-combinators >=1.2.1 && <1.3,
+    parser-combinators >=1.3 && <1.4,
     template-haskell >=2.13 && <3,
-    template-haskell-compat-v0208 >=0.1.5 && <0.2,
+    template-haskell-compat-v0208 >=0.1.6 && <0.2,
     text >=1.2.3 && <2,
     th-lego >=0.2.3 && <0.3,
     yaml-unscrambler >=0.1 && <0.2
@@ -95,4 +95,5 @@
     tasty-hunit >=0.9 && <0.11,
     tasty-quickcheck >=0.9 && <0.11,
     template-haskell,
+    template-haskell-compat-v0208 >=0.1.6 && <0.2,
     th-orphans >=0.13 && <0.14
diff --git a/inline-demo/Main.hs b/inline-demo/Main.hs
--- a/inline-demo/Main.hs
+++ b/inline-demo/Main.hs
@@ -12,6 +12,7 @@
 import Domain
 
 
+main :: IO ()
 main =
   return ()
 
diff --git a/loading-demo/Main.hs b/loading-demo/Main.hs
--- a/loading-demo/Main.hs
+++ b/loading-demo/Main.hs
@@ -11,6 +11,7 @@
 import Domain
 
 
+main :: IO ()
 main =
   return ()
 
diff --git a/test/Main.hs b/test/Main.hs
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -16,6 +16,7 @@
 import qualified Language.Haskell.TH.Syntax as TH
 
 
+main :: IO ()
 main =
   defaultMain $ 
   testGroup "All tests" [
diff --git a/test/Util/TH/LeafTypes.hs b/test/Util/TH/LeafTypes.hs
--- a/test/Util/TH/LeafTypes.hs
+++ b/test/Util/TH/LeafTypes.hs
@@ -2,6 +2,7 @@
 
 import Prelude
 import Language.Haskell.TH.Syntax
+import TemplateHaskell.Compat.V0208
 
 
 fromDec =
@@ -13,11 +14,7 @@
       fromCon d
 
 fromTyVarBndr =
-  \ case
-    KindedTV _ a ->
-      fromType a
-    _ ->
-      []
+  maybeToList . tyVarBndrKind
 
 fromCxt =
   concatMap fromType