Use lamE instead of LamE to simplify and future-proof for GHC 9.10

src/Data/Functor/Invariant/TH.hs

@@ -864,8 +864,7 @@ foldDataConArgs iClass tvMap ft con = do
 mkSimpleLam :: (Exp -> Q Exp) -> Q Exp
 mkSimpleLam lam = do
   n <- newName "n"
-  body <- lam (VarE n)
-  return $ LamE [VarP n] body
+  lamE [varP n] (lam (VarE n))
 
 -- "Con a1 a2 a3 -> fold [x1 a1, x2 a2, x3 a3]"
 --