1 files changed, 0 insertions, 163 deletions
diff --git a/lib/tracer.rb b/lib/tracer.rb
deleted file mode 100644
index 78bada9a65..0000000000
--- a/lib/tracer.rb
+++ /dev/null
@@ -1,163 +0,0 @@
-#
-#   tracer.rb - 
-#   	$Release Version: 0.2$
-#   	$Revision: 1.8 $
-#   	$Date: 1998/05/19 03:42:49 $
-#   	by Keiju ISHITSUKA(Nippon Rational Inc.)
-#
-# --
-#
-#   
-#
-
-#
-# tracer main class
-#
-class Tracer
-  @RCS_ID='-$Id: tracer.rb,v 1.8 1998/05/19 03:42:49 keiju Exp keiju $-'
-
-  class << self
-    attr :verbose, true
-    alias verbose? verbose
-  end
-  verbose = true
-  
-  MY_FILE_NAME = caller(0)[0].scan(/^(.*):[0-9]+$/)[0][0]
-  
-  EVENT_SYMBOL = {
-    "line" => "-",
-    "call" => ">",
-    "return" => "<",
-    "class" => "C",
-    "end" => "E"}
-  
-  def initialize
-    @threads = Hash.new
-    if defined? Thread.main
-      @threads[Thread.main.id] = 0
-    else
-      @threads[Thread.current.id] = 0
-    end
-
-    @get_line_procs = {}
-
-    @filters = []
-  end
-  
-  def on
-    if block_given?
-      on
-      begin
-	yield
-      ensure
-	off
-      end
-    else
-      set_trace_func proc{|event, file, line, id, binding, klass|
-	trace_func event, file, line, id, binding
-      }
-      print "Trace on\n" if Tracer.verbose?
-    end
-  end
-  
-  def off
-    set_trace_func nil
-    print "Trace off\n" if Tracer.verbose?
-  end
-
-  def add_filter(p = proc)
-    @filters.push p
-  end
-
-  def set_get_line_procs(file, p = proc)
-    @get_line_procs[file] = p
-  end
-  
-  def get_line(file, line)
-    if p = @get_line_procs[file]
-      return p.call line
-    end
-
-    unless list = LINES__[file]
-#      print file if $DEBUG
-      begin
-	f = open(file)
-	begin 
-	  LINES__[file] = list = f.readlines
-	ensure
-	  f.close
-	end
-      rescue
-	LINES__[file] = list = []
-      end
-    end
-    if l = list[line - 1]
-      l
-    else
-      "-\n"
-    end
-  end
-  
-  def get_thread_no
-    if no = @threads[Thread.current.id]
-      no
-    else
-      @threads[Thread.current.id] = @threads.size
-    end
-  end
-  
-  def trace_func(event, file, line, id, binding)
-    return if file == MY_FILE_NAME
-    #printf "Th: %s\n", Thread.current.inspect
-    
-    for p in @filters
-      return unless p.call event, file, line, id, binding
-    end
-    
-    Thread.critical = true
-    printf("#%d:%s:%d:%s: %s",
-	   get_thread_no,
-	   file,
-	   line,
-	   EVENT_SYMBOL[event],
-	   get_line(file, line))
-    Thread.critical = false
-  end
-
-  Single = new
-  def Tracer.on
-    if block_given?
-      Single.on{yield}
-    else
-      Single.on
-    end
-  end
-  
-  def Tracer.off
-    Single.off
-  end
-  
-  def Tracer.set_get_line_procs(file_name, p = proc)
-    Single.set_get_line_procs(file_name, p)
-  end
-
-  def Tracer.add_filter(p = proc)
-    Single.add_filter(p)
-  end
-  
-end
-
-LINES__ = {} unless defined? LINES__
-
-if caller(0).size == 1
-  if $0 == Tracer::MY_FILE_NAME
-    # direct call
-    
-    $0 = ARGV[0]
-    ARGV.shift
-    Tracer.on
-    require $0
-  else
-    Tracer.on
-  end
-end