Module Tk::Itcl
In: tk/lib/tkextlib/itcl/incr_tcl.rb

Methods

Included Modules

Tk

Classes and Modules

Class Tk::Itcl::ItclObject

Constants

LIBRARY = TkVarAccess.new('::itcl::library')
PURIST = TkVarAccess.new('::itcl::purist')
VERSION = TkCore::INTERP._invoke("set", "::itcl::version").freeze
PATCHLEVEL = TkCore::INTERP._invoke("set", "::itcl::patchLevel").freeze
PACKAGE_NAME = 'Itcl'.freeze

Public Class methods

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 105
    def self.body(klass, func, args, body)
      tk_call('::itcl::body', "#{klass}::#{func}", args, body)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 109
    def self.code(cmd, *args)
      tk_call('::itcl::code', cmd, *args)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 113
    def self.code_in_namespace(namespace, cmd, *args)
      tk_call('::itcl::code', '-namespace', namespace, cmd, *args)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 117
    def self.configbody(klass, var, body)
      tk_call('::itcl::configbody', "#{klass}::#{var}", body)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 121
    def self.create_itcl_class(name, body)
      TkCore::INTERP._invoke('::itcl::class', name, body)
      klass = Class.new(Tk::Itcl::ItclObject)
      klass.const_set('ITCL_CLASSNAME', name.dup.freeze)
      klass
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 160
    def self.create_local_obj(klass, name, *args)
      tk_call('::itcl::local', klass, name, *args)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 128
    def self.delete_itcl_class(*names)
      tk_call('::itcl::delete', 'class',  *names)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 132
    def self.delete_itcl_object(*names)
      tk_call('::itcl::delete', 'object',  *names)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 136
    def self.delete_namespace(*names)
      tk_call('::itcl::delete', 'namespace',  *names)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 140
    def self.ensemble(name, *args)
      tk_call('::itcl::ensemble', name, *args)
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 144
    def self.find_classes(pat=None)
      simplelist(tk_call('::itcl::find', 'classes', pat))
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 148
    def self.find_objects(*args)
      simplelist(tk_call('::itcl::find', 'objects', *args))
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 152
    def self.is_itcl_class(target)
      bool(tk_call('::itcl::is', 'class', target))
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 164
    def self.is_itcl_instance(klass, target)
      bool(tk_call('::itcl::is', 'object', '-class', klass, target))
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 156
    def self.is_itcl_object(target)
      bool(tk_call('::itcl::is', 'object', target))
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 26
    def self.package_name
      PACKAGE_NAME
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 30
    def self.package_version
      begin
        TkPackage.require('Itcl')
      rescue
        ''
      end
    end

[Source]

# File tk/lib/tkextlib/itcl/incr_tcl.rb, line 168
    def self.scope(var)
      tk_call('::itcl::scope', var)
    end

[Validate]