aboutsummaryrefslogtreecommitdiff
path: root/src/str.gleam
diff options
context:
space:
mode:
Diffstat (limited to 'src/str.gleam')
-rw-r--r--src/str.gleam129
1 files changed, 0 insertions, 129 deletions
diff --git a/src/str.gleam b/src/str.gleam
index bd027a1..00268f8 100644
--- a/src/str.gleam
+++ b/src/str.gleam
@@ -1,7 +1,6 @@
// Named str to avoid name collisions with the Erlang string module.
// Will rename later once we have namespaces for modules.
-import expect
import iodata
import list
@@ -10,31 +9,10 @@ pub external fn length(String) -> Int = "string" "length"
pub enum ParseError =
| ParseError
-test length {
- length("ß↑e̊")
- |> expect:equal(_, 3)
-
- length("Gleam")
- |> expect:equal(_, 5)
-
- length("")
- |> expect:equal(_, 0)
-}
-
pub external fn lowercase(String) -> String = "string" "lowercase"
-test lowercase {
- lowercase("Gleam")
- |> expect:equal(_, "gleam")
-}
-
pub external fn uppercase(String) -> String = "string" "uppercase"
-test uppercase {
- uppercase("Gleam")
- |> expect:equal(_, "GLEAM")
-}
-
pub fn reverse(string) {
string
|> iodata:new
@@ -42,11 +20,6 @@ pub fn reverse(string) {
|> iodata:to_string
}
-test reverse {
- reverse("Gleam")
- |> expect:equal(_, "maelG")
-}
-
pub fn split(string, on) {
string
|> iodata:new
@@ -54,16 +27,6 @@ pub fn split(string, on) {
|> list:map(_, iodata:to_string)
}
-test split {
- "Gleam,Erlang,Elixir"
- |> split(_, ",")
- |> expect:equal(_, ["Gleam", "Erlang", "Elixir"])
-
- "Gleam, Erlang,Elixir"
- |> split(_, ", ")
- |> expect:equal(_, ["Gleam", "Erlang,Elixir"])
-}
-
pub fn replace(string, pattern, with) {
string
|> iodata:new
@@ -71,108 +34,16 @@ pub fn replace(string, pattern, with) {
|> iodata:to_string
}
-test replace {
- "Gleam,Erlang,Elixir"
- |> replace(_, ",", "++")
- |> expect:equal(_, "Gleam++Erlang++Elixir")
-}
-
pub external fn from_int(Int) -> String = "erlang" "integer_to_binary"
-test from_int {
- 123
- |> from_int
- |> expect:equal(_, "123")
-
- -123
- |> from_int
- |> expect:equal(_, "-123")
-
- 0123
- |> from_int
- |> expect:equal(_, "123")
-}
-
pub external fn parse_int(String) -> Result(Int, ParseError) = "gleam__stdlib" "parse_int";
-test parse_int {
- "123"
- |> parse_int
- |> expect:equal(_, Ok(123))
-
- "-123"
- |> parse_int
- |> expect:equal(_, Ok(-123))
-
- "0123"
- |> parse_int
- |> expect:equal(_, Ok(123))
-
- ""
- |> parse_int
- |> expect:equal(_, Error(ParseError))
-
- "what"
- |> parse_int
- |> expect:equal(_, Error(ParseError))
-
- "1.23"
- |> parse_int
- |> expect:equal(_, Error(ParseError))
-}
-
pub external fn parse_float(String) -> Result(Float, ParseError) = "gleam__stdlib" "parse_float";
-test parse_float {
- "1.23"
- |> parse_float
- |> expect:equal(_, Ok(1.23))
-
- "5.0"
- |> parse_float
- |> expect:equal(_, Ok(5.0))
-
- "0.123456789"
- |> parse_float
- |> expect:equal(_, Ok(0.123456789))
-
- ""
- |> parse_float
- |> expect:equal(_, Error(ParseError))
-
- "what"
- |> parse_float
- |> expect:equal(_, Error(ParseError))
-
- "1"
- |> parse_float
- |> expect:equal(_, Error(ParseError))
-}
-
pub external fn base_from_int(Int, Int) -> String = "erlang" "integer_to_binary"
-test base_from_int {
- 100
- |> base_from_int(_, 16)
- |> expect:equal(_, "64")
-
- -100
- |> base_from_int(_, 16)
- |> expect:equal(_, "-64")
-}
-
pub fn from_float(f) {
f
|> iodata:from_float
|> iodata:to_string
}
-
-test from_float {
- 123.0
- |> from_float
- |> expect:equal(_, "123.0")
-
- -8.1
- |> from_float
- |> expect:equal(_, "-8.1")
-}