a bug in RandomHash2.
URandomHash2.pas
line 267
LParentOutputs := Hash(ABlockHeader, ARound - 1, AFoundLastRound);
if AFoundLastRound > 0 then
// Previous round was the final round, so just return it's value
Exit(LParentOutputs); //bug is here
There are 1/4 chances in round 2, returning results,without continue calculating the data behind,
Discarding some nones will result in hundreds of performance gains