--- a/hedgewars/uRandom.pas	Thu May 08 20:30:34 2008 +0000
+++ b/hedgewars/uRandom.pas	Thu May 08 20:54:04 2008 +0000
@@ -65,12 +65,10 @@
 end;
 
 function GetRandom: hwFloat;
-var r: hwFloat;
 begin
 GetNext;
-r.isNegative:= false;
-r.QWordValue:= GetNext;
-GetRandom:= r
+GetRandom.isNegative:= false;
+GetRandom.QWordValue:= GetNext
 end;
 
 function GetRandom(m: LongWord): LongWord;
@@ -82,7 +80,7 @@
 function rndSign(num: hwFloat): hwFloat;
 begin
 num.isNegative:= odd(GetNext);
-if num.isNegative then AddFileLog('isNegative TRUE') else AddFileLog('isNegative FALSE');
+AddFileLog(inttostr(n)  +' rnd ' + inttostr(cirbuf[n]));
 rndSign:= num
 end;