I found this on the web.... Anybody think it viable to patch FPC? :-)
function GetRandomNumber: Integer; begin Result := 4; // Chosen by fair dice roll. Guaranteed to be random. end; Original source: http://xkcd.com/221/ Regards, - Graeme - _______________________________________________ fpGUI - a cross-platform Free Pascal GUI toolkit http://opensoft.homeip.net/fpgui/ _______________________________________________ fpc-devel maillist - fpc-devel@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-devel
