1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
-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]).
parse_test() ->
gleam@expect:equal(gleam@float:parse(<<"1.23">>), {ok, 1.23}),
gleam@expect:equal(gleam@float:parse(<<"5.0">>), {ok, 5.0}),
gleam@expect:equal(gleam@float:parse(<<"0.123456789">>), {ok, 0.123456789}),
gleam@expect:is_error(gleam@float:parse(<<"">>)),
gleam@expect:is_error(gleam@float:parse(<<"what">>)),
gleam@expect:is_error(gleam@float:parse(<<"1">>)).
to_string_test() ->
gleam@expect:equal(gleam@float:to_string(123.0), <<"123.0">>),
gleam@expect:equal(gleam@float:to_string(-8.1), <<"-8.1">>).
compare_test() ->
gleam@expect:equal(gleam@float:compare(0.0, 0.0), eq),
gleam@expect:equal(gleam@float:compare(0.1, 0.1), eq),
gleam@expect:equal(gleam@float:compare(0.0, 0.1), lt),
gleam@expect:equal(gleam@float:compare(-2.0, -1.9), lt),
gleam@expect:equal(gleam@float:compare(2.0, 1.9), gt),
gleam@expect:equal(gleam@float:compare(-1.9, -2.0), gt).
ceiling_test() ->
gleam@expect:equal(gleam@float:ceiling(8.1), 9.0),
gleam@expect:equal(gleam@float:ceiling(-8.1), -8.0),
gleam@expect:equal(gleam@float:ceiling(-8.0), -8.0).
floor_test() ->
gleam@expect:equal(gleam@float:floor(8.1), 8.0),
gleam@expect:equal(gleam@float:floor(-8.1), -9.0),
gleam@expect:equal(gleam@float:floor(-8.0), -8.0).
round_test() ->
gleam@expect:equal(gleam@float:round(8.1), 8),
gleam@expect:equal(gleam@float:round(8.4), 8),
gleam@expect:equal(gleam@float:round(8.499), 8),
gleam@expect:equal(gleam@float:round(8.5), 9),
gleam@expect:equal(gleam@float:round(-8.1), -8),
gleam@expect:equal(gleam@float:round(-7.5), -8).
truncate_test() ->
gleam@expect:equal(gleam@float:truncate(8.1), 8),
gleam@expect:equal(gleam@float:truncate(8.4), 8),
gleam@expect:equal(gleam@float:truncate(8.499), 8),
gleam@expect:equal(gleam@float:truncate(8.5), 8),
gleam@expect:equal(gleam@float:truncate(-8.1), -8),
gleam@expect:equal(gleam@float:truncate(-7.5), -7).
|
