From 7c30ce95627d63efeca85c4c65aaaee1856b7887 Mon Sep 17 00:00:00 2001 From: Eelco Dolstra Date: Tue, 28 Jul 2015 14:56:27 +0200 Subject: Remove zipTwoLists This function is redundant (we also have zipLists). --- lib/lists.nix | 14 -------------- 1 file changed, 14 deletions(-) (limited to 'lib/lists.nix') diff --git a/lib/lists.nix b/lib/lists.nix index fde6f5d42fcbe..7fc1924066ba3 100644 --- a/lib/lists.nix +++ b/lib/lists.nix @@ -209,20 +209,6 @@ rec { init = list: assert list != []; take (length list - 1) list; - # Zip two lists together. - zipTwoLists = xs: ys: - let - len1 = length xs; - len2 = length ys; - len = if len1 < len2 then len1 else len2; - zipTwoLists' = n: - if n != len then - [ { first = elemAt xs n; second = elemAt ys n; } ] - ++ zipTwoLists' (n + 1) - else []; - in zipTwoLists' 0; - - deepSeqList = xs: y: if any (x: deepSeq x false) xs then y else y; crossLists = f: foldl (fs: args: concatMap (f: map f args) fs) [f]; -- cgit 1.4.1