Fix bug in uniqList.

This commit is contained in:
Andres Loeh 2012-07-18 16:30:57 +02:00
parent bdc0530f93
commit 8984139215

View File

@ -165,7 +165,7 @@ rec {
then [] then []
else let x = head xs; else let x = head xs;
y = if elem x acc then [] else [x]; y = if elem x acc then [] else [x];
in go (y ++ tail xs) (y ++ acc); in y ++ go (tail xs) (y ++ acc);
in go inputList acc; in go inputList acc;
uniqListExt = {inputList, outputList ? [], uniqListExt = {inputList, outputList ? [],