aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorPeter Saxton <peterhsaxton@gmail.com>2020-06-23 11:14:22 +0100
committerLouis Pilfold <louis@lpil.uk>2020-06-24 22:09:19 +0100
commitaba2570a6ead62c7fa62c29f70689e73f901ac9d (patch)
tree050d0f7ff79996b79cf3470524e970e4813adbb8 /test
parent5077a4915893310e2f94a6541563529305e3cd28 (diff)
downloadgleam_stdlib-aba2570a6ead62c7fa62c29f70689e73f901ac9d.tar.gz
gleam_stdlib-aba2570a6ead62c7fa62c29f70689e73f901ac9d.zip
add url versions
Diffstat (limited to 'test')
-rw-r--r--test/gleam/base_test.gleam44
1 files changed, 44 insertions, 0 deletions
diff --git a/test/gleam/base_test.gleam b/test/gleam/base_test.gleam
index 90fdb2a..3d2b7c6 100644
--- a/test/gleam/base_test.gleam
+++ b/test/gleam/base_test.gleam
@@ -50,3 +50,47 @@ pub fn decode64_test() {
|> base.decode64()
|> should.equal(Error(Nil))
}
+
+pub fn url_encode64_test() {
+ [255, 127, 254, 252]
+ |> list_to_binary()
+ |> base.url_encode64(True)
+ |> should.equal("_3_-_A==")
+
+ [255, 127, 254, 252]
+ |> list_to_binary()
+ |> base.url_encode64(False)
+ |> should.equal("_3_-_A")
+
+ [0, 0, 0]
+ |> list_to_binary()
+ |> base.url_encode64(True)
+ |> should.equal("AAAA")
+
+ []
+ |> list_to_binary()
+ |> base.url_encode64(True)
+ |> should.equal("")
+}
+
+pub fn url_decode64_test() {
+ "_3_-_A=="
+ |> base.url_decode64()
+ |> should.equal(Ok(list_to_binary([255, 127, 254, 252])))
+
+ "_3_-_A"
+ |> base.url_decode64()
+ |> should.equal(Ok(list_to_binary([255, 127, 254, 252])))
+
+ "AAAA"
+ |> base.url_decode64()
+ |> should.equal(Ok(list_to_binary([0, 0, 0])))
+
+ ""
+ |> base.url_decode64()
+ |> should.equal(Ok(list_to_binary([])))
+
+ ")!"
+ |> base.url_decode64()
+ |> should.equal(Error(Nil))
+}