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

xo-XXX -> .xo-XXX (prep subrepo)

Browse source
This commit is contained in:
Roland Conybeare 2026-06-06 22:00:54 -04:00
commit cf0bd4d975
2105 changed files with 0 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

105
xo-expression2/src/expression2/DConstant.cpp
View file

@ -1,105 +0,0 @@
/** @file DConstant.cpp
*
* @author Roland Conybeare, Jan 2026
**/
#include "Constant.hpp"
//#include "detail/IExpression_DConstant.hpp"
#include "TypeDescr.hpp"
#include <xo/object2/DFloat.hpp>
#include <xo/object2/DInteger.hpp>
#include <xo/facet/FacetRegistry.hpp>
#include <xo/facet/obj.hpp>
#include <xo/reflect/Reflect.hpp>
#include <xo/printable2/Printable.hpp>
#include <xo/reflectutil/typeseq.hpp>
namespace xo {
using xo::scm::DFloat;
using xo::scm::DInteger;
using xo::print::APrintable;
using xo::facet::FacetRegistry;
using xo::reflect::Reflect;
using xo::reflect::TypeDescr;
using xo::reflect::typeseq;
namespace scm {
DConstant::DConstant(obj<AGCObject> value) noexcept
:
//typeref_{TypeRef::resolved(td)},
value_{value}
{
// todo: use ObjectConverter here
auto tseq = value_._typeseq();
TypeDescr td = this->_lookup_td(tseq);
if (td) {
typeref_ = TypeRef::resolved(td);
}
}
obj<AExpression,DConstant>
DConstant::make(obj<AAllocator> mm,
obj<AGCObject> value)
{
return obj<AExpression,DConstant>(_make(mm, value));
}
DConstant *
DConstant::_make(obj<AAllocator> mm,
obj<AGCObject> value)
{
void * mem = mm.alloc(typeseq::id<DConstant>(),
sizeof(DConstant));
return new (mem) DConstant(value);
}
TypeDescr
DConstant::_lookup_td(typeseq tseq)
{
if (tseq == typeseq::id<DFloat>()) {
/* double */
return Reflect::require<DFloat::value_type>();
} else if (tseq == typeseq::id<DInteger>()) {
/* long */
return Reflect::require<DInteger::value_type>();
}
return nullptr;
}
DConstant *
DConstant::gco_shallow_move(obj<AGCObjectVisitor> gc) noexcept
{
return gc.std_move_for(this);
}
void
DConstant::visit_gco_children(VisitReason reason,
obj<AGCObjectVisitor> gc) noexcept
{
typeref_.visit_gco_children(reason, gc);
gc.visit_child(reason, &value_);
}
bool
DConstant::pretty(const ppindentinfo & ppii) const
{
obj<APrintable> value_pr
= FacetRegistry::instance().variant<APrintable,AGCObject>(value_);
return ppii.pps()->pretty_struct
(ppii,
"DConstant",
refrtag("value_.tseq", value_._typeseq()),
refrtag("value.tseq", value_pr._typeseq()),
refrtag("value", value_pr));
}
} /*namespace scm*/
} /*namespace xo*/
/* end DConstant.cpp */