From 16b83c42f395e8496cdadfdf078b1243344eb2f1 Mon Sep 17 00:00:00 2001
From: Karol Stasiak <karol.m.stasiak@gmail.com>
Date: Mon, 6 Apr 2020 11:53:51 +0200
Subject: [PATCH] Add pstrpaste function

---
 include/pstring.mfk | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/include/pstring.mfk b/include/pstring.mfk
index 6dc27979..85eb980c 100644
--- a/include/pstring.mfk
+++ b/include/pstring.mfk
@@ -45,6 +45,15 @@ void pstrappend(pointer buffer, pointer str) {
     buffer[0] += size
 }
 
+void pstrpaste(pointer dest, pointer str) {
+    byte i, size
+    dest -= 1
+    size = str[0]
+    for i,1,parallelto,size{
+        dest[i] = str[i]
+    }
+}
+
 void pstrappendchar(pointer buffer, byte char) {
    buffer[0] += 1
    buffer[buffer[0]] = char