62 lines
2.4 KiB
C++
62 lines
2.4 KiB
C++
/** @file procedure2_register_facets.cpp
|
|
*
|
|
* @author Roland Conybeare, Jan 2026
|
|
**/
|
|
|
|
#include "Procedure.hpp"
|
|
#include "SimpleRcx.hpp"
|
|
#include "Primitive_gco_0.hpp"
|
|
#include "Primitive_gco_1_gco.hpp"
|
|
#include "Primitive_gco_2_gco_gco.hpp"
|
|
#include "Primitive_gco_3_dict_string_gco.hpp"
|
|
|
|
#include <xo/gc/GCObject.hpp>
|
|
#include <xo/printable2/Printable.hpp>
|
|
#include <xo/facet/FacetRegistry.hpp>
|
|
#include <xo/indentlog/scope.hpp>
|
|
|
|
namespace xo {
|
|
using xo::facet::FacetRegistry;
|
|
using xo::facet::typeseq;
|
|
using xo::print::APrintable;
|
|
|
|
namespace scm {
|
|
bool
|
|
procedure2_register_facets()
|
|
{
|
|
scope log(XO_DEBUG(true));
|
|
|
|
FacetRegistry::register_impl<ARuntimeContext, DSimpleRcx>();
|
|
|
|
FacetRegistry::register_impl<AProcedure, DPrimitive_gco_0>();
|
|
FacetRegistry::register_impl<AGCObject, DPrimitive_gco_0>();
|
|
FacetRegistry::register_impl<APrintable, DPrimitive_gco_0>();
|
|
|
|
FacetRegistry::register_impl<AProcedure, DPrimitive_gco_1_gco>();
|
|
FacetRegistry::register_impl<AGCObject, DPrimitive_gco_1_gco>();
|
|
FacetRegistry::register_impl<APrintable, DPrimitive_gco_1_gco>();
|
|
|
|
FacetRegistry::register_impl<AProcedure, DPrimitive_gco_2_gco_gco>();
|
|
FacetRegistry::register_impl<AGCObject, DPrimitive_gco_2_gco_gco>();
|
|
FacetRegistry::register_impl<APrintable, DPrimitive_gco_2_gco_gco>();
|
|
|
|
FacetRegistry::register_impl<AProcedure, DPrimitive_gco_3_dict_string_gco>();
|
|
FacetRegistry::register_impl<AGCObject, DPrimitive_gco_3_dict_string_gco>();
|
|
FacetRegistry::register_impl<APrintable, DPrimitive_gco_3_dict_string_gco>();
|
|
|
|
log && log(xtag("DSimpleRcx.tseq", typeseq::id<DSimpleRcx>()));
|
|
log && log(xtag("DPrimitive_gco_0.tseq", typeseq::id<DPrimitive_gco_0>()));
|
|
log && log(xtag("DPrimitive_gco_1_gco.tseq", typeseq::id<DPrimitive_gco_1_gco>()));
|
|
log && log(xtag("DPrimitive_gco_2_gco_gco.tseq", typeseq::id<DPrimitive_gco_2_gco_gco>()));
|
|
log && log(xtag("DPrimitive_gco_3_dict_string_gco.tseq", typeseq::id<DPrimitive_gco_3_dict_string_gco>()));
|
|
|
|
log && log(xtag("ARuntimeContext.tseq", typeseq::id<ARuntimeContext>()));
|
|
log && log(xtag("AProcedure.tseq", typeseq::id<AProcedure>()));
|
|
|
|
return true;
|
|
}
|
|
|
|
} /*namespace scm*/
|
|
} /*namespace xo*/
|
|
|
|
/* end procedure2_register_facets.cpp */
|