diff options
Diffstat (limited to 'test/gleam/os_test.gleam')
-rw-r--r-- | test/gleam/os_test.gleam | 80 |
1 files changed, 41 insertions, 39 deletions
diff --git a/test/gleam/os_test.gleam b/test/gleam/os_test.gleam index 3442a90..b3d799d 100644 --- a/test/gleam/os_test.gleam +++ b/test/gleam/os_test.gleam @@ -1,47 +1,49 @@ -import gleam/map -import gleam/os -import gleam/io -import gleam/should +if erlang { + import gleam/map + import gleam/os + import gleam/io + import gleam/should -pub fn env_test() { - os.insert_env("GLEAM_TEST", "hello") - os.get_env() - |> map.get("GLEAM_TEST") - |> should.equal(Ok("hello")) + pub fn env_test() { + os.insert_env("GLEAM_TEST", "hello") + os.get_env() + |> map.get("GLEAM_TEST") + |> should.equal(Ok("hello")) - os.delete_env("GLEAM_TEST") - os.get_env() - |> map.get("GLEAM_TEST") - |> should.equal(Error(Nil)) -} + os.delete_env("GLEAM_TEST") + os.get_env() + |> map.get("GLEAM_TEST") + |> should.equal(Error(Nil)) + } -pub fn unicode_test() { - os.insert_env("GLEAM_UNICODE_TEST", "Iñtërnâtiônà£ißætiøn☃💩") - os.get_env() - |> map.get("GLEAM_UNICODE_TEST") - |> should.equal(Ok("Iñtërnâtiônà£ißætiøn☃💩")) -} + pub fn unicode_test() { + os.insert_env("GLEAM_UNICODE_TEST", "Iñtërnâtiônà£ißætiøn☃💩") + os.get_env() + |> map.get("GLEAM_UNICODE_TEST") + |> should.equal(Ok("Iñtërnâtiônà£ißætiøn☃💩")) + } -pub fn system_time_test() { - let june_12_2020 = 1591966971 - { os.system_time(os.Second) > june_12_2020 } - |> should.equal(True) - { os.system_time(os.Second) < june_12_2020 * 1000 } - |> should.equal(True) - { os.system_time(os.Millisecond) > june_12_2020 * 1000 } - |> should.equal(True) - { os.system_time(os.Millisecond) < june_12_2020 * 1000000 } - |> should.equal(True) -} + pub fn system_time_test() { + let june_12_2020 = 1591966971 + { os.system_time(os.Second) > june_12_2020 } + |> should.equal(True) + { os.system_time(os.Second) < june_12_2020 * 1000 } + |> should.equal(True) + { os.system_time(os.Millisecond) > june_12_2020 * 1000 } + |> should.equal(True) + { os.system_time(os.Millisecond) < june_12_2020 * 1000000 } + |> should.equal(True) + } -pub fn erlang_timestamp_test() { - // in microseconds - let june_12_2020 = 1591966971000000 - let #(mega_seconds, seconds, micro_seconds) = os.erlang_timestamp() + pub fn erlang_timestamp_test() { + // in microseconds + let june_12_2020 = 1591966971000000 + let #(mega_seconds, seconds, micro_seconds) = os.erlang_timestamp() - let stamp_as_micro = - { mega_seconds * 1_000_000 + seconds } * 1_000_000 + micro_seconds + let stamp_as_micro = + { mega_seconds * 1_000_000 + seconds } * 1_000_000 + micro_seconds - { stamp_as_micro > june_12_2020 } - |> should.be_true() + { stamp_as_micro > june_12_2020 } + |> should.be_true() + } } |