gleam/os add timestamp function (#117)

1 files changed, 12 insertions, 0 deletions

diff --git a/test/gleam/os_test.gleam b/test/gleam/os_test.gleam
index 45fc0ef..815a9e0 100644
--- a/test/gleam/os_test.gleam
+++ b/test/gleam/os_test.gleam
@@ -26,3 +26,15 @@ pub fn system_time_test() {
   { 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 tuple(mega_seconds, seconds, micro_seconds) = os.erlang_timestamp()
+
+  let stamp_as_micro =
+    { mega_seconds * 1_000_000 + seconds } * 1_000_000 + micro_seconds
+
+  { stamp_as_micro > june_12_2020 }
+  |> should.be_true()
+}