From aa1450bda6666dc22412e937deccffebaf82733c Mon Sep 17 00:00:00 2001
From: Lucas Rosa <lrosa008@gmail.com>
Date: Tue, 3 Nov 2020 05:20:11 -0500
Subject: gleam/os add timestamp function (#117)

---
 test/gleam/os_test.gleam | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'test')

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()
+}
-- 
cgit v1.2.3