Class: TclTkIp

Inherits:
Object show all
Defined in:
lib/tk.rb,
ext/tk/tcltklib.c,
lib/tk.rb,
lib/tk.rb

Instance Attribute Summary collapse

Class Method Summary collapse

Instance Method Summary collapse

Constructor Details

#initialize(*args) ⇒ Object

initialize interpreter



6111
6112
6113
6114
6115
6116
6117
# File 'ext/tk/tcltklib.c', line 6111

def initialize(*args)
  __initialize__(*args)

  @force_default_encoding ||= [false]
  @encoding ||= [nil]
  def @encoding.to_s; self.join(nil); end
end

Instance Attribute Details

#encoding=(value) ⇒ Object

from tkencoding.rb by [email protected] attr_accessor :encoding



2763
2764
2765
2766
# File 'lib/tk.rb', line 2763

def encoding=(name)
  self.force_default_encoding = true  # for compatibility
  self.default_encoding = name
end

Class Method Details

.__new__Object



25
# File 'lib/multi-tk.rb', line 25

alias __new__ new

.new(*args) ⇒ Object



28
29
30
31
32
33
34
35
36
37
38
39
# File 'lib/multi-tk.rb', line 28

def new(*args)
  if Thread.current.group != ThreadGroup::Default
    raise SecurityError, 'only ThreadGroup::Default can call TclTkIp.new'
  end
  obj = __new__(*args)
  obj.instance_eval{
    @force_default_encoding ||= [false]
    @encoding ||= [nil]
    def @encoding.to_s; self.join(nil); end
  }
  obj
end

.to_sObject



36
# File 'lib/tk.rb', line 36

def @encoding.to_s; self.join(nil); end

Instance Method Details

#__eval__Object



19
# File 'lib/tk.rb', line 19

alias __eval__ _eval

#__fromUTF8Object



2783
2784
2785
# File 'lib/tk.rb', line 2783

static VALUE
ip_fromUTF8(argc, argv, self)
int   argc;

#__invoke__Object



21
# File 'lib/tk.rb', line 21

alias __invoke__ _invoke

#__toUTF8Object



2782
2783
2784
# File 'lib/tk.rb', line 2782

static VALUE
ip_toUTF8(argc, argv, self)
int   argc;

#_cancel_evalObject



7705
7706
7707
# File 'ext/tk/tcltklib.c', line 7705

static VALUE
ip_cancel_eval(argc, argv, self)
int   argc;

#_cancel_eval_unwindObject



7726
7727
7728
# File 'ext/tk/tcltklib.c', line 7726

static VALUE
ip_cancel_eval_unwind(argc, argv, self)
int   argc;

#_conv_listelementObject



9830
9831
9832
# File 'ext/tk/tcltklib.c', line 9830

static VALUE
lib_conv_listelement(self, src)
VALUE self;

#_create_consoleObject



6597
6598
6599
# File 'ext/tk/tcltklib.c', line 6597

static VALUE
ip_create_console(self)
VALUE self;

#_eval(cmd) ⇒ Object Also known as: _eval_with_enc, __eval



7501
7502
7503
# File 'ext/tk/tcltklib.c', line 7501

static VALUE
ip_eval(self, str)
VALUE self;

#_eval_without_encObject

backup original (without encoding) _eval and _invoke



18
# File 'lib/tk.rb', line 18

alias _eval_without_enc _eval

#_fromUTF8(str, encoding = nil) ⇒ Object



8220
8221
8222
# File 'ext/tk/tcltklib.c', line 8220

static VALUE
ip_fromUTF8(argc, argv, self)
int   argc;

#_get_global_varObject



9531
9532
9533
# File 'ext/tk/tcltklib.c', line 9531

static VALUE
ip_get_global_var(self, varname)
VALUE self;

#_get_global_var2Object



9540
9541
9542
# File 'ext/tk/tcltklib.c', line 9540

static VALUE
ip_get_global_var2(self, varname, index)
VALUE self;

#_get_variableObject




9308
9309
9310
# File 'ext/tk/tcltklib.c', line 9308

static VALUE
ip_get_variable(self, varname, flag)
VALUE self;

#_get_variable2Object



9282
9283
9284
# File 'ext/tk/tcltklib.c', line 9282

static VALUE
ip_get_variable2(self, varname, index, flag)
VALUE self;

#_immediate_invokeObject



9174
9175
9176
# File 'ext/tk/tcltklib.c', line 9174

static VALUE
ip_invoke_immediate(argc, argv, obj)
int argc;

#_invoke(*cmds) ⇒ Object Also known as: _invoke_with_enc, __invoke



9165
9166
9167
# File 'ext/tk/tcltklib.c', line 9165

