From 3b7e5507f71d074ff12fd74b154749f49fb29653 Mon Sep 17 00:00:00 2001
From: "Dirk-Jan C. Binnema" <djcb@djcbsoftware.nl>
Date: Fri, 22 Aug 2025 08:08:32 +0300
Subject: [PATCH] scm: to_scm: use cons, not append

It's faster.
---
 scm/mu-scm.hh | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/scm/mu-scm.hh b/scm/mu-scm.hh
index 02a9cb9f..1d4776cd 100644
--- a/scm/mu-scm.hh
+++ b/scm/mu-scm.hh
@@ -223,9 +223,8 @@ namespace Mu::Scm {
 			return scm_from_utf8_string(val);
 		else if constexpr (std::is_same_v<Type, std::vector<std::string>>) {
 			SCM lst{SCM_EOL};
-			for (const auto& s: val)
-				lst = scm_append_x(scm_list_2(lst,
-							      scm_list_1(to_scm(s))));
+			for (auto it = val.end(); it-- != val.begin();)
+				lst = scm_cons(to_scm(*it), lst);
 			return lst;
 		}
 		else if constexpr (std::is_same_v<Type, bool>)