fix default for distinct/all in union in the pretty printer
This commit is contained in:
parent
d8791e7725
commit
79fde02d81
|
@ -193,8 +193,8 @@ which have been changed to try to improve the layout of the output.
|
||||||
> Intersect -> "intersect"
|
> Intersect -> "intersect"
|
||||||
> Except -> "except")
|
> Except -> "except")
|
||||||
> <+> case d of
|
> <+> case d of
|
||||||
> All -> empty
|
> All -> text "all"
|
||||||
> Distinct -> text "distinct"
|
> Distinct -> empty -- text "distinct"
|
||||||
> <+> case c of
|
> <+> case c of
|
||||||
> Corresponding -> text "corresponding"
|
> Corresponding -> text "corresponding"
|
||||||
> Respectively -> empty
|
> Respectively -> empty
|
||||||
|
|
Loading…
Reference in a new issue