roland/xo-umbrella2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

xo-interpreter2 stack: refactor: move cwd() -> ObjectPrimitives

Browse source
This commit is contained in:
Roland Conybeare 2026-03-15 14:25:35 -05:00
commit 1e3e879966
1 changed files with 0 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

27
src/interpreter2/VirtualSchematikaMachine.cpp
View file

@ -37,7 +37,6 @@
#include <xo/printable2/Printable.hpp>
#include <xo/facet/FacetRegistry.hpp>
#include <cassert>
#include <unistd.h> // for getcwd()
namespace xo {
using xo::scm::DDictionary;
@ -876,20 +875,6 @@ namespace xo {
}
}
// ----- primitive: cwd() -----
obj<AGCObject>
xfer_cwd(obj<ARuntimeContext> rcx)
{
char buf[PATH_MAX];
::getcwd(buf, sizeof(buf));
return obj<AGCObject,DString>(DString::from_cstr(rcx.allocator(), buf));
}
static DPrimitive_gco_0 s_cwd_pm("_cwd",
&xfer_cwd);
// ----- primitive: fn_n_args() -----
obj<AGCObject>
@ -916,18 +901,6 @@ namespace xo {
void
VirtualSchematikaMachine::install_core_primitives()
{
/* cwd */
{
const DUniqueString * name
= reader_.intern_string("cwd");
global_env_->_upsert_value
(mm_.to_op(),
name,
Reflect::require<DPrimitive_gco_0>(),
obj<AGCObject,DPrimitive_gco_0>(&s_cwd_pm));
}
/* fn_n_args */
{
const DUniqueString * name