?HAMA

Navigation

Breadcrumbs

Create

Edit File Size: 1.16 KB

/proc/thread-self/root/opt/alt/ruby18/lib64/ruby/1.8/irb/ext/tracer.rb

Text Base64

#
#   irb/lib/tracer.rb - 
#   	$Release Version: 0.9.5$
#   	$Revision: 11708 $
#   	$Date: 2007-02-13 08:01:19 +0900 (Tue, 13 Feb 2007) $
#   	by Keiju ISHITSUKA(keiju@ruby-lang.org)
#
# --
#
#   
#
require "tracer"

module IRB

# initialize tracing function
  def IRB.initialize_tracer
    Tracer.verbose = false
    Tracer.add_filter {
      |event, file, line, id, binding, *rests|
      /^#{Regexp.quote(@CONF[:IRB_LIB_PATH])}/ !~ file and
	File::basename(file) != "irb.rb"
    }
  end

class Context
    attr_reader :use_tracer
    alias use_tracer? use_tracer

def use_tracer=(opt)
      if opt
	Tracer.set_get_line_procs(@irb_path) {
	  |line_no, *rests|
	  @io.line(line_no)
	}
      elsif !opt && @use_tracer
	Tracer.off
      end
      @use_tracer=opt
    end
  end

class WorkSpace
    alias __evaluate__ evaluate
    def evaluate(context, statements, file = nil, line = nil)
      if context.use_tracer? && file != nil && line != nil
	Tracer.on 
	begin
	  __evaluate__(context, statements, file, line)
	ensure
	  Tracer.off
	end
      else
	__evaluate__(context, statements, file || __FILE__, line || __LINE__)
      end
    end
  end

IRB.initialize_tracer
end

Exit & Reset Text mode: syntax highlighting auto-detects file type.

Name	Size	Perms	Modified	Actions
change-ws.rb	1.14 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
history.rb	2.12 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
loader.rb	2.25 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
math-mode.rb	625 B	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
multi-irb.rb	4.75 KB	lrw-r--r--	2009-11-17 06:51:29	Edit Download recursive recursive
save-history.rb	2.12 KB	lrw-r--r--	2009-08-09 08:44:15	Edit Download recursive recursive
tracer.rb	1.16 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
use-loader.rb	1.33 KB	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive
workspaces.rb	978 B	lrw-r--r--	2007-02-12 23:01:19	Edit Download recursive recursive

Directory Contents