--- a/hedgewars/uRandom.pas Mon Jan 16 10:22:21 2012 +0100
+++ b/hedgewars/uRandom.pas Tue Jan 17 09:01:31 2012 -0500
@@ -60,7 +60,8 @@
begin
n:= 54;
-if Length(Seed) > 54 then Seed:= copy(Seed, 1, 54); // not 55 to ensure we have odd numbers in cirbuf
+if Length(Seed) > 54 then
+ Seed:= copy(Seed, 1, 54); // not 55 to ensure we have odd numbers in cirbuf
for i:= 0 to Pred(Length(Seed)) do
cirbuf[i]:= byte(Seed[i + 1]);
@@ -68,7 +69,8 @@
for i:= Length(Seed) to 54 do
cirbuf[i]:= $A98765 + 68; // odd number
-for i:= 0 to 1023 do GetNext
+for i:= 0 to 1023 do
+ GetNext
end;
function GetRandom: hwFloat;