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