static VALUE
ip_invoke(argc, argv, obj)
int argc;

#_invoke_without_encObject



20
# File 'lib/tk.rb', line 20

alias _invoke_without_enc _invoke

#_ip_id_Object



23
24
25
26
# File 'lib/tk.rb', line 23

def _ip_id_
  # for RemoteTkIp
  ''
end

#_make_menu_embeddableObject




10607
10608
10609
# File 'ext/tk/tcltklib.c', line 10607

static VALUE
ip_make_menu_embeddable(interp, menu_path)
VALUE interp;

#_merge_tklistObject



9735
9736
9737
# File 'ext/tk/tcltklib.c', line 9735

static VALUE
lib_merge_tklist(argc, argv, obj)
int argc;

#_return_valueObject

get return code from Tcl_Eval()



9148
9149
9150
# File 'ext/tk/tcltklib.c', line 9148

static VALUE
ip_retval(self)
VALUE self;

#_set_global_varObject



9550
9551
9552
# File 'ext/tk/tcltklib.c', line 9550

static VALUE
ip_set_global_var(self, varname, value)
VALUE self;

#_set_global_var2Object



9560
9561
9562
# File 'ext/tk/tcltklib.c', line 9560

static VALUE
ip_set_global_var2(self, varname, index, value)
VALUE self;

#_set_variableObject



9447
9448
9449
# File 'ext/tk/tcltklib.c', line 9447

static VALUE
ip_set_variable(self, varname, value, flag)
VALUE self;

#_set_variable2Object



9418
9419
9420
# File 'ext/tk/tcltklib.c', line 9418

static VALUE
ip_set_variable2(self, varname, index, value, flag)
VALUE self;

#_split_tklistObject




9727
9728
9729
# File 'ext/tk/tcltklib.c', line 9727

static VALUE
ip_split_tklist(self, list_str)
VALUE self;

#_thread_tkwaitObject



5458
5459
5460
# File 'ext/tk/tcltklib.c', line 5458

static VALUE
ip_thread_tkwait(self, mode, target)
VALUE self;

#_thread_vwaitObject



5444
5445
5446
# File 'ext/tk/tcltklib.c', line 5444

static VALUE
ip_thread_vwait(self, var)
VALUE self;

#_toUTF8(str, encoding = nil) ⇒ Object

without Encoding (Ruby 1.8)



8020
8021
8022
# File 'ext/tk/tcltklib.c', line 8020

static VALUE
ip_toUTF8(argc, argv, self)
int   argc;

#_unset_global_varObject



9571
9572
9573
# File 'ext/tk/tcltklib.c', line 9571

static VALUE
ip_unset_global_var(self, varname)
VALUE self;

#_unset_global_var2Object



9580
9581
9582
# File 'ext/tk/tcltklib.c', line 9580

static VALUE
ip_unset_global_var2(self, varname, index)
VALUE self;

#_unset_variableObject



9522
9523
9524
# File 'ext/tk/tcltklib.c', line 9522

static VALUE
ip_unset_variable(self, varname, flag)
VALUE self;

#_unset_variable2Object



9496
9497
9498
# File 'ext/tk/tcltklib.c', line 9496

static VALUE
ip_unset_variable2(self, varname, index, flag)
VALUE self;

#allow_ruby_exit=Object

allow_ruby_exit = mode



6703
6704
6705
# File 'ext/tk/tcltklib.c', line 6703

static VALUE
ip_allow_ruby_exit_set(self, val)
VALUE self, val;

#allow_ruby_exit?Boolean

allow_ruby_exit?

Returns:

  • (Boolean)


6684
6685
6686
# File 'ext/tk/tcltklib.c', line 6684

static VALUE
ip_allow_ruby_exit_p(self)
VALUE self;

#create_dummy_encoding_for_tkObject




9994
9995
9996
# File 'ext/tk/tcltklib.c', line 9994

static VALUE
create_dummy_encoding_for_tk(interp, name)
VALUE interp;

#create_slaveObject



6481
6482
6483
# File 'ext/tk/tcltklib.c', line 6481

static VALUE
ip_create_slave(argc, argv, self)
int   argc;

#default_encoding=(name) ⇒ Object



2756
2757
2758
2759
# File 'lib/tk.rb', line 2756

def default_encoding=(name)
  name = name.name if Tk::WITH_ENCODING && name.kind_of?(::Encoding)
  @encoding[0] = name.to_s.dup
end

#deleteObject

delete interpreter



6758
6759
6760
# File 'ext/tk/tcltklib.c', line 6758

static VALUE
ip_delete(self)
VALUE self;

#deleted?Boolean

Returns:

  • (Boolean)


6812
6813
6814
# File 'ext/tk/tcltklib.c', line 6812

