From 69b0e8e1abb78db55cbdbd8db3ba4fe75b743e60 Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Sun, 24 Nov 2019 22:13:34 +0000 Subject: Update for Gleam v0.5 --- gen/src/gleam@pair.erl | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to 'gen/src/gleam@pair.erl') diff --git a/gen/src/gleam@pair.erl b/gen/src/gleam@pair.erl index 0f8e8be..3c07918 100644 --- a/gen/src/gleam@pair.erl +++ b/gen/src/gleam@pair.erl @@ -3,22 +3,22 @@ -export([first/1, second/1, swap/1, map_first/2, map_second/2]). -first(Tup) -> - {A, _} = Tup, +first(Pair) -> + {A, _} = Pair, A. -second(Tup) -> - {_, A} = Tup, +second(Pair) -> + {_, A} = Pair, A. -swap(Tup) -> - {A, B} = Tup, +swap(Pair) -> + {A, B} = Pair, {B, A}. -map_first(Tup, Fun) -> - {A, B} = Tup, +map_first(Pair, Fun) -> + {A, B} = Pair, {Fun(A), B}. -map_second(Tup, Fun) -> - {A, B} = Tup, +map_second(Pair, Fun) -> + {A, B} = Pair, {A, Fun(B)}. -- cgit v1.2.3