diff -r ab6e949eb5cb -r 4e48c276a468 hedgewars/uRandom.pas --- a/hedgewars/uRandom.pas Sun Mar 21 18:42:34 2010 +0000 +++ b/hedgewars/uRandom.pas Sun Mar 21 19:02:03 2010 +0000 @@ -23,8 +23,8 @@ uses uFloat; {$INCLUDE "config.inc"} -procedure init_uRandom; -procedure free_uRandom; +procedure initModule; +procedure freeModule; procedure SetRandomSeed(Seed: shortstring); function GetRandom: hwFloat; overload; @@ -96,12 +96,12 @@ end; {$ENDIF} -procedure init_uRandom; +procedure initModule; begin n:= 54; end; -procedure free_uRandom; +procedure freeModule; begin end;