From 1fd3d745cf6baa4cbaf3469f963f17fa6f5420cd Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Wed, 23 Oct 2019 21:59:54 +0100 Subject: Update stdlib to use multi-subject case --- gen/src/gleam@list.erl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gen/src/gleam@list.erl') diff --git a/gen/src/gleam@list.erl b/gen/src/gleam@list.erl index 291bd7f..4e3a60d 100644 --- a/gen/src/gleam@list.erl +++ b/gen/src/gleam@list.erl @@ -214,16 +214,16 @@ any(List, F) -> end end. -zip(L1, L2) -> - case {L1, L2} of +zip(Xs, Ys) -> + case {Xs, Ys} of {[], _} -> []; {_, []} -> []; - {[X1 | Rest1], [X2 | Rest2]} -> - [{X1, X2} | zip(Rest1, Rest2)] + {[X | Xs1], [Y | Ys1]} -> + [{X, Y} | zip(Xs1, Ys1)] end. strict_zip(L1, L2) -> -- cgit v1.2.3