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

xo-interpreter2 stack: streamline op== impl + utests

Browse source
This commit is contained in:
Roland Conybeare 2026-02-19 09:03:02 -08:00
commit 1595302e13
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
include/xo/procedure2/init_primitives.hpp
View file

@ -29,13 +29,13 @@ namespace xo {
* so we can dispatch on vector, matrix, function types
**/
static DPrimitive_gco_2_gco_gco s_sub_gco_gco_pm;
#endif
/** polymorphic equality comparison
*
* TODO: this will want to move to x-numeric/
**/
static DPrimitive_gco_2_gco_gco s_equal_gco_gco_pm;
#endif
#ifdef NOT_YET
static Primitive_f64_1_f64 s_neg_f64_pm;

4
src/procedure2/init_primitives.cpp
View file

@ -159,7 +159,6 @@ namespace xo {
xtag("y.tseq", y_tseq)));
return obj<AGCObject>();
}
#endif
obj<AGCObject>
equal_gco_gco(obj<ARuntimeContext> rcx,
@ -219,6 +218,7 @@ namespace xo {
xtag("y.tseq", y_tseq)));
return obj<AGCObject>();
}
#endif
#ifdef NOT_YET
double
@ -263,10 +263,10 @@ namespace xo {
DPrimitive_gco_2_gco_gco
Primitives::s_sub_gco_gco_pm("_sub", &sub_gco_gco);
#endif
DPrimitive_gco_2_gco_gco
Primitives::s_equal_gco_gco_pm("_equal", &equal_gco_gco);
#endif
#ifdef NOT_YET
Primitive_f64_1_f64