on dev help sign in
add some parens
e25cf6dEitan Chatav
squeel-postgresql/src/Squeel/PostgreSQL/Statement.hs+6−6
@@ -829,17 +829,17 @@ union, unionAll, intersect, intersectAll, except, exceptAll
829 -> Query schema params columns
829 -> Query schema params columns
830 -> Query schema params columns
830 -> Query schema params columns
831q1 `union` q2 = UnsafeQuery $
831q1 `union` q2 = UnsafeQuery $
832− renderQuery q1 <> " UNION " <> renderQuery q2
832+ "(" <> renderQuery q1 <> ") UNION (" <> renderQuery q2 <> ")"
833q1 `unionAll` q2 = UnsafeQuery $
833q1 `unionAll` q2 = UnsafeQuery $
834− renderQuery q1 <> " UNION ALL " <> renderQuery q2
834+ "(" <> renderQuery q1 <> ") UNION ALL " <> renderQuery q2
835q1 `intersect` q2 = UnsafeQuery $
835q1 `intersect` q2 = UnsafeQuery $
836− renderQuery q1 <> " INTERSECT " <> renderQuery q2
836+ "(" <> renderQuery q1 <> ") INTERSECT " <> renderQuery q2
837q1 `intersectAll` q2 = UnsafeQuery $
837q1 `intersectAll` q2 = UnsafeQuery $
838− renderQuery q1 <> " INTERSECT ALL " <> renderQuery q2
838+ "(" <> renderQuery q1 <> ") INTERSECT ALL " <> renderQuery q2
839q1 `except` q2 = UnsafeQuery $
839q1 `except` q2 = UnsafeQuery $
840− renderQuery q1 <> " EXCEPT " <> renderQuery q2
840+ "(" <> renderQuery q1 <> ") EXCEPT " <> renderQuery q2
841q1 `exceptAll` q2 = UnsafeQuery $
841q1 `exceptAll` q2 = UnsafeQuery $
842− renderQuery q1 <> " EXCEPT ALL " <> renderQuery q2
842+ "(" <> renderQuery q1 <> ") EXCEPT ALL " <> renderQuery q2
843
843
844{-----------------------------------------
844{-----------------------------------------
845SELECT statements
845SELECT statements