OpenEuphoria

Win32lib problem

• Posted by DB James <larches at comcast.net> Mar 30, 2007
• 821 views

Hi,

I am getting a type-check failure when I use win32lib's 
getRandInt() function

This function calls machine.e procedure below:

global procedure set_rand(integer seed)
-- Reset the random number generator.
-- A given value of seed will cause the same series of
-- random numbers to be generated from the rand() function
    machine_proc(M_SET_RAND, seed)
end procedure

But getRandInt() sends an atom as a seed in its call to 
set_rand() [set_rand(w32Seed)] and that triggers the error:
[global atom w32Seed w32Seed = #30000000 + rand(#FFFFFFF)].

I'll use rand() meanwhile...

--Quark