From 5a1f3494eb9517a7b7a332cb74dd10a6a7d32d31 Mon Sep 17 00:00:00 2001
From: Louis Pilfold <louis@lpil.uk>
Date: Wed, 29 May 2019 21:02:55 +0100
Subject: Enable namespaced modules

---
 test/std/string_test.gleam | 50 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)
 create mode 100644 test/std/string_test.gleam

(limited to 'test/std/string_test.gleam')

diff --git a/test/std/string_test.gleam b/test/std/string_test.gleam
new file mode 100644
index 0000000..dd8a00e
--- /dev/null
+++ b/test/std/string_test.gleam
@@ -0,0 +1,50 @@
+import std/string
+import std/expect
+
+pub fn length_test() {
+  string:length("ß↑e̊")
+  |> expect:equal(_, 3)
+
+  string:length("Gleam")
+  |> expect:equal(_, 5)
+
+  string:length("")
+  |> expect:equal(_, 0)
+}
+
+pub fn lowercase_test() {
+  string:lowercase("Gleam")
+  |> expect:equal(_, "gleam")
+}
+
+pub fn uppercase_test() {
+  string:uppercase("Gleam")
+  |> expect:equal(_, "GLEAM")
+}
+
+pub fn reverse_test() {
+  string:reverse("Gleam")
+  |> expect:equal(_, "maelG")
+}
+
+pub fn split_test() {
+  "Gleam,Erlang,Elixir"
+  |> string:split(_, ",")
+  |> expect:equal(_, ["Gleam", "Erlang", "Elixir"])
+
+  "Gleam, Erlang,Elixir"
+  |> string:split(_, ", ")
+  |> expect:equal(_, ["Gleam", "Erlang,Elixir"])
+}
+
+pub fn replace_test() {
+  "Gleam,Erlang,Elixir"
+  |> string:replace(_, ",", "++")
+  |> expect:equal(_, "Gleam++Erlang++Elixir")
+}
+
+pub fn append_test() {
+  "Test"
+  |> string:append(_, " Me")
+  |> expect:equal(_, "Test Me")
+}
-- 
cgit v1.2.3