From 9e7846d21425115a442a8d60c441fa15a70cb249 Mon Sep 17 00:00:00 2001 From: Marc Weber Date: Tue, 2 Dec 2008 12:28:21 +0000 Subject: [PATCH] added Haskell's foldl svn path=/nixpkgs/trunk/; revision=13553 --- pkgs/lib/default.nix | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/pkgs/lib/default.nix b/pkgs/lib/default.nix index 445dcd8ffd0..e523e25416b 100644 --- a/pkgs/lib/default.nix +++ b/pkgs/lib/default.nix @@ -96,6 +96,12 @@ rec { then nul else op (head list) (fold op nul (tail list)); + # Haskell's fold + foldl = op: nul: list: + if list == [] + then nul + else fold op (op nul (head list)) (tail list); + # Concatenate a list of lists. concatList = x : y : x ++ y;