diff --git a/include/xo/procedure2/init_primitives.hpp b/include/xo/procedure2/init_primitives.hpp index 411b3d3..14f5fdc 100644 --- a/include/xo/procedure2/init_primitives.hpp +++ b/include/xo/procedure2/init_primitives.hpp @@ -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; diff --git a/src/procedure2/init_primitives.cpp b/src/procedure2/init_primitives.cpp index c3cc517..1fd3950 100644 --- a/src/procedure2/init_primitives.cpp +++ b/src/procedure2/init_primitives.cpp @@ -159,7 +159,6 @@ namespace xo { xtag("y.tseq", y_tseq))); return obj(); } -#endif obj equal_gco_gco(obj rcx, @@ -219,6 +218,7 @@ namespace xo { xtag("y.tseq", y_tseq))); return obj(); } +#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