aboutsummaryrefslogtreecommitdiff
path: root/gen
diff options
context:
space:
mode:
Diffstat (limited to 'gen')
-rw-r--r--gen/src/gleam@float.erl11
-rw-r--r--gen/src/gleam@int.erl11
-rw-r--r--gen/test/gleam@float_test.erl11
-rw-r--r--gen/test/gleam@int_test.erl10
4 files changed, 39 insertions, 4 deletions
diff --git a/gen/src/gleam@float.erl b/gen/src/gleam@float.erl
index 625ba56..7eb18cf 100644
--- a/gen/src/gleam@float.erl
+++ b/gen/src/gleam@float.erl
@@ -1,7 +1,7 @@
-module(gleam@float).
-compile(no_auto_import).
--export([parse/1, to_string/1, compare/2, min/2, ceiling/1, floor/1, round/1, truncate/1]).
+-export([parse/1, to_string/1, compare/2, min/2, max/2, ceiling/1, floor/1, round/1, truncate/1]).
parse(A) ->
gleam_stdlib:parse_float(A).
@@ -33,6 +33,15 @@ min(A, B) ->
B
end.
+max(A, B) ->
+ case A > B of
+ true ->
+ A;
+
+ false ->
+ B
+ end.
+
ceiling(A) ->
math:ceil(A).
diff --git a/gen/src/gleam@int.erl b/gen/src/gleam@int.erl
index de9ce8b..1449d09 100644
--- a/gen/src/gleam@int.erl
+++ b/gen/src/gleam@int.erl
@@ -1,7 +1,7 @@
-module(gleam@int).
-compile(no_auto_import).
--export([parse/1, to_string/1, to_base_string/2, compare/2, min/2]).
+-export([parse/1, to_string/1, to_base_string/2, compare/2, min/2, max/2]).
parse(A) ->
gleam_stdlib:parse_int(A).
@@ -35,3 +35,12 @@ min(A, B) ->
false ->
B
end.
+
+max(A, B) ->
+ case A > B of
+ true ->
+ A;
+
+ false ->
+ B
+ end.
diff --git a/gen/test/gleam@float_test.erl b/gen/test/gleam@float_test.erl
index d60997e..8926ce1 100644
--- a/gen/test/gleam@float_test.erl
+++ b/gen/test/gleam@float_test.erl
@@ -1,7 +1,7 @@
-module(gleam@float_test).
-compile(no_auto_import).
--export([parse_test/0, to_string_test/0, compare_test/0, ceiling_test/0, floor_test/0, round_test/0, truncate_test/0, min_test/0]).
+-export([parse_test/0, to_string_test/0, compare_test/0, ceiling_test/0, floor_test/0, round_test/0, truncate_test/0, min_test/0, max_test/0]).
parse_test() ->
gleam@expect:equal(gleam@float:parse(<<"1.23">>), {ok, 1.23}),
@@ -57,3 +57,12 @@ min_test() ->
gleam@expect:equal(gleam@float:min(-2.2, -2.2), -2.2),
gleam@expect:equal(gleam@float:min(-1.0, -1.0), -1.0),
gleam@expect:equal(gleam@float:min(-1.1, -1.0), -1.1).
+
+max_test() ->
+ gleam@expect:equal(gleam@float:max(0.0, 0.0), 0.0),
+ gleam@expect:equal(gleam@float:max(0.3, 1.5), 1.5),
+ gleam@expect:equal(gleam@float:max(1.0, 0.0), 1.0),
+ gleam@expect:equal(gleam@float:max(-1.7, 2.5), 2.5),
+ gleam@expect:equal(gleam@float:max(-2.2, -2.2), -2.2),
+ gleam@expect:equal(gleam@float:max(-1.0, -1.0), -1.0),
+ gleam@expect:equal(gleam@float:max(-1.1, -1.0), -1.0).
diff --git a/gen/test/gleam@int_test.erl b/gen/test/gleam@int_test.erl
index ce8936c..48eeba1 100644
--- a/gen/test/gleam@int_test.erl
+++ b/gen/test/gleam@int_test.erl
@@ -1,7 +1,7 @@
-module(gleam@int_test).
-compile(no_auto_import).
--export([to_string/0, parse/0, to_base_string/0, compare_test/0, min_test/0]).
+-export([to_string/0, parse/0, to_base_string/0, compare_test/0, min_test/0, max_test/0]).
to_string() ->
gleam@expect:equal(gleam@int:to_string(123), <<"123">>),
@@ -35,3 +35,11 @@ min_test() ->
gleam@expect:equal(gleam@int:min(-1, 2), -1),
gleam@expect:equal(gleam@int:min(2, -2), -2),
gleam@expect:equal(gleam@int:min(-1, -1), -1).
+
+max_test() ->
+ gleam@expect:equal(gleam@int:max(0, 0), 0),
+ gleam@expect:equal(gleam@int:max(0, 1), 1),
+ gleam@expect:equal(gleam@int:max(1, 0), 1),
+ gleam@expect:equal(gleam@int:max(-1, 2), 2),
+ gleam@expect:equal(gleam@int:max(2, -2), 2),
+ gleam@expect:equal(gleam@int:max(-1, -1), -1).