From 80b80881b055fa1ad1ecba2a993dc1c4aa62e2f0 Mon Sep 17 00:00:00 2001
From: Roland Conybeare <rconybeare@gmail.com>
Date: Tue, 17 Mar 2026 12:27:31 -0400
Subject: [PATCH] xo-procedure2: bugfix: conform getcwd() api: must use return
 value

---
 src/procedure2/ObjectPrimitives.cpp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/procedure2/ObjectPrimitives.cpp b/src/procedure2/ObjectPrimitives.cpp
index 4edd387..d9d86f4 100644
--- a/src/procedure2/ObjectPrimitives.cpp
+++ b/src/procedure2/ObjectPrimitives.cpp
@@ -33,9 +33,9 @@ namespace xo {
         xfer_cwd(obj<ARuntimeContext> rcx)
         {
             char buf[PATH_MAX];
-            ::getcwd(buf, sizeof(buf));
+            char * cwd = ::getcwd(buf, sizeof(buf));
 
-            return obj<AGCObject,DString>(DString::from_cstr(rcx.allocator(), buf));
+            return obj<AGCObject,DString>(DString::from_cstr(rcx.allocator(), cwd));
         }
 
         DPrimitive_gco_0 *