aboutsummaryrefslogtreecommitdiff
path: root/test/atom_test.gleam
diff options
context:
space:
mode:
Diffstat (limited to 'test/atom_test.gleam')
-rw-r--r--test/atom_test.gleam46
1 files changed, 46 insertions, 0 deletions
diff --git a/test/atom_test.gleam b/test/atom_test.gleam
new file mode 100644
index 0000000..60686ab
--- /dev/null
+++ b/test/atom_test.gleam
@@ -0,0 +1,46 @@
+import atom
+import expect
+
+pub fn from_string_test() {
+ "ok"
+ |> atom:from_string
+ |> expect:is_ok
+
+ "expect"
+ |> atom:from_string
+ |> expect:is_ok
+
+ "this is not an atom we have seen before"
+ |> atom:from_string
+ // |> expect:equal(_, Error(AtomNotLoaded))
+ |> expect:is_error
+}
+
+pub fn create_from_string_test() {
+ "ok"
+ |> atom:create_from_string
+ |> Ok
+ |> expect:equal(_, atom:from_string("ok"))
+
+ "expect"
+ |> atom:create_from_string
+ |> Ok
+ |> expect:equal(_, atom:from_string("expect"))
+
+ "this is another atom we have not seen before"
+ |> atom:create_from_string
+ |> Ok
+ |> expect:equal(_, atom:from_string("this is another atom we have not seen before"))
+}
+
+pub fn to_string_test() {
+ "ok"
+ |> atom:create_from_string
+ |> atom:to_string
+ |> expect:equal(_, "ok")
+
+ "expect"
+ |> atom:create_from_string
+ |> atom:to_string
+ |> expect:equal(_, "expect")
+}