TTErr TTEnvironment::getClassNamesWithTags(TTValue& classNames, const TTValue& searchTags)
{
// TODO: right now we only look for the first tag, we should look for each and then do a union on the results.
// Well, that's not what's really happening, but the point is that this really only works if we are searching for one tag.
TTUInt16 size = searchTags.getSize();
TTSymbolPtr tag;
TTValue tagObjects;
TTErr err = kTTErrGeneric;
TTList* classNamesForTag;
for (TTUInt16 i=0; i<size; i++) {
searchTags.get(i, &tag);
err = tags->lookup(tag, tagObjects);
if (!err) {
classNamesForTag = (TTList*)(TTPtr(tagObjects));
classNamesForTag->assignToValue(classNames);
}
}
return err;
}
