Source position: mysql4_com.pp line 84
procedure randominit(
_para1: Prand_struct;
seed1: dword;
seed2: dword
);