Hi,
On 02/17/2011 09:08 PM, Marc Weber wrote:
@@ -157,7 +157,7 @@ rec {
else let
part = partition (strictLess (head l)) (tail l);
in
- qs part.wrong ([(head l)] ++ qs part.right []);
+ (qs part.wrong ([(head l)] ++ qs part.right [])) ++ concat;
What's the point of the "concat" argument? Why not just
qs part.wrong ++ [(head l)] ++ qs part.right
Or to get rid of a concatenation:
let part = partition (strictLess (head l)) l;
in qs part.wrong ++ qs part.right
--
Eelco Dolstra | http://www.st.ewi.tudelft.nl/~dolstra/
_______________________________________________
nix-dev mailing list
[email protected]
https://mail.cs.uu.nl/mailman/listinfo/nix-dev
