BinGroup yields a crash with high number of elements

[imendez]

Hi, this code makes TOL crash:

Date SetMaxDate1(Set setDate)
{ If(EQ(Card(setDate),1),setDate[1],Eval("Max("+DatesList(setDate)+");")) };
Date SetMinDate2(Set setDate)
{ If(EQ(Card(setDate),1), setDate[1], BinGroup("Min",setDate)) };
Date SetMinDate3(Set setDate)
{ If(EQ(Card(setDate),1), setDate[1], Group("Min",setDate)) };

WriteLn("1\t"<< Real Time);
Set sDat = Dates(C, y2000, y2010);
WriteLn("2\t"<< Real Time);
Date d1 = SetMinDate1(sDat);
WriteLn("3\t"<< Real Time);
Date d2 = SetMinDate2(sDat);
WriteLn("4\t"<< Real Time);
Date d3 = SetMinDate3(sDat);
WriteLn("5\t"<< Real Time);

I've talked to Victor and he has told me that the problem seems to be in SetMinDate3, specifically in BinGroup, and that it depends on the PC you are using (I suppose he refers to RAM and other kinds of memory storage systems.

Regards.

[Víctor de Buen Remiro]

Bug has been fixed in CVS
The new behaviour acts in direct order and reaking references in each step by copying partial results instead of drive in reverse order and using incremental references.

A new test tol_tests/tol/Bugzilla/bug_000442 has been added