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>) { 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)