@@ -54,7 +54,7 @@ intersect = zipOpaleyeWith (Opaleye.intersectExplicit binaryspec)
55-- >>> select c $ values [lit True, lit True, lit False] `intersectAll` values [lit True, lit True]
55-- >>> select c $ values [lit True, lit True, lit False] `intersectAll` values [lit True, lit True]
56-- [True,True]
56-- [True,True]
57−intersectAll :: Table Expr a => Query a -> Query a -> Query a
57+intersectAll :: EqTable a => Query a -> Query a -> Query a
58intersectAll = zipOpaleyeWith (Opaleye.intersectAllExplicit binaryspec)
58intersectAll = zipOpaleyeWith (Opaleye.intersectAllExplicit binaryspec)