id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
442	BinGroup yields a crash with high number of elements	imendez	Víctor de Buen Remiro	"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."	defect	closed	highest		Kernel	head	blocker	fixed		Víctor de Buen Remiro