OpenEuphoria

RE: Apparent bug in 2.3

• Posted by sephiroth _ <euman2376 at yahoo.com> Dec 09, 2001
• 378 views

actually, what you're doing here is creating a *4 GIGABYTE* euphoria 
sequence(as each element of a sequence is 4 bytes). the constant disk 
access is euphoria trying to swap out all that data to disk

rforno at tutopia.com wrote:
> As I was having some problems with my equipment under Windows 98 SE, and 
> not
> satisfied with some system tests that are available, I developed this 
> little
> program to test extended RAM. I have not run it under 2.2 but only under
> 2.3. I used plain DOS, not a DOS window.
> While no virtual memory is used, if one types a key other than 'e', the
> sequence length at this moment is displayed. But when the program starts 
> to
> use virtual memory, typed keys have no effect, the disk is constantly
> accessed, and the only way to stop the program is to hit ctrl-alt-del or 
> the
> reset button. I haven't tried this on a DOS window nor by exw.
> 
> constant MAXINT = 1073741823 --Largest Euphoria integer
> procedure memtest()
>     sequence s
>     integer n, len
>     s = {}
>     len = 0
>     while 1 do
>  n = rand(MAXINT)
>  s &= n
>  len += 1
>  if n != s[len] then
>      printf(1, "Error: %d != %d at %d\n", {n, s[len], len})
>      return
>  end if
>  n = get_key()
>  if n = 'e' then
>      return
>  elsif n != -1 then
>      ? len
>  end if
>     end while
> end procedure
> 
> memtest()
> 
>