From 87347e30b2c1393bb8a9eff9d8ce590e6f20cc7f Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Mon, 30 Dec 2019 10:59:32 -0500
Subject: [PATCH] Make string concatenation more efficient.

---
 src/expr.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/expr.c b/src/expr.c
index 02e41e48..a1f1875f 100644
--- a/src/expr.c
+++ b/src/expr.c
@@ -810,7 +810,7 @@ static int Add(void)
 	    return E_NO_MEM;
 	}
 	strcpy(v3.v.str, v1.v.str);
-	strcat(v3.v.str, v2.v.str);
+	strcpy(v3.v.str+l1, v2.v.str);
 	DestroyValue(v1); DestroyValue(v2);
 	PushValStack(v3);
 	return OK;