* lib/profiler.rb: fixed "undefined method `[]' for nil:NilClass"
[ruby-core:4775] [ruby-talk:140401] [ruby-dev:26118] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8408 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
ce3785458a
commit
4c72dfd39f
@ -1,3 +1,8 @@
|
|||||||
|
Sun May 8 16:50:25 2005 Hirokazu Yamamoto <ocean@m2.ccsnet.ne.jp>
|
||||||
|
|
||||||
|
* lib/profiler.rb: fixed "undefined method `[]' for nil:NilClass"
|
||||||
|
[ruby-core:4775] [ruby-talk:140401] [ruby-dev:26118]
|
||||||
|
|
||||||
Sat May 7 22:58:00 2005 Nobuyoshi Nakada <nobu@ruby-lang.org>
|
Sat May 7 22:58:00 2005 Nobuyoshi Nakada <nobu@ruby-lang.org>
|
||||||
|
|
||||||
* lib/mkmf.rb (have_var): no libs argument is given.
|
* lib/mkmf.rb (have_var): no libs argument is given.
|
||||||
|
@ -1,40 +1,29 @@
|
|||||||
module Profiler__
|
module Profiler__
|
||||||
Times = if defined? Process.times then Process else Time end
|
|
||||||
# internal values
|
# internal values
|
||||||
@@start = @@stack = @@map = nil
|
@@start = @@stack = @@map = nil
|
||||||
PROFILE_PROC = proc{|event, file, line, id, binding, klass|
|
PROFILE_PROC = proc{|event, file, line, id, binding, klass|
|
||||||
case event
|
case event
|
||||||
when "call", "c-call"
|
when "call", "c-call"
|
||||||
now = Float(Times::times[0])
|
now = Process.times[0]
|
||||||
@@stack.push [now, 0.0, id]
|
@@stack.push [now, 0.0]
|
||||||
when "return", "c-return"
|
when "return", "c-return"
|
||||||
now = Float(Times::times[0])
|
now = Process.times[0]
|
||||||
tick = @@stack.pop
|
key = [klass, id]
|
||||||
name = klass.to_s
|
if tick = @@stack.pop
|
||||||
if name.nil? then name = '' end
|
data = (@@map[key] ||= [0, 0.0, 0.0, key])
|
||||||
if klass.kind_of? Class
|
data[0] += 1
|
||||||
name += "#"
|
cost = now - tick[0]
|
||||||
else
|
data[1] += cost
|
||||||
name += "."
|
data[2] += cost - tick[1]
|
||||||
|
@@stack[-1][1] += cost if @@stack[-1]
|
||||||
end
|
end
|
||||||
name += id.id2name
|
|
||||||
data = @@map[name]
|
|
||||||
unless data
|
|
||||||
data = [0.0, 0.0, 0.0, name]
|
|
||||||
@@map[name] = data
|
|
||||||
end
|
|
||||||
data[0] += 1
|
|
||||||
cost = now - tick[0]
|
|
||||||
data[1] += cost
|
|
||||||
data[2] += cost - tick[1]
|
|
||||||
@@stack[-1][1] += cost
|
|
||||||
end
|
end
|
||||||
}
|
}
|
||||||
module_function
|
module_function
|
||||||
def start_profile
|
def start_profile
|
||||||
@@start = Float(Times::times[0])
|
@@start = Process.times[0]
|
||||||
@@stack = [[0, 0, :toplevel], [0, 0, :dummy]]
|
@@stack = []
|
||||||
@@map = {"#toplevel" => [1, 0, 0, "#toplevel"]}
|
@@map = {}
|
||||||
set_trace_func PROFILE_PROC
|
set_trace_func PROFILE_PROC
|
||||||
end
|
end
|
||||||
def stop_profile
|
def stop_profile
|
||||||
@ -42,9 +31,8 @@ module_function
|
|||||||
end
|
end
|
||||||
def print_profile(f)
|
def print_profile(f)
|
||||||
stop_profile
|
stop_profile
|
||||||
total = Float(Times::times[0]) - @@start
|
total = Process.times[0] - @@start
|
||||||
if total == 0 then total = 0.01 end
|
if total == 0 then total = 0.01 end
|
||||||
@@map["#toplevel"][1] = total
|
|
||||||
data = @@map.values
|
data = @@map.values
|
||||||
data.sort!{|a,b| b[2] <=> a[2]}
|
data.sort!{|a,b| b[2] <=> a[2]}
|
||||||
sum = 0
|
sum = 0
|
||||||
@ -53,7 +41,19 @@ module_function
|
|||||||
for d in data
|
for d in data
|
||||||
sum += d[2]
|
sum += d[2]
|
||||||
f.printf "%6.2f %8.2f %8.2f %8d ", d[2]/total*100, sum, d[2], d[0]
|
f.printf "%6.2f %8.2f %8.2f %8d ", d[2]/total*100, sum, d[2], d[0]
|
||||||
f.printf "%8.2f %8.2f %s\n", d[2]*1000/d[0], d[1]*1000/d[0], d[3]
|
f.printf "%8.2f %8.2f %s\n", d[2]*1000/d[0], d[1]*1000/d[0], get_name(*d[3])
|
||||||
end
|
end
|
||||||
|
f.printf "%6.2f %8.2f %8.2f %8d ", 0.0, total, 0.0, 1 # ???
|
||||||
|
f.printf "%8.2f %8.2f %s\n", 0.0, total*1000, "#toplevel" # ???
|
||||||
end
|
end
|
||||||
|
def get_name(klass, id)
|
||||||
|
name = klass.to_s || ""
|
||||||
|
if klass.kind_of? Class
|
||||||
|
name += "#"
|
||||||
|
else
|
||||||
|
name += "."
|
||||||
|
end
|
||||||
|
name + id.id2name
|
||||||
|
end
|
||||||
|
private :get_name
|
||||||
end
|
end
|
||||||
|
Loading…
x
Reference in New Issue
Block a user