about summary refs log tree commit diff
path: root/src/guile_api.cpp
diff options
context:
space:
mode:
authorPjotr Prins2025-11-22 10:46:05 +0100
committerPjotr Prins2025-11-22 10:46:05 +0100
commit8842a9544bf25041afc52c4481ff7e80bbd55a54 (patch)
tree2e9f121440bf519abc6df2b3f88b9274e0babb40 /src/guile_api.cpp
parentd9f1a4a8e648725bff2b03a59651e56644eb8c4b (diff)
downloadpangemma-8842a9544bf25041afc52c4481ff7e80bbd55a54.tar.gz
Prevent memory leak
Diffstat (limited to 'src/guile_api.cpp')
-rw-r--r--src/guile_api.cpp6
1 files changed, 5 insertions, 1 deletions
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;
 }