solving some problem with BinGroup

[imendez]

Hi.

This code returns an error:

Set Cjto = "a", "b", "c" ?;
Set CjtoConTextoError = SetOfAnything(BinGroup("<<", Cjto));

ERROR: Algún elemento para la funcion BinGroup no es un objeto de tipo Anything

because "Cjto" elements are texts and BinGroup tries to return "Anything" type
objects. When BinGroup compares "Anything" and "Text" type objects, it returns
FALSE.

Regards.

[imendez]

Of course, Group function has the same problem:

Set CjtoConTextoError = SetOfAnything(Group("<<", Cjto));

And, if SetOfAnything is substituted by SetOfText, the code wroks perfectly:

Set CjtoConTextoError2 = SetOfText(BinGroup("<<", Cjto));

[danirus]

This is a suberror of the previous 331.
I resolved these problems with BinGroup and Group, since they're easy to find
and fix, bot for fix the previous I have to lay a plot...

Cheers,
Daniel