OpenEuphoria

Re: Well I did it! (variable_id, etc..)

• Posted by Greg Haberek <ghaberek at gmail.com> Nov 26, 2004
• 666 views

[sounds like Peter from Family Guy] "Holy friggin crap!!"

That's amazing. Here's a speed update:

sorting 10,000 random objects between 0 and 999

Old stats:
    exw: 0.020 seconds
    euw: 10.975 seconds (best run, some were 11+)

New stats:
    exw: 0.020 seconds
    euw: 0.281 seconds

I guess the interpreted interpreter isn't so slow after all!

~Greg

P.S. I just added version() and now I'm working on a 'next' statement.
I think, due to the internal working of for and while loops, I'll have
to make 'next for' and 'next while' statements... or I need some way
of determining what type of loop i'm in.


On Thu, 25 Nov 2004 18:09:32 -0800, Robert Craig
<guest at rapideuphoria.com> wrote:
> 
> posted by: Robert Craig <rds at RapidEuphoria.com>
> 
> 
> Greg Haberek wrote:
> > I'll put out the source once I get all the features in that I'd like.
> > As far as speed, well, it definitly needs to be run with the C
> > backend.
> >
> > sorting test - 10,000 random integers 0 - 999
> >
> >     exw.exe -   0.020 seconds
> >     euw.exe - 11.376 seconds
> >
> > That's 568% slower!
> 
> Try my new version of opASSIGN_SUBS...
> 
> }}}
<eucode>
> procedure opASSIGN_SUBS() -- also ASSIGN_SUBS_CHECK, ASSIGN_SUBS_I
> -- LHS single subscript and assignment
>    object x, subs
> 
>    a = Code[pc+1]  -- the sequence
>    b = Code[pc+2]  -- the subscript
>    if sequence(val[b]) then
>        RTFatal("subscript must be an atom\n(assigning to subscript of a
>        sequenc
>    end if
>    c = Code[pc+3]  -- the RHS value
>    x = val[a]
>    lhs_check_subs(x, val[b])
>    x = val[c]
>    subs = val[b]
>    val[a][subs] = x  -- single LHS subscript
>    pc += 4
> end procedure
> </eucode>
{{{

> 
> I think you'll be pleasantly surprised.
> 
> Regards,
>   Rob Craig
>   Rapid Deployment Software
>   http://www.RapidEuphoria.com
> 
> 
> 
> 
>