summaryrefslogtreecommitdiff
path: root/benchmark/other-lang/eval.rb
blob: 387592738900d5f6e6c12514380e7daf722f2c0c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66

Bench = %w(
  loop
  ack
  fib
  tak
  fact
)

Lang = <<EOP.map{|l| l.strip}
  ruby-cyg
  ../../../test6/miniruby
  perl
  python
  gosh
EOP

Bench.replace ['loop2']
Lang.replace ['ruby-cyg']

Ext = %w(
  .rb
  .rb
  .pl
  .py
  .scm
)

p Bench
p Lang

require 'benchmark'

def bench cmd
  m = Benchmark.measure{
    #p cmd
    system(cmd)
  }
  [m.utime, m.real]
end

Result = []
Bench.each{|b|
  r = []
  Lang.each_with_index{|l, idx|
    cmd = "#{l} #{b}#{Ext[idx]}"
    r << bench(cmd)
  }
  Result << r
}

require 'pp'
# utime
puts Lang.join("\t")  
Bench.each_with_index{|b, bi|
  print b, "\t"
  puts Result[bi].map{|e| e[0]}.join("\t")
}

# rtime
puts Lang.join("\t")  
Bench.each_with_index{|b, bi|
  print b, "\t"
  puts Result[bi].map{|e| e[1]}.join("\t")
}