Gecko [ primetaxinc.net ]

Name	Size	Permission
cmd	[ DIR ]	drwxr-xr-x
ext	[ DIR ]	drwxr-xr-x
lc	[ DIR ]	drwxr-xr-x
completion.rb	4.85 KB	-rw-r--r--
context.rb	6.01 KB	-rw-r--r--
extend-command.rb	6.89 KB	-rw-r--r--
frame.rb	1.27 KB	-rw-r--r--
help.rb	582 B	-rw-r--r--
init.rb	5.83 KB	-rw-r--r--
input-method.rb	1.81 KB	-rw-r--r--
locale.rb	3.37 KB	-rw-r--r--
notifier.rb	2.71 KB	-rw-r--r--
output-method.rb	1.79 KB	-rw-r--r--
ruby-lex.rb	21.38 KB	-rw-r--r--
ruby-token.rb	7.43 KB	-rw-r--r--
slex.rb	6.07 KB	-rw-r--r--
version.rb	303 B	-rw-r--r--
workspace.rb	2.55 KB	-rw-r--r--
ws-for-case-2.rb	258 B	-rw-r--r--
xmp.rb	1.48 KB	-rw-r--r--

Name

Size

Permission

Action

cmd

[ DIR ]

drwxr-xr-x

ext

[ DIR ]

drwxr-xr-x

[ DIR ]

drwxr-xr-x

completion.rb

4.85 KB

-rw-r--r--

context.rb

6.01 KB

-rw-r--r--

extend-command.rb

6.89 KB

-rw-r--r--

frame.rb

1.27 KB

-rw-r--r--

help.rb

582 B

-rw-r--r--

init.rb

5.83 KB

-rw-r--r--

input-method.rb

1.81 KB

-rw-r--r--

locale.rb

3.37 KB

-rw-r--r--

notifier.rb

2.71 KB

-rw-r--r--

output-method.rb

1.79 KB

-rw-r--r--

ruby-lex.rb

21.38 KB

-rw-r--r--

ruby-token.rb

7.43 KB

-rw-r--r--

slex.rb

6.07 KB

-rw-r--r--

version.rb

303 B

-rw-r--r--

workspace.rb

2.55 KB

-rw-r--r--

ws-for-case-2.rb

258 B

-rw-r--r--

xmp.rb

1.48 KB

-rw-r--r--

Code Editor : frame.rb

#
#   frame.rb - 
#   	$Release Version: 0.9$
#   	$Revision: 11708 $
#   	$Date: 2007-02-13 08:01:19 +0900 (Tue, 13 Feb 2007) $
#   	by Keiju ISHITSUKA(Nihon Rational Software Co.,Ltd)
#
# --
#
#   
#

require "e2mmap"

module IRB
  class Frame
    extend Exception2MessageMapper
    def_exception :FrameOverflow, "frame overflow"
    def_exception :FrameUnderflow, "frame underflow"

INIT_STACK_TIMES = 3
    CALL_STACK_OFFSET = 3

def initialize
      @frames = [TOPLEVEL_BINDING] * INIT_STACK_TIMES
    end

def trace_func(event, file, line, id, binding)
      case event
      when 'call', 'class'
	@frames.push binding
      when 'return', 'end'
	@frames.pop
      end
    end

def top(n = 0)
      bind = @frames[-(n + CALL_STACK_OFFSET)]
      Fail FrameUnderflow unless bind
      bind
    end

def bottom(n = 0)
      bind = @frames[n]
      Fail FrameOverflow unless bind
      bind
    end

# singleton functions
    def Frame.bottom(n = 0)
      @backtrace.bottom(n)
    end

def Frame.top(n = 0)
      @backtrace.top(n)
    end

def Frame.sender
      eval "self", @backtrace.top
    end

@backtrace = Frame.new
    set_trace_func proc{|event, file, line, id, binding, klass|
      @backtrace.trace_func(event, file, line, id, binding)
    }
  end
end

${this.title}

Code Editor : frame.rb