From 193a1917dd374f7fc47a3b35e30e6a827c0b171a Mon Sep 17 00:00:00 2001 From: Masaya Tojo Date: Sun, 16 Jun 2024 15:36:33 +0900 Subject: Add string implementations --- algebraic-structures.private.string.scm | 6 ++++++ 1 file changed, 6 insertions(+) create mode 100644 algebraic-structures.private.string.scm (limited to 'algebraic-structures.private.string.scm') diff --git a/algebraic-structures.private.string.scm b/algebraic-structures.private.string.scm new file mode 100644 index 0000000..c6d17b6 --- /dev/null +++ b/algebraic-structures.private.string.scm @@ -0,0 +1,6 @@ +(module (algebraic-structures private string) (<> unit) + (import scheme) + + (define (<> x y) (string-append x y)) + + (define unit "")) -- cgit v1.2.3