OpenEuphoria

1. Eu vs PowerBasic

• Posted by useless Jun 10, 2009
• 1309 views
• Last edited Jun 11, 2009

Choices of programming languages came up in an irc channel, and PowerBasic was of course mentioned. I had not looked at it in a while, so i re-looked at it. Their little test on

http://www.powerbasic.com/products/pbdll32/default.asp

looked impressive: "On an AMD 64 CPU,.....(WinXP Pro). Same source code, line for line. No attempt to minimize any background tasks. Elapsed time: 0.209 seconds."

So i converted it to Eu, and gave it a try.

    without warning 
    without trace 
    object junk 
    atom x, y, t 
    x = 1 
    y = 1.000001 
for repeatloop = 1 to 10 do     
    t = time() 
    for i = 1 to 100000000 do 
        x = x * y 
    end for 
    t = time() - t 
    puts(1,sprintf("%d",t)&"\n") 
end for     
junk = gets(0) -- whereafter the program terminates 

Running Eu v3.1 and v4.a, i got these numbers for 10 iterations of the code, each number is one iteration, times are in seconds:

v3.1 V4.0.a
5 4
6 4
6 5
6 5
5 5
5 5
6 5
48 44
48 48
48 48

Computer used is a P4 2.4ghz with 1gb of ram, running winxp sp2. Tis a far yelp, cry, scream from their 0.209 seconds. What's going on?

useless

3. Re: Eu vs PowerBasic

• Posted by jacques_desch Jun 10, 2009
• 1297 views
• Last edited Jun 11, 2009

Sorry this is an AMD turion 64x2 at 1.6Ghz and windows xp pro sp3
jacques

    without warning 
    without trace 
    object junk 
    atom x, y, t 
    x = 1 
    y = 1.000001 
for repeatloop = 1 to 10 do     
    t = time() 
    for i = 1 to 100000000 do 
        x = x * y 
    end for 
    t = time() - t 
    puts(1,sprintf("%d",t)&"\n") 
end for     
junk = gets(0) -- whereafter the program terminates 

5. Re: Eu vs PowerBasic

• Posted by useless Jun 10, 2009
• 1258 views
• Last edited Jun 11, 2009

Jeremy, any idea why the execution time on v3.1 and v4 exploded to 40+ seconds on the last 3 iterations?

useless

7. Re: Eu vs PowerBasic

• Posted by LarryMiller Jun 11, 2009
• 1291 views

without type_check 
 
atom x = 1, y = 1.000001, t 
 
for repeatloop = 1 to 10 do      
    t = time() 
 
    for i = 1 to 100000000 do 
        x = x * y  
    end for 
 
    ? time() - t 
end for 

2.375 
2.375 
2.36 
2.359 
2.375 
2.375 
2.375 
13.734 
15 
14.985 

I tried this program with a slight modification. I printed the value of x after each loop. Since this variable is never reset the value continues to grow after each loop. Sometime during the 8th iteration the value overflowed and produced inf as the value. I suspect that multiplying this value is slower than normal.

Larry

9. Re: Eu vs PowerBasic

• Posted by GeorgeWalters Jun 11, 2009
• 1227 views

On my intel t5500 1.66gh EU version 2.4

3 2 2 2 2 2

George

11. Re: Eu vs PowerBasic

• Posted by DerekParnell (admin) Jun 11, 2009
• 1192 views

Wow, either my machine is very sick or something weird is going on. I'm getting between 12 and 14 seconds per iteration.

I've got an Intel core2 2.4Ghz with 2Gig RAM.

I tried the same program coded in D and I get 0.48 seconds, and when I coded it in D emulating the Euphoria translator's code I get 1.87 seconds.

13. Re: Eu vs PowerBasic

• Posted by jeremy (admin) Jun 11, 2009
• 1169 views

Wow! I just ran it again, same results. Are you guys running debug versions of eui from SVN? I am running from SVN but not debug builds (if that matters).

C:\Develop\euphoria>cat t.ex 
without type_check 
 
atom x, y = 1.000001, t 
 
for repeatloop = 1 to 10 do 
        x = 1 
        t = time() 
 
        for i = 1 to 100000000 do 
        x = x * y 
    end for 
 
        ? time() - t 
end for 
 
C:\Develop\euphoria>eui -version 
Euphoria Interpreter 4.0.0 development (r2148M) for Windows 
Using Managed Memory 
 
C:\Develop\euphoria>eui t.ex 
2.391 
2.359 
2.343 
2.344 
2.359 
2.36 
2.422 
2.343 
2.344 
2.36 
 
C:\Develop\euphoria>euc -con t.ex 
Translating code, pass: 1 2 3  generating 
Compiling with Watcom 
Compiling 13% init-.c 
Compiling 50% t.c 
Compiling 75% main-.c 
Linking 100% t.exe 
 
To run your project, type t.exe 
 
C:\Develop\euphoria>t.exe 
1.609 
1.516 
1.531 
1.531 
1.516 
1.516 
1.531 
1.516 
1.531 
1.531 

I run a quad core 2.4ghz w/4g ram, but the app never uses more than 900k ram and it's limited to 1 processor.

Jeremy

15. Re: Eu vs PowerBasic

• Posted by jeremy (admin) Jun 11, 2009
• 1175 views

http://en.wikipedia.org/wiki/D_(programming_language)

Jeremy

17. Re: Eu vs PowerBasic

• Posted by Bayes Jun 11, 2009
• 1394 views

I meant time, of course.