blob: b1cc4bf510a1308dc01e1d211e6cdcc03b62fbad (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
// included by glib2.pas
{$IFDEF read_forward_definitions}
{$ENDIF read_forward_definitions}
//------------------------------------------------------------------------------
{$IFDEF read_interface_types}
PGRand = pointer; // check please
{$ENDIF read_interface_types}
//------------------------------------------------------------------------------
{$IFDEF read_interface_rest}
function g_rand_new_with_seed(seed:guint32):PGRand;cdecl;external gliblib name 'g_rand_new_with_seed';
function g_rand_new:PGRand;cdecl;external gliblib name 'g_rand_new';
procedure g_rand_free(rand:PGRand);cdecl;external gliblib name 'g_rand_free';
procedure g_rand_set_seed(rand:PGRand; seed:guint32);cdecl;external gliblib name 'g_rand_set_seed';
function g_rand_boolean(rand : PGRand) : gboolean;
function g_rand_int(rand:PGRand):guint32;cdecl;external gliblib name 'g_rand_int';
function g_rand_int_range(rand:PGRand; _begin:gint32; _end:gint32):gint32;cdecl;external gliblib name 'g_rand_int_range';
function g_rand_double(rand:PGRand):gdouble;cdecl;external gliblib name 'g_rand_double';
function g_rand_double_range(rand:PGRand; _begin:gdouble; _end:gdouble):gdouble;cdecl;external gliblib name 'g_rand_double_range';
procedure g_random_set_seed(seed:guint32);cdecl;external gliblib name 'g_random_set_seed';
function g_random_boolean : gboolean;
function g_random_int:guint32;cdecl;external gliblib name 'g_random_int';
function g_random_int_range(_begin:gint32; _end:gint32):gint32;cdecl;external gliblib name 'g_random_int_range';
function g_random_double:gdouble;cdecl;external gliblib name 'g_random_double';
function g_random_double_range(_begin:gdouble; _end:gdouble):gdouble;cdecl;external gliblib name 'g_random_double_range';
{$ENDIF read_interface_rest}
// included by glib2.pas
|