xo-procedure: + set-car primitive

This commit is contained in:
Roland Conybeare 2026-03-25 00:10:42 -04:00
commit 27736ed0b6

View file

@ -109,6 +109,10 @@ namespace xo {
(sink,
ObjectPrimitives::make_cons_pm(mm, stbl),
flags & InstallFlags::f_generalpurpose));
ok = ok & (PrimitiveRegistry::install_aux
(sink,
ObjectPrimitives::make_set_car_pm(mm, stbl),
flags & InstallFlags::f_generalpurpose));
ok = ok & (PrimitiveRegistry::install_aux
(sink,
ObjectPrimitives::make_dict_make_pm(mm, stbl),