OpenEuphoria

Re: Optimization

• Posted by Matt Z Nunyabidness <matt1421 at JUNO.COM> Sep 26, 1998
• 424 views

>procedure proc1()
>    atom foo
>    foo=0
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>        foo=foo+1
>        foo=foo+1
>        foo=foo+1
>    end for
>
>    ? foo
>end procedure
>
>
>procedure proc2()
>    atom foo
>    foo=0
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>        foo=foo+1
>    end for
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>        foo=foo+1
>    end for
>
>    ? foo
>end procedure
>
>
>procedure proc3()
>    atom foo
>    foo=0
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>    end for
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>    end for
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>    end for
>
>    for temp=1 to 15000000 do
>        foo=foo+1
>    end for
>
>    ? foo
>
>end procedure
>atom start
>
>-- Time proc1()
>start=time()
>proc1()
>printf(1,"proc1() took %2.2f seconds\n\n",time()-start)
>
>-- Time proc2()
>start=time()
>proc2()
>printf(1,"proc2() took %2.2f seconds\n\n",time()-start)
>
>-- Time proc3()
>start=time()
>proc3()
>printf(1,"proc3() took %2.2f seconds\n\n",time()-start)
What does foo mean?!?!?!?!?!?!?!?!?! How about foobar and bar and foo.bar
too!!!

___________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
Or call Juno at (800) 654-JUNO [654-5866]