Ichthyostega
e6403cbc7e
It seemed like we're doomed... Yet we barely escaped our horrid fate, because the C++ structured bindings happen to look also for get<i> member functions! Any other solution involving a free function `get<i>(h)` would not work, since the `std::tuple` used as base class would inevitably drag in std::get via ADL Obviously, the other remedy would be to turn the `StorageFrame` into a member; yet doing so is not desirable, as makes the actual storage layout more obscure (and also more brittle)
162 lines
6.2 KiB
C++
162 lines
6.2 KiB
C++
/*
|
||
HeteroData(Test) - verify maintaining chained heterogeneous data in local storage
|
||
|
||
Copyright (C)
|
||
2024, Hermann Vosseler <Ichthyostega@web.de>
|
||
|
||
**Lumiera** is free software; you can redistribute it and/or modify it
|
||
under the terms of the GNU General Public License as published by the
|
||
Free Software Foundation; either version 2 of the License, or (at your
|
||
option) any later version. See the file COPYING for further details.
|
||
|
||
* *****************************************************************/
|
||
|
||
/** @file del-stash-test.cpp
|
||
** unit test \ref HeteroData_test
|
||
*/
|
||
|
||
|
||
#include "lib/test/run.hpp"
|
||
#include "lib/hetero-data.hpp"
|
||
#include "lib/meta/trait.hpp"
|
||
#include "lib/test/diagnostic-output.hpp"/////////////////TODO
|
||
#include "lib/util.hpp"
|
||
|
||
#include <string>
|
||
|
||
|
||
namespace lib {
|
||
namespace test{
|
||
|
||
using std::string;
|
||
using meta::is_Subclass;
|
||
using util::isSameObject;
|
||
|
||
|
||
|
||
|
||
|
||
/*************************************************************//**
|
||
* @test maintain a sequence of data tuples in local storage,
|
||
* providing pre-configured type-safe data access.
|
||
*
|
||
* @see lib::HeteroData
|
||
* @see NodeBase_test::verify_TurnoutSystem()
|
||
*/
|
||
class HeteroData_test : public Test
|
||
{
|
||
|
||
virtual void
|
||
run (Arg)
|
||
{
|
||
verify_FrontBlock();
|
||
verify_ChainBlock();
|
||
// verify_Accessors();
|
||
}
|
||
|
||
|
||
/** @test build a free standing data tuple block to start a chain */
|
||
void
|
||
verify_FrontBlock()
|
||
{
|
||
using Block1 = HeteroData<uint,double>;
|
||
CHECK ((is_Subclass<Block1::NewFrame, std::tuple<uint,double>>()));
|
||
|
||
auto b1 = Block1::build (42, 1.61803);
|
||
CHECK (1.61803 == b1.get<1>());
|
||
CHECK (42 == b1.get<0>());
|
||
CHECK (showType<Block1::Elm_t<0>>() == "uint"_expect);
|
||
CHECK (showType<Block1::Elm_t<1>>() == "double"_expect);
|
||
|
||
Block1 b2;
|
||
CHECK (0.0 == b2.get<1>());
|
||
b2.get<1>() = 3.14;
|
||
CHECK (3.14 == b2.get<1>());
|
||
|
||
CHECK (2 == std::tuple_size_v<Block1::NewFrame::Tuple>); // referring to the embedded tuple type
|
||
CHECK (2 == std::tuple_size_v<Block1::NewFrame>); // StorageFrame itself complies to the C++ tuple protocol
|
||
CHECK (2 == std::tuple_size_v<Block1>); // likewise for the complete HeteroData Chain
|
||
|
||
auto& [_,p] = b2; // can use structured bindings...
|
||
CHECK (p == 3.14);
|
||
p = 3.14159;
|
||
CHECK (3.14159 == b2.get<1>());
|
||
}
|
||
|
||
|
||
/** @test construct a follow-up data tuple block and hook it into the chain */
|
||
void
|
||
verify_ChainBlock()
|
||
{
|
||
using Block1 = HeteroData<uint>;
|
||
CHECK ((is_Subclass<Block1::NewFrame, std::tuple<uint>>()));
|
||
|
||
using Constructor = Block1::Chain<double,string>;
|
||
using Block2 = Constructor::NewFrame;
|
||
CHECK ((is_Subclass<Block2, std::tuple<double, string>>()));
|
||
|
||
auto b1 = Block1::build (41);
|
||
auto b2 = Constructor::build (1.61, "Φ");
|
||
b2.linkInto(b1);
|
||
|
||
using Chain2 = Constructor::ChainType;
|
||
Chain2& chain2 = Constructor::recast (b1);
|
||
CHECK (b1.size() == 1);
|
||
CHECK (chain2.size() == 3);
|
||
|
||
CHECK (41 == chain2.get<0>());
|
||
CHECK (1.61 == chain2.get<1>());
|
||
CHECK ("Φ" == chain2.get<2>());
|
||
|
||
chain2.get<0>()++;
|
||
chain2.get<1>() = (1 + sqrt(5)) / 2;
|
||
|
||
CHECK (b1.get<0>() == 42);
|
||
CHECK (chain2.get<0>() == 42);
|
||
CHECK (std::get<0> (b2) == "1.618034"_expect);
|
||
|
||
CHECK (isSameObject (chain2.get<0>() ,b1.get<0>()));
|
||
CHECK (isSameObject (chain2.get<2>() ,std::get<1>(b2)));
|
||
|
||
CHECK (1 == std::tuple_size_v<Block1::NewFrame::Tuple>); // referring to the embedded tuple type
|
||
CHECK (1 == std::tuple_size_v<Block1::NewFrame>);
|
||
CHECK (1 == std::tuple_size_v<Block1>);
|
||
|
||
CHECK (2 == std::tuple_size_v<Block2::Tuple>); // referring to the embedded tuple type
|
||
CHECK (2 == std::tuple_size_v<Block2>);
|
||
|
||
CHECK (3 == std::tuple_size_v<Chain2>);
|
||
CHECK ((showType<std::tuple_element_t<0, Chain2>>() == "uint"_expect));
|
||
CHECK ((showType<std::tuple_element_t<1, Chain2>>() == "double"_expect));
|
||
CHECK ((showType<std::tuple_element_t<2, Chain2>>() == "string"_expect));
|
||
|
||
CHECK ((showType<std::tuple_element_t<0, Block2>>() == "double"_expect));
|
||
CHECK ((showType<std::tuple_element_t<1, Block2>>() == "string"_expect));
|
||
|
||
// CHECK (std::get<0> (chain2) == "42"_expect); // std::tuple is inaccessible base of HeteroData
|
||
CHECK (std::get<0> (b2) == "1.618034"_expect);
|
||
// CHECK (std::get<1> (chain2) == "1.618034"_expect); // does not compile due to range restriction for the base tuple
|
||
// (as such this is correct — yet prevents definition of a custom get-function)
|
||
auto& [u0] = b1;
|
||
CHECK (u0 == "42"_expect);
|
||
|
||
auto& [v0,v1] = b2; // b2 is typed as StorageFrame and thus the tuple base is accessible
|
||
CHECK (v0 == "1.618034"_expect);
|
||
CHECK (v1 == "Φ"_expect);
|
||
|
||
auto& [x0,x1,x2] = chain2; // Note: structured binding on the fully typed chain uses the get<i>-Member
|
||
CHECK (x0 == "42"_expect);
|
||
CHECK (x1 == "1.618034"_expect);
|
||
CHECK (x2 == "Φ"_expect);
|
||
|
||
// auto& [z0,z1,z2,z3] = chain2; // Error: 4 names provided for structured binding, while HeteroData... decomposes into 3 elements
|
||
// auto& [z0,z1,z2] = b1; // Error: HeteroData<Node<StorageFrame<0, uint>, NullType> >' decomposes into 1 element
|
||
}
|
||
};
|
||
|
||
|
||
/** Register this test class... */
|
||
LAUNCHER (HeteroData_test, "unit common");
|
||
|
||
|
||
}} // namespace lib::test
|