From fcdb37b72f82f5f7f9b753450ed6f5cef1a90903 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?b=CA=B0edoh=E2=82=82=20sw=C3=A9?= Date: Thu, 20 Jun 2024 02:44:25 +0500 Subject: [PATCH] Add std/string/array/concat.lb --- std/string/array/concat.lb | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 std/string/array/concat.lb diff --git a/std/string/array/concat.lb b/std/string/array/concat.lb new file mode 100644 index 0000000..a5095ae --- /dev/null +++ b/std/string/array/concat.lb @@ -0,0 +1,25 @@ +@ 0 + args 0 + size + #exec std/string/array/rev.lb + + + args 1 + dup +@ 1 + kjz 2 + args 1 + #exec std/rot.lb + #exec std/rot.lb + #expr - + jmp 1 + +@ 2 + pop + ;#exec std/string/array/rev.lb ; Finish getting arguments + + #expr + + #exec std/rev.lb + pop + size + quit