On Monday 09 May 2005 18:49, Jean-Claude Wippler wrote:

> The C code is pretty obvious:
>
>      int sum = 0; for (i = 0; i < 50000; ++i) sum += data[i];
>
> This one in tcl 8.4.6 runs at quite a bit under 1% of that speed:
>
>      set sum 0; foreach x $data { incr sum $x }
>
> My question is: how would you write the above in <insert your
> language of choice here> ?

Ruby version (one way):

data = (0..49999) # similar to data = range(50000) in python.

data.inject(0) { |x,y| x += y }

or

sum = 0
data.each { |y| sum += y }



-- 
Best regards,
Stanislav Karchebny

Skype name: berkus
Get skype for free from www.skype.com

Information in this email is confidential and proprietary.

Attachment: pgpNqfBWdJhZ5.pgp
Description: PGP signature

_____________________________________________
Metakit mailing list  -  [email protected]
http://www.equi4.com/mailman/listinfo/metakit

Reply via email to