benchmark/yarv/bm_so_array.rb

   1 #!/usr/bin/ruby
   2 # -*- mode: ruby -*-
   3 # $Id: ary-ruby.code,v 1.4 2004/11/13 07:41:27 bfulgham Exp $
   4 # http://www.bagley.org/~doug/shootout/
   5 # with help from Paul Brannan and Mark Hubbart
   6
   7 n = 9000 # Integer(ARGV.shift || 1)
   8
   9 x = Array.new(n)
  10 y = Array.new(n, 0)
  11
  12 n.times{|bi|
  13   x[bi] = bi + 1
  14 }
  15
  16 (0 .. 999).each do |e|
  17   (n-1).step(0,-1) do |bi|
  18     y[bi] += x.at(bi)
  19   end
  20 end
  21 # puts "#{y.first} #{y.last}"
  22
  23