allow to unpack set of Objects by explicit cast

alib2common/src/PrimitiveRegistrator.cpp

@@ -17,6 +17,14 @@
 namespace {
 class PrimitiveRegistrator {
+	static const ext::set < object::Object > & denormalizeSetObject ( const object::Object & o ) {
+		const object::AnyObjectBase & data = o.getData ( );
+		const object::AnyObject < ext::set < object::Object > > * innerData = dynamic_cast < const object::AnyObject < ext::set < object::Object > > * > ( & data );
+		if ( innerData )
+			return innerData->getData ( );
+		throw std::invalid_argument ( "Casted object does not contain data of type " + ext::to_string < ext::set < object::Object > > ( ) + "." );
+	}
+
 public:
 	PrimitiveRegistrator ( ) {
 		abstraction::CastRegistry::registerCast < double, int > ( );
@@ -37,6 +45,8 @@ public:
 		abstraction::CastRegistry::registerCast < long, int > ( "long", ext::to_string < int > ( ) );
+		abstraction::CastRegistry::registerCastAlgorithm < const ext::set < object::Object > &, const object::Object & > ( "SetOfObjects", ext::to_string < object::Object > ( ), denormalizeSetObject, true );
+
 		abstraction::ContainerRegistry::registerSet < int > ( );
 		abstraction::ValuePrinterRegistry::registerValuePrinter < int > ( );