static void spToStrim_List(const ZML::StrimW& s, ZRef<ZYadSeqR> iYadSeqR)
{
s.Begin("array");
while (ZRef<ZYadR> theChild = iYadSeqR->ReadInc())
ZYad_XMLPList::sToStrim(theChild, s);
s.End("array");
}
static void spToStrim_Map(const ZML::StrimW& s, ZRef<ZYadMapR> iYadMapR)
{
s.Begin("dict");
ZName theName;
while (ZRef<ZYadR> theChild = iYadMapR->ReadInc(theName))
{
s.Begin("key");
s << string8(theName);
s.End("key");
ZYad_XMLPList::sToStrim(theChild, s);
}
s.End("dict");
}