Source position: mysql4_comdyn.pp line 63
var randominit: procedure(
_para1: Prand_struct;
seed1: dword;
seed2: dword
);