From 211984b23adae77cf4cf87b2a15e307df2fd7619 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Fri, 15 Mar 2019 16:37:56 +0000 Subject: do_traverse helper is private --- gen/list.erl | 2 +- src/list.gleam | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/gen/list.erl b/gen/list.erl index cf76f31..5c8e8e6 100644 --- a/gen/list.erl +++ b/gen/list.erl @@ -2,7 +2,7 @@ -compile(no_auto_import). -include_lib("eunit/include/eunit.hrl"). --export([length/1, reverse/1, is_empty/1, has_member/2, head/1, tail/1, filter/2, map/2, do_traverse/3, traverse/2, drop/2, take/2, new/0, append/2, flatten/1, foldl/3, foldr/3]). +-export([length/1, reverse/1, is_empty/1, has_member/2, head/1, tail/1, filter/2, map/2, traverse/2, drop/2, take/2, new/0, append/2, flatten/1, foldl/3, foldr/3]). length(A) -> erlang:length(A). diff --git a/src/list.gleam b/src/list.gleam index e0a8f42..dea8a19 100644 --- a/src/list.gleam +++ b/src/list.gleam @@ -134,7 +134,7 @@ test map { |> expect:equal(_, [0, 8, 10, 14, 6]) } -pub fn do_traverse(list, fun, acc) { +fn do_traverse(list, fun, acc) { case list { | [] -> Ok(reverse(acc)) | [x | xs] -> -- cgit v1.2.3