static VALUE
ip_is_deleted_p(self)
VALUE self;

#do_one_eventObject



3084
3085
3086
# File 'ext/tk/tcltklib.c', line 3084

static VALUE
ip_do_one_event(argc, argv, self)
int   argc;

#encoding_nameObject Also known as: encoding, default_encoding



2768
2769
2770
# File 'lib/tk.rb', line 2768

def encoding_name
  (@encoding[0])? @encoding[0].dup: nil
end

#encoding_objObject



2774
2775
2776
2777
2778
2779
2780
# File 'lib/tk.rb', line 2774

def encoding_obj
  if Tk::WITH_ENCODING
    Tk::Encoding.tcl2rb_encoding(@encoding[0])
  else
    (@encoding[0])? @encoding[0].dup: nil
  end
end

#encoding_tableObject



10462
10463
10464
# File 'ext/tk/tcltklib.c', line 10462

static VALUE
ip_get_encoding_table(interp)
VALUE interp;

#force_default_encoding=(mode) ⇒ Object



2748
2749
2750
# File 'lib/tk.rb', line 2748

def force_default_encoding=(mode)
  @force_default_encoding[0] = (mode)? true: false
end

#force_default_encoding?Boolean

Returns:

  • (Boolean)


2752
2753
2754
# File 'lib/tk.rb', line 2752

def force_default_encoding?
  @force_default_encoding[0] ||= false
end

#get_eventloop_tickObject



1767
1768
1769
# File 'ext/tk/tcltklib.c', line 1767

static VALUE
ip_get_eventloop_tick(self)
VALUE self;

#get_eventloop_weightObject



1872
1873
1874
# File 'ext/tk/tcltklib.c', line 1872

static VALUE
ip_get_eventloop_weight(self)
VALUE self;

#get_no_event_waitObject



1818
1819
1820
# File 'ext/tk/tcltklib.c', line 1818

static VALUE
ip_get_no_event_wait(self)
VALUE self;

#has_mainwindow?Boolean

Returns:

  • (Boolean)


6842
6843
6844
# File 'ext/tk/tcltklib.c', line 6842

static VALUE
ip_has_mainwindow_p(self)
VALUE self;

#invalid_namespace?Boolean

is deleted?

Returns:

  • (Boolean)


6790
6791
6792
# File 'ext/tk/tcltklib.c', line 6790

static VALUE
ip_has_invalid_namespace_p(self)
VALUE self;

#mainloopObject




2763
2764
2765
# File 'ext/tk/tcltklib.c', line 2763

static VALUE
ip_mainloop(argc, argv, self)
int   argc;

#mainloop_abort_on_exceptionObject



1938
1939
1940
# File 'ext/tk/tcltklib.c', line 1938

static VALUE
ip_evloop_abort_on_exc(self)
VALUE self;

#mainloop_abort_on_exception=Object



1959
1960
1961
# File 'ext/tk/tcltklib.c', line 1959

static VALUE
ip_evloop_abort_on_exc_set(self, val)
VALUE self, val;

#mainloop_watchdogObject



2892
2893
2894
# File 'ext/tk/tcltklib.c', line 2892

static VALUE
ip_mainloop_watchdog(argc, argv, self)
int   argc;

#make_safeObject



6650
6651
6652
# File 'ext/tk/tcltklib.c', line 6650

static VALUE
ip_make_safe(self)
VALUE self;

#restartObject



7827
7828
7829
# File 'ext/tk/tcltklib.c', line 7827

static VALUE
ip_restart(self)
VALUE self;

#safe?Boolean

is safe?

Returns:

  • (Boolean)


6665
6666
6667
# File 'ext/tk/tcltklib.c', line 6665

static VALUE
ip_is_safe_p(self)
VALUE self;

#set_eventloop_tickObject



1748
1749
1750
# File 'ext/tk/tcltklib.c', line 1748

static VALUE
ip_set_eventloop_tick(self, tick)
VALUE self;

#set_eventloop_weightObject



1852
1853
1854
# File 'ext/tk/tcltklib.c', line 1852

static VALUE
ip_set_eventloop_weight(self, loop_max, no_event)
VALUE self;

#set_max_block_timeObject



1879
1880
1881
# File 'ext/tk/tcltklib.c', line 1879

static VALUE
set_max_block_time(self, time)
VALUE self;

#set_no_event_waitObject



1799
1800
1801
# File 'ext/tk/tcltklib.c', line 1799

static VALUE
ip_set_no_event_wait(self, wait)
VALUE self;

#slave_of?Boolean

self is slave of master?

Returns:

  • (Boolean)


6515
6516
6517
# File 'ext/tk/tcltklib.c', line 6515

static VALUE
ip_is_slave_of_p(self, master)
VALUE self, master;