Module TkCore::INTERP
In:

Methods

Public Class methods

[Source]

# File tk/lib/tk.rb, line 1078
    def INTERP.__getip
      self
    end

[Source]

# File tk/lib/tk.rb, line 1161
    def INTERP.add_tk_procs(name, args = nil, body = nil)
      @add_tk_procs << [name, args, body]
      self._invoke('proc', name, args, body) if args && body
    end

[Source]

# File tk/lib/tk.rb, line 1114
    def INTERP.cb_entry_class
      @cb_entry_class
    end

[Source]

# File tk/lib/tk.rb, line 1153
    def INTERP.cb_eval(cmd, *args)
      TkUtil._get_eval_string(TkUtil.eval_cmd(cmd, *args))
    end

[Source]

# File tk/lib/tk.rb, line 1136
    def INTERP.create_table
      id = @tk_table_list.size
      (tbl = {}).tainted? || tbl.taint
      @tk_table_list << tbl
#      obj = Object.new
#      obj.instance_eval <<-EOD
#        def self.method_missing(m, *args)
#         TkCore::INTERP.tk_object_table(#{id}).send(m, *args)
#        end
#      EOD
#      return obj
      Tk_OBJECT_TABLE.new(id)
    end

[Source]

# File tk/lib/tk.rb, line 1150
    def INTERP.get_cb_entry(cmd)
      @cb_entry_class.new(__getip, cmd).freeze
    end

[Source]

# File tk/lib/tk.rb, line 1157
    def INTERP.init_ip_env(script = Proc.new)
      @init_ip_env << script
      script.call(self)
    end

[Source]

# File tk/lib/tk.rb, line 1165
    def INTERP.init_ip_internal
      ip = self
      @init_ip_env.each{|script| script.call(ip)}
      @add_tk_procs.each{|name,args,body| ip._invoke('proc',name,args,body)}
    end

[Source]

# File tk/lib/tk.rb, line 1117
    def INTERP.tk_cmd_tbl
      @tk_cmd_tbl
    end

[Source]

# File tk/lib/tk.rb, line 1133
    def INTERP.tk_object_table(id)
      @tk_table_list[id]
    end

[Source]

# File tk/lib/tk.rb, line 1120
    def INTERP.tk_windows
      @tk_windows
    end

[Validate]