Add missing 20- and 21-tuple instances of QueryParams. (#57)

paul-rouse · Nov 1, 2022 · acc3cf0 · acc3cf0
1 parent 5d1b62d
commit acc3cf0
Showing 1 changed file with 18 additions and 0 deletions.
diff --git a/Database/MySQL/Simple/QueryParams.hs b/Database/MySQL/Simple/QueryParams.hs
@@ -153,6 +153,24 @@ instance (Param a, Param b, Param c, Param d, Param e, Param f, Param g,
          render h, render i, render j, render k, render l, render m, render n,
          render o, render p, render q, render r, render s]
 
+instance (Param a, Param b, Param c, Param d, Param e, Param f, Param g,
+          Param h, Param i, Param j, Param k, Param l, Param m, Param n,
+          Param o, Param p, Param q, Param r, Param s, Param t)
+    => QueryParams (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t) where
+    renderParams (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t) =
+        [render a, render b, render c, render d, render e, render f, render g,
+         render h, render i, render j, render k, render l, render m, render n,
+         render o, render p, render q, render r, render s, render t]
+
+instance (Param a, Param b, Param c, Param d, Param e, Param f, Param g,
+          Param h, Param i, Param j, Param k, Param l, Param m, Param n,
+          Param o, Param p, Param q, Param r, Param s, Param t, Param u)
+    => QueryParams (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u) where
+    renderParams (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u) =
+        [render a, render b, render c, render d, render e, render f, render g,
+         render h, render i, render j, render k, render l, render m, render n,
+         render o, render p, render q, render r, render s, render t, render u]
+
 instance (Param a, Param b, Param c, Param d, Param e, Param f, Param g,
           Param h, Param i, Param j, Param k, Param l, Param m, Param n,
           Param o, Param p, Param q, Param r, Param s, Param t, Param u,