diff --git a/src/Hyper/TH/Nodes.hs b/src/Hyper/TH/Nodes.hs
index 7a1c524..dba6982 100644
--- a/src/Hyper/TH/Nodes.hs
+++ b/src/Hyper/TH/Nodes.hs
@@ -45,7 +45,7 @@ makeHNodesForType info =
                     [ dataD
                         (pure [])
                         witTypeName
-                        (tiParams info <> [plainTV (mkName "node")])
+                        (((BndrReq <$) <$> tiParams info) <> [plainTV (mkName "node")])
                         Nothing
                         (nodeOfCons <&> (witType >>=))
                         []