aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2024-06-16 15:36:33 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2024-06-16 15:36:33 +0900
commit193a1917dd374f7fc47a3b35e30e6a827c0b171a (patch)
tree33fc29619324130fa6b1f6345b61f5b58109b595 /tests
parentdbc3a7c5d41a7b392cdcd51a90f3a419dbaed179 (diff)
Add string implementations
Diffstat (limited to 'tests')
-rw-r--r--tests/run.scm14
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/run.scm b/tests/run.scm
index adf0fc6..e9b7db2 100644
--- a/tests/run.scm
+++ b/tests/run.scm
@@ -41,6 +41,13 @@
(test-end "number.sum")
+(test-begin "string")
+
+(import (prefix (algebraic-structures string semigroup) string:))
+(test "abc" (string:<> "ab" "c"))
+
+(test-end "string")
+
(test-begin "list")
(import (prefix (algebraic-structures list semigroup) list:))
@@ -98,6 +105,13 @@
(test-end "number.sum")
+(test-begin "string")
+
+(import (prefix (algebraic-structures string monoid) string:))
+(test "" (begin string:unit))
+
+(test-end "string")
+
(test-begin "list")
(import (prefix (algebraic-structures list monoid) list:))