Ви не можете вибрати більше 25 тем
Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
68 рядки
1.8 KiB
68 рядки
1.8 KiB
#! /usr/bin/env escript
|
|
|
|
main([]) ->
|
|
code:add_pathz("ebin"),
|
|
code:add_pathz("test"),
|
|
|
|
etap:plan(57),
|
|
util:test_good(good()),
|
|
util:test_errors(errors()),
|
|
etap:end_tests().
|
|
|
|
good() ->
|
|
[
|
|
{<<"0">>, 0},
|
|
{<<"-0">>, 0, <<"0">>},
|
|
{<<"1">>, 1},
|
|
{<<"12">>, 12},
|
|
{<<"-3">>, -3},
|
|
{<<"1234567890123456789012345">>, 1234567890123456789012345},
|
|
{
|
|
<<"1234567890123456789012345.0">>,
|
|
1.23456789012345678e24,
|
|
<<"1.2345678901234568245e+24">>
|
|
},
|
|
{
|
|
<<"1234567890123456789012345.0E3">>,
|
|
1.2345678901234569e27,
|
|
<<"1.2345678901234568502e+27">>
|
|
},
|
|
{
|
|
<<"1234567890123456789012345E2">>,
|
|
123456789012345678901234500,
|
|
<<"123456789012345678901234500">>
|
|
},
|
|
{
|
|
<<"0.000000000000000000000000000000000001">>,
|
|
1.0E-36,
|
|
<<"9.9999999999999994104e-37">>
|
|
},
|
|
{<<"1.0">>, 1.0, <<"1">>},
|
|
{<<"0.75">>, 0.75},
|
|
{<<"2.0123456789">>, 2.0123456789, <<"2.0123456789000000455">>},
|
|
{<<"2.4234324E24">>, 2.4234324E24, <<"2.4234323999999998107e+24">>},
|
|
{<<"-3.1416">>, -3.1416, <<"-3.1415999999999999481">>},
|
|
{<<"1E4">>, 10000.0, <<"10000">>},
|
|
{<<"1.0E+01">>, 10.0, <<"10">>},
|
|
{<<"1e1">>, 10.0, <<"10">>},
|
|
{<<"3.0E2">>, 300.0, <<"300">>},
|
|
{<<"0E3">>, 0.0, <<"0">>},
|
|
{<<"1.5E3">>, 1500.0, <<"1500">>},
|
|
{<<"2.5E-1">>, 0.25, <<"0.25">>},
|
|
{<<"-0.325E+2">>, -32.5, <<"-32.5">>}
|
|
].
|
|
|
|
errors() ->
|
|
[
|
|
<<"02">>,
|
|
<<"-01">>,
|
|
<<"+12">>,
|
|
<<"-">>,
|
|
<<"1.">>,
|
|
<<".1">>,
|
|
<<"1.-1">>,
|
|
<<"1E">>,
|
|
<<"1-E2">>,
|
|
<<"2E +3">>,
|
|
<<"1EA">>
|
|
].
|