From 8842a9544bf25041afc52c4481ff7e80bbd55a54 Mon Sep 17 00:00:00 2001
From: Pjotr Prins
Date: Sat, 22 Nov 2025 10:46:05 +0100
Subject: Prevent memory leak

---
 src/guile_api.cpp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'src/guile_api.cpp')

diff --git a/src/guile_api.cpp b/src/guile_api.cpp
index 0c809bd..21eb9ff 100644
--- a/src/guile_api.cpp
+++ b/src/guile_api.cpp
@@ -5,5 +5,9 @@ void global_start_guile() {
 }
 
 string global_guile_version() {
-    return string("3.0");
+    SCM version_scm = scm_version();
+    char* c_str = scm_to_utf8_string(version_scm);
+    string version_str(c_str);
+    free(c_str);  // Must free the allocated memory
+    return version_str;
 }
-- 
cgit 1.4.1