Ruby  1.9.3p551(2014-11-13revision48407)
Data Structures | Macros | Enumerations | Functions | Variables
tcltklib.c File Reference
#include "ruby.h"
#include "rubysig.h"
#include <stdio.h>
#include <varargs.h>
#include <string.h>
#include "missing.h"
#include <tcl.h>
#include <tk.h>
#include "stubs.h"

Go to the source code of this file.

Data Structures

struct  invoke_queue
 
struct  eval_queue
 
struct  call_queue
 
struct  cmd_body_arg
 
struct  tcltkip
 
struct  evloop_params
 
struct  thread_call_proc_arg
 
struct  th_update_param
 
struct  th_vwait_param
 
struct  invoke_info
 

Macros

#define TCLTKLIB_RELEASE_DATE   "2010-08-25"
 
#define RUBY_VERSION   "(unknown version)"
 
#define RUBY_RELEASE_DATE   "unknown release-date"
 
#define RSTRING_PTR(s)   (RSTRING(s)->ptr)
 
#define RSTRING_LEN(s)   (RSTRING(s)->len)
 
#define RARRAY_PTR(s)   (RARRAY(s)->ptr)
 
#define RARRAY_LEN(s)   (RARRAY(s)->len)
 
#define RbTk_OBJ_UNTRUST(x)   OBJ_TAINT(x)
 
#define va_init_list(a, b)   va_start(a)
 
#define ruby_native_thread_p()   is_ruby_native_thread()
 
#define rb_errinfo()   (ruby_errinfo+0) /* cannot be l-value */
 
#define rb_safe_level()   (ruby_safe_level+0)
 
#define rb_sourcefile()   (ruby_sourcefile+0)
 
#define TCL_ALPHA_RELEASE   0 /* "alpha" */
 
#define TCL_BETA_RELEASE   1 /* "beta" */
 
#define TCL_FINAL_RELEASE   2 /* "final" */
 
#define CONST
 
#define CONST84
 
#define CONST86   CONST84
 
#define TAG_RETURN   0x1
 
#define TAG_BREAK   0x2
 
#define TAG_NEXT   0x3
 
#define TAG_RETRY   0x4
 
#define TAG_REDO   0x5
 
#define TAG_RAISE   0x6
 
#define TAG_THROW   0x7
 
#define TAG_FATAL   0x8
 
#define DUMP1(ARG1)   if (ruby_debug) { fprintf(stderr, "tcltklib: %s\n", ARG1); fflush(stderr); }
 
#define DUMP2(ARG1, ARG2)
 
#define DUMP3(ARG1, ARG2, ARG3)
 
#define rb_hash_lookup   rb_hash_aref
 
#define Tcl_Eval   tcl_eval
 
#define Tcl_GlobalEval   tcl_global_eval
 
#define Tcl_IncrRefCount(obj)   (1)
 
#define Tcl_DecrRefCount(obj)   (1)
 
#define Tcl_GetStringResult(interp)   ((interp)->result)
 
#define CONTROL_BY_STATUS_OF_RB_THREAD_WAITING_FOR_VALUE   1
 
#define USE_TOGGLE_WINDOW_MODE_FOR_IDLE   0
 
#define DO_THREAD_SCHEDULE_AT_CALLBACK_DONE   0
 
#define DEFAULT_EVENT_LOOP_MAX   800/*counts*/
 
#define DEFAULT_NO_EVENT_TICK   10/*counts*/
 
#define DEFAULT_NO_EVENT_WAIT   20/*milliseconds ( 1 -- 999 ) */
 
#define WATCHDOG_INTERVAL   10/*milliseconds ( 1 -- 999 ) */
 
#define DEFAULT_TIMER_TICK   0/*milliseconds ( 0 -- 999 ) */
 
#define NO_THREAD_INTERRUPT_TIME   100/*milliseconds ( 1 -- 999 ) */
 
#define EVENT_HANDLER_TIMEOUT   100/*milliseconds*/
 
#define TCL_NAMESPACE_DEBUG   0
 
#define USE_RUBY_ALLOC   0
 
#define USE_EVLOOP_THREAD_ALONE_CHECK_FLAG   0
 
#define TRAP_CHECK()
 
#define EVLOOP_WAKEUP_CHANCE   3
 
#define SUPPORT_NESTED_CONST_AS_IP_RUBY_CMD_RECEIVER   1
 
#define TKWAIT_MODE_VISIBILITY   1
 
#define TKWAIT_MODE_DESTROY   2
 
#define TCL_CANCEL_UNWIND   0x100000
 
#define TK_WINDOWING_SYSTEM   "x11"
 
#define DEFAULT_EVENTLOOP_DEPTH   7
 

Enumerations

enum  updateOptions { REGEXP_IDLETASKS, REGEXP_IDLETASKS }
 
enum  updateOptions { REGEXP_IDLETASKS, REGEXP_IDLETASKS }
 
enum  options {
  TKWAIT_VARIABLE, TKWAIT_VISIBILITY, TKWAIT_WINDOW, TKWAIT_VARIABLE,
  TKWAIT_VISIBILITY, TKWAIT_WINDOW
}
 
enum  options {
  TKWAIT_VARIABLE, TKWAIT_VISIBILITY, TKWAIT_WINDOW, TKWAIT_VARIABLE,
  TKWAIT_VISIBILITY, TKWAIT_WINDOW
}
 

Functions

static void set_tcltk_version ()
 
static void ip_finalize _ ((Tcl_Interp *))
 
static VALUE
create_dummy_encoding_for_tk_core 
_ ((VALUE, VALUE, VALUE))
 
static VALUE
create_dummy_encoding_for_tk 
_ ((VALUE, VALUE))
 
static VALUE create_encoding_table _ ((VALUE))
 
static VALUE ip_invoke_real _ ((int, VALUE *, VALUE))
 
static VALUE
ip_invoke_with_position 
_ ((int, VALUE *, VALUE, Tcl_QueuePosition))
 
static VALUE tk_funcall _ ((VALUE(), int, VALUE *, VALUE))
 
 Tcl_AllowExceptions (interp)
 
 free (buf)
 
int matherr ()
 
void invoke_queue_mark (struct invoke_queue *q)
 
void eval_queue_mark (struct eval_queue *q)
 
void call_queue_mark (struct call_queue *q)
 
static int ip_ruby_eval _ ((ClientData, Tcl_Interp *, int, char **))
 
 Data_Get_Struct (self, struct tcltkip, ptr)
 
 if (ptr==0)
 
 if (ptr->ip==(Tcl_Interp *) NULL)
 
 return (ptr->ref_count)
 
 if (ptr->ref_count< 0)
 
 va_init_list (args, fmt)
 
 va_end (args)
 
 rb_ivar_set (einfo, ID_at_interp, interp)
 
static void tcl_stubs_check ()
 
 DUMP1 ("Tk_Init")
 
 if (ruby_tk_stubs_init(ptr->ip)!=TCLTK_STUBS_OK)
 
static int pending_exception_check0 ()
 
 if (!NIL_P(exc)&&rb_obj_is_kind_of(exc, rb_eException))
 
 DUMP1 ("original_exit is called")
 
 if (!ptr->has_orig_exit)
 
 DUMP1 ("complete original_exit")
 
static void _timer_for_tcl _ ((ClientData))
 
 DUMP1 ("call _timer_for_tcl")
 
 Tcl_DeleteTimerHandler (timer_token)
 
 if (timer_tick > 0)
 
 if (RTEST(mode))
 
 rb_secure (4)
 
 if (deleted_ip(ptr))
 
 if (Tcl_GetMaster(ptr->ip)!=(Tcl_Interp *) NULL)
 
return set_eventloop_tick (self, tick)
 
 if (t_wait<=0)
 
return set_no_event_wait (self, wait)
 
 if (lpmax<=0||no_ev<=0)
 
return rb_ary_new3 (2, loop_max, no_event)
 
return set_eventloop_weight (self, loop_max, no_event)
 
 switch (TYPE(time))
 
 if (RTEST(val))
 
else if (NIL_P(val))
 
return lib_evloop_abort_on_exc (self)
 
return lib_evloop_abort_on_exc_set (self, val)
 
void rbtk_EventSetupProc (ClientData clientData, int flag)
 
void rbtk_EventCheckProc (ClientData clientData, int flag)
 
 if (Tcl_DoOneEvent(flag))
 
 if (no_event_wait<=0)
 
 DUMP2 ("eventloop_sleep: rb_thread_wait_for() at thread : %lx", rb_thread_current())
 
 rb_thread_wait_for (t)
 
 DUMP2 ("eventloop_sleep: finish at thread : %lx", rb_thread_current())
 
static int trap_check (int *check_var)
 
static int check_eventloop_interp ()
 
 if (update_flag)
 
 for (;;)
 
 Tcl_CreateEventSource (rbtk_EventSetupProc, rbtk_EventCheckProc,(ClientData) args)
 
 if (lib_eventloop_core(params->check_root, params->update_flag, params->check_var, params->interp))
 
 Tcl_DeleteEventSource (rbtk_EventSetupProc, rbtk_EventCheckProc,(ClientData) args)
 
 DUMP2 ("eventloop_ensure: current-thread : %lx", current_evloop)
 
 DUMP2 ("eventloop_ensure: eventloop-thread : %lx", eventloop_thread)
 
 if (eventloop_thread!=current_evloop)
 
 while ((eventloop_thread=rb_ary_pop(eventloop_stack)))
 
 xfree (ptr)
 
 DUMP2 ("finish current eventloop %lx", current_evloop)
 
 if (parent_evloop==eventloop_thread)
 
 if (!NIL_P(parent_evloop)&&parent_evloop!=eventloop_thread)
 
 rb_ary_push (eventloop_stack, parent_evloop)
 
 DUMP3 ("tcltklib: eventloop-thread : %lx -> %lx\n", parent_evloop, eventloop_thread)
 
return rb_ensure (lib_eventloop_main_core,(VALUE) args, lib_eventloop_ensure,(VALUE) args)
 
 if (rb_scan_args(argc, argv,"01",&check_rootwidget)==0)
 
else if (RTEST(check_rootwidget))
 
return lib_eventloop_launcher (RTEST(check_rootwidget), 0,(int *) NULL,(Tcl_Interp *) NULL)
 
 if (!NIL_P(watchdog_thread))
 
return rb_ensure (lib_watchdog_core, check_rootwidget, lib_watchdog_ensure, Qnil)
 
return lib_mainloop_watchdog (argc, argv, self)
 
void _thread_call_proc_arg_mark (struct thread_call_proc_arg *q)
 
return rb_funcall (q->proc, ID_call, 0)
 
return rb_ensure (_thread_call_proc_core,(VALUE) q, _thread_call_proc_ensure,(VALUE) q)
 
 if (rb_scan_args(argc, argv,"01",&proc)==0)
 
 rb_thread_schedule ()
 
 if (RTEST(rb_thread_alive_p(th)))
 
 xfree (q->done)
 
 xfree (q)
 
 if (NIL_P(rbtk_pending_exception))
 
 rb_exc_raise (exc)
 
 if (!NIL_P(eventloop_thread))
 
 if (rb_scan_args(argc, argv,"01",&vflags)==0)
 
 if (rb_safe_level() >=4||(rb_safe_level() >=1 &&OBJ_TAINTED(vflags)))
 
 if (is_ip)
 
 if (pending_exception_check0())
 
 if (found_event)
 
 StringValue (msg)
 
 Tcl_AppendResult (interp, RSTRING_PTR(msg),(char *) NULL)
 
static int tcl_protect_core (Tcl_Interp *interp, VALUE(*proc)(), VALUE data)
 
 while (0)
 
 if (interp==(Tcl_Interp *) NULL)
 
 if (argc!=2)
 
 DUMP2 ("rb_eval_string(%s)", arg)
 
 DUMP1 ("call ip_ruby_cmd_core")
 
 DUMP2 ("rb_apply return:%lx", ret)
 
 DUMP1 ("finish ip_ruby_cmd_core")
 
 if (state)
 
 if (str[0]== ':'||('A'<=str[0]&&str[0]<= 'Z'))
 
 memcpy (buf+1, str, len)
 
 xfree (buf)
 
 DUMP2 ("receiver:%s", str)
 
 if (NIL_P(receiver))
 
 for (i=3;i< argc;i++)
 
 if (old_gc==Qfalse)
 
 DUMP1 ("start ip_RubyExitCommand")
 
 if (argc< 1||argc > 2)
 
 switch (argc)
 
static int ip_rbUpdateCommand _ ((ClientData, Tcl_Interp *, int, char *[]))
 
 DUMP1 ("Ruby's 'update' is called")
 
 Tcl_ResetResult (interp)
 
 if (objc==1)
 
 Tcl_Preserve (interp)
 
 if (!NIL_P(rbtk_pending_exception))
 
 if (rb_trap_pending)
 
 DUMP2 ("last result '%s'", Tcl_GetStringResult(interp))
 
 Tcl_Release (interp)
 
 DUMP1 ("finish Ruby's 'update'")
 
 DUMP1 ("threadUpdateProc is called")
 
 rb_thread_wakeup (param->thread)
 
 DUMP1 ("Ruby's 'thread_update' is called")
 
 NIL_P (eventloop_thread)
 
 DUMP1 ("start Ruby's 'thread_update' body")
 
 DUMP1 ("pass argument check")
 
 DUMP1 ("set idle proc")
 
 Tcl_DoWhenIdle (rb_threadUpdateProc,(ClientData) param)
 
 while (!param->done)
 
 ckfree ((char *) param)
 
 DUMP1 ("finish Ruby's 'thread_update'")
 
static char *VwaitVarProc _ ((ClientData, Tcl_Interp *, char *, char *, int))
 
 return (char *)
 
static void WaitWindowProc _ ((ClientData, XEvent *))
 
 if (eventPtr->type==DestroyNotify)
 
 DUMP1 ("Ruby's 'tkwait' is called")
 
 if (objc!=3)
 
 if ((c== 'v')&&(strncmp(objv[1],"variable", length)==0)&&(length >=2))
 
else if ((c== 'v')&&(strncmp(objv[1],"visibility", length)==0)&&(length >=2))
 
else if ((c== 'w')&&(strncmp(objv[1],"window", length)==0))
 
 switch ((enum options) index)
 
 if (flags &(TCL_INTERP_DESTROYED|TCL_TRACE_DESTROYED))
 
 if (param->done!=0)
 
 DUMP1 ("Ruby's 'thread_tkwait' is called")
 
 if (rb_thread_alone()||eventloop_thread==current_thread)
 
 Tcl_Preserve (tkwin)
 
 Tcl_Release (tkwin)
 
 Tcl_Preserve ((ClientData) param)
 
 Tcl_Release ((ClientData) param)
 
return ip_invoke_with_position (2, argv, self, TCL_QUEUE_TAIL)
 
return ip_invoke_with_position (3, argv, self, TCL_QUEUE_TAIL)
 
 DUMP1 ("delete slaves")
 
 if (!Tcl_InterpDeleted(ip)&&Tcl_Eval(ip,"interp slaves")==TCL_OK)
 
 DUMP1 ("start ip_finalize")
 
 if (ip==(Tcl_Interp *) NULL)
 
 if (Tcl_InterpDeleted(ip))
 
 Tcl_Preserve (ip)
 
 delete_slaves (ip)
 
 if (at_exit)
 
 DUMP1 ("check `destroy'")
 
 if (Tcl_GetCommandInfo(ip,"destroy",&info))
 
 DUMP1 ("destroy root widget")
 
 if (tk_stubs_init_p()&&Tk_MainWindow(ip)!=(Tk_Window) NULL)
 
 DUMP1 ("check `finalize-hook-proc'")
 
 if (Tcl_GetCommandInfo(ip, finalize_hook_name,&info))
 
 DUMP1 ("check `foreach' & `after'")
 
&& Tcl_GetCommandInfo (ip,"after",&info))
 
 Tcl_Release (ip)
 
 DUMP1 ("finish ip_finalize")
 
 DUMP2 ("free Tcl Interp %lx",(unsigned long) ptr->ip)
 
 DUMP1 ("complete freeing Tcl Interp")
 
 Tcl_CreateCommand (interp,"vwait", ip_rbVwaitCommand,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"tkwait\")")
 
 Tcl_CreateCommand (interp,"tkwait", ip_rbTkWaitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"thread_vwait\")")
 
 Tcl_CreateCommand (interp,"thread_vwait", ip_rb_threadVwaitCommand,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"thread_tkwait\")")
 
 Tcl_CreateCommand (interp,"thread_tkwait", ip_rb_threadTkWaitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"update\")")
 
 Tcl_CreateCommand (interp,"update", ip_rbUpdateCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"thread_update\")")
 
 Tcl_CreateCommand (interp,"thread_update", ip_rb_threadUpdateCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 if (slave==NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"exit\") --> \"interp_exit\"")
 
 Tcl_CreateCommand (slave,"exit", ip_InterpExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 ip_replace_wait_commands (slave, mainWin)
 
 DUMP1 ("start ip_CallWhenDeleted")
 
 ip_finalize (ip)
 
 DUMP1 ("finish ip_CallWhenDeleted")
 
 if (rb_safe_level() >=4)
 
 DATA_PTR (self)
 
 DUMP1 ("Tcl_CreateInterp")
 
 rbtk_preserve_ip (ptr)
 
 DUMP2 ("IP ref_count = %d", ptr->ref_count)
 
 Tcl_Eval (ptr->ip,"set argc 0; set argv {}; set argv0 tcltklib.so")
 
 switch (cnt)
 
 DUMP1 ("Tcl_Init")
 
 if (Tcl_Init(ptr->ip)==TCL_ERROR)
 
 if (with_tk)
 
 DUMP1 ("Tcl_CreateCommand(\"ruby\")")
 
 Tcl_CreateCommand (ptr->ip,"ruby", ip_ruby_eval,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"ruby_eval\")")
 
 Tcl_CreateCommand (ptr->ip,"ruby_eval", ip_ruby_eval,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"ruby_cmd\")")
 
 Tcl_CreateCommand (ptr->ip,"ruby_cmd", ip_ruby_cmd,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"interp_exit\")")
 
 Tcl_CreateCommand (ptr->ip,"interp_exit", ip_InterpExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"ruby_exit\")")
 
 Tcl_CreateCommand (ptr->ip,"ruby_exit", ip_RubyExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 DUMP1 ("Tcl_CreateCommand(\"exit\") --> \"ruby_exit\"")
 
 Tcl_CreateCommand (ptr->ip,"exit", ip_RubyExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 ip_replace_wait_commands (ptr->ip, mainWin)
 
 ip_wrap_namespace_command (ptr->ip)
 
 Tcl_CreateCommand (ptr->ip,"__replace_slave_tk_commands__", ip_rb_replaceSlaveTkCmdsCommand,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 Tcl_CallWhenDeleted (ptr->ip, ip_CallWhenDeleted,(ClientData) mainWin)
 
 if (mainWin!=(Tk_Window) NULL)
 
 if (deleted_ip(master))
 
 if (Tcl_IsSafe(master->ip)==1)
 
else if (safemode==Qfalse||NIL_P(safemode))
 
 if (slave->ip==NULL)
 
 rbtk_preserve_ip (slave)
 
 Tcl_CreateCommand (slave->ip,"exit", ip_InterpExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
 ip_replace_wait_commands (slave->ip, mainWin)
 
 ip_wrap_namespace_command (slave->ip)
 
 Tcl_CreateCommand (slave->ip,"__replace_slave_tk_commands__", ip_rb_replaceSlaveTkCmdsCommand,(ClientData) NULL,(Tcl_CmdDeleteProc *) NULL)
 
 Tcl_CallWhenDeleted (slave->ip, ip_CallWhenDeleted,(ClientData) mainWin)
 
return Data_Wrap_Struct (CLASS_OF(interp), 0, ip_free, slave)
 
 if (rb_scan_args(argc, argv,"11",&name,&safemode)==1)
 
 if (Tcl_IsSafe(master->ip)!=1 &&(safemode==Qfalse||NIL_P(safemode)))
 
 StringValue (name)
 
return tk_funcall (ip_create_slave_core, 2, callargv, self)
 
 if (!tk_stubs_init_p())
 
 if (Tcl_GetVar(ptr->ip,"tcl_interactive", TCL_GLOBAL_ONLY)==(char *) NULL)
 
 rb_notimplement ()
 
return tk_funcall (ip_create_console_core, 0,(VALUE *) NULL, self)
 
 if (Tcl_MakeSafe(ptr->ip)==TCL_ERROR)
 
 Tcl_CreateCommand (ptr->ip,"exit", ip_InterpExitCommand,(ClientData) mainWin,(Tcl_CmdDeleteProc *) NULL)
 
return tk_funcall (ip_make_safe_core, 0,(VALUE *) NULL, self)
 
 if (Tcl_IsSafe(ptr->ip))
 
 DUMP1 ("delete interp")
 
 if (!Tcl_InterpDeleted(ptr->ip))
 
 if (deleted_ip(ptr)||!tk_stubs_init_p())
 
else if (Tk_MainWindow(ptr->ip)==(Tk_Window) NULL)
 
 Data_Get_Struct (callq, struct call_queue, q)
 
 rb_set_safe_level (q->safe_level)
 
 return ((q->func)(q->interp, q->argc, q->argv))
 
static int call_queue_handler _ ((Tcl_Event *, int))
 
 DUMP2 ("call_queue_handler thread : %lx", rb_thread_current())
 
 DUMP2 ("added by thread : %lx", thread)
 
&& !RTEST (rb_funcall(thread, ID_stop_p, 0)))
 
 if (rb_safe_level()!=q->safe_level)
 
 DUMP2 ("call function (current thread:%lx)", rb_thread_current())
 
 RARRAY_PTR (q->result)[0] = ret
 
 if (RTEST(rb_thread_alive_p(thread)))
 
 DUMP2 (" (current thread:%lx)", rb_thread_current())
 
 if (!NIL_P(ip_obj)&&rb_obj_is_kind_of(ip_obj, tcltkip_class))
 
 if (is_tk_evloop_thread &&(NIL_P(eventloop_thread)||current==eventloop_thread))
 
 DUMP2 ("tk_funcall from thread %lx (NOT current eventloop)", current)
 
 if (argv)
 
 DUMP1 ("add handler")
 
 Tcl_QueueEvent ((Tcl_Event *) callq, TCL_QUEUE_HEAD)
 
 DUMP2 ("callq wait for handler (current thread:%lx)", current)
 
 DUMP2 ("*** callq wakeup (current thread:%lx)", current)
 
 DUMP2 ("*** (eventloop thread:%lx)", eventloop_thread)
 
 if (NIL_P(eventloop_thread))
 
 DUMP2 ("back from handler (current thread:%lx)", current)
 
 if (rb_obj_is_kind_of(ret, rb_eException))
 
 DUMP1 ("exit tk_funcall")
 
 DUMP2 ("Tcl_Eval(%s)", cmd_str)
 
 if (pending_exception_check1(thr_crit_bup, ptr))
 
 if (ptr->return_value!=TCL_OK)
 
 DUMP2 ("(TCL_Eval result) %d", ptr->return_value)
 
 rbtk_release_ip (ptr)
 
 Data_Get_Struct (evq, struct eval_queue, q)
 
return ip_eval_real (q->interp, q->str, q->len)
 
 DUMP2 ("eval_queue_thread : %lx", rb_thread_current())
 
 StringValue (str)
 
 DUMP2 ("status: Tcl_GetCurrentThread %p", Tcl_GetCurrentThread())
 
 DUMP2 ("status: eventloopt_thread %lx", eventloop_thread)
 
 if ((NIL_P(eventloop_thread)||current==eventloop_thread))
 
 DUMP2 ("eval from thread %lx (NOT current eventloop)", current)
 
 memcpy (eval_str, RSTRING_PTR(str), RSTRING_LEN(str))
 
 Tcl_QueueEvent ((Tcl_Event *) evq, position)
 
 DUMP2 ("evq wait for handler (current thread:%lx)", current)
 
 DUMP2 ("*** evq wakeup (current thread:%lx)", current)
 
 ckfree (eval_str)
 
 if (rb_scan_args(argc, argv,"01",&retval)==0)
 
 if (ip_cancel_eval_core(get_ip(self) ->ip, retval, 0)==TCL_OK)
 
 if (ip_cancel_eval_core(get_ip(self) ->ip, retval, flag)==TCL_OK)
 
 Tcl_ResetResult (ptr->ip)
 
 if (!NIL_P(exc))
 
return tk_funcall (lib_restart_core, 0,(VALUE *) NULL, self)
 
return lib_restart (self)
 
 if (NIL_P(src))
 
 if (rb_scan_args(argc, argv,"11",&str,&encodename)==1)
 
return lib_toUTF8_core (Qnil, str, encodename)
 
return lib_toUTF8_core (self, str, encodename)
 
return lib_fromUTF8_core (Qnil, str, encodename)
 
return lib_fromUTF8_core (self, str, encodename)
 
 Tcl_ResetResult (inf->ptr->ip)
 
 DUMP2 ("call Tcl_GetCommandInfo, %s", cmd)
 
 if (!Tcl_GetCommandInfo(ptr->ip, cmd,&info))
 
 DUMP1 ("end Tcl_GetCommandInfo")
 
 switch (status)
 
 if (unknown_flag)
 
return ip_get_result_string_obj (ptr->ip)
 
 DUMP2 ("invoke_real called by thread:%lx", rb_thread_current())
 
 free_invoke_arguments (argc, av)
 
 Data_Get_Struct (ivq, struct invoke_queue, q)
 
return ip_invoke_core (q->interp, q->argc, q->argv)
 
 DUMP2 ("invoke queue_thread : %lx", rb_thread_current())
 
 DUMP2 ("call invoke_real (current thread:%lx)", rb_thread_current())
 
 DUMP2 ("invoke from thread %lx (NOT current eventloop)", current)
 
 DUMP2 ("ivq wait for handler (current thread:%lx)", current)
 
 DUMP2 ("*** ivq wakeup (current thread:%lx)", current)
 
 DUMP1 ("exit ip_invoke")
 
 return (INT2FIX(ptr->return_value))
 
return ip_invoke_with_position (argc, argv, obj, TCL_QUEUE_HEAD)
 
 if (ret==(char *) NULL)
 
 return (strval)
 
 StringValue (varname)
 
 if (!NIL_P(index)) StringValue(index)
 
 if (NIL_P(retval))
 
 StringValue (value)
 
 if (NIL_P(ip_obj))
 
else if (get_ip(ip_obj)==(struct tcltkip *) NULL)
 
 StringValue (list_str)
 
 if (Tcl_SplitList(interp, RSTRING_PTR(list_str),&argc,&argv)==TCL_ERROR)
 
 if (taint_flag)
 
 if (num< argc==0)
 
 if (dst==result)
 
return rb_ary_new3 (4, INT2NUM(tcltk_version.major), INT2NUM(tcltk_version.minor), INT2NUM(tcltk_version.type), INT2NUM(tcltk_version.patchlevel))
 
 switch (tcltk_version.type)
 
static VALUE tcltklib_compile_info ()
 
 rb_ivar_set (interp, ID_encoding_table, table)
 
 if (NIL_P(table))
 
return tk_funcall (ip_make_menu_embeddable_core, 1, argv, interp)
 
void Init_tcltklib ()
 

Variables

struct {
   int   major
 
   int   minor
 
   int   type
 
   int   patchlevel
 
tcltk_version = {0, 0, 0, 0}
 
static const char tcltklib_release_date [] = TCLTKLIB_RELEASE_DATE
 
static const char finalize_hook_name [] = "INTERP_FINALIZE_HOOK"
 
static int at_exit = 0
 
static VALUE ENCODING_NAME_UTF8
 
static VALUE ENCODING_NAME_BINARY
 
static VALUE eTkCallbackReturn
 
static VALUE eTkCallbackBreak
 
static VALUE eTkCallbackContinue
 
static VALUE eLocalJumpError
 
static VALUE eTkLocalJumpError
 
static VALUE eTkCallbackRetry
 
static VALUE eTkCallbackRedo
 
static VALUE eTkCallbackThrow
 
static VALUE tcltkip_class
 
static ID ID_at_enc
 
static ID ID_at_interp
 
static ID ID_encoding_name
 
static ID ID_encoding_table
 
static ID ID_stop_p
 
static ID ID_alive_p
 
static ID ID_kill
 
static ID ID_join
 
static ID ID_value
 
static ID ID_call
 
static ID ID_backtrace
 
static ID ID_message
 
static ID ID_at_reason
 
static ID ID_return
 
static ID ID_break
 
static ID ID_next
 
static ID ID_to_s
 
static ID ID_inspect
 
static int Tcl_Interp * interp = interp
 
const char * cmd
 
int ret
 
inttclDummyMathPtr = (int *) matherr
 
static VALUE eventloop_thread = rb_thread_current()
 
static Tcl_Interp * eventloop_interp = ptr->ip
 
static VALUE eventloop_stack
 
static int window_event_mode = ~0
 
static VALUE watchdog_thread = rb_thread_current()
 
Tcl_Interp * current_interp = ptr->ip
 
static int have_rb_thread_waiting_for_value = 0
 
static int event_loop_max = DEFAULT_EVENT_LOOP_MAX
 
static int no_event_tick = DEFAULT_NO_EVENT_TICK
 
static int no_event_wait = DEFAULT_NO_EVENT_WAIT
 
static int timer_tick = DEFAULT_TIMER_TICK
 
static int req_timer_tick = DEFAULT_TIMER_TICK
 
static int run_timer_flag = 0
 
static int event_loop_wait_event = 0
 
static int event_loop_abort_on_exc = 1
 
static int loop_counter = 0
 
static int check_rootwidget_flag = 0
 
static struct tcltkip *VALUE self
 
return ptr
 
 else
 
const char * fmt
 
 va_dcl
 
VALUE msg = rb_vsprintf(fmt, args)
 
VALUE einfo = rb_exc_new3(exc, msg)
 
return Qnil
 
static VALUE rbtk_pending_exception = Qnil
 
static int rbtk_eventloop_depth = 0
 
static int rbtk_internal_eventloop_handler = 0
 
static int int thr_crit_bup = rb_thread_critical
 
int state
 
Tcl_CmdInfo * info
 
 rb_thread_critical = thr_crit_bup
 
static Tcl_TimerToken timer_token = (Tcl_TimerToken)NULL
 
static void ClientData clientData
 
VALUE mode
 
VALUE tick
 
VALUE wait
 
VALUE loop_max
 
VALUE no_event
 
int no_ev = NUM2INT(no_event)
 
VALUE time
 
VALUE divmod
 
Tcl_SetMaxBlockTime & tcl_time
 
static VALUE VALUE val
 
int argc
 
VALUEargv = cmd_str
 
static VALUE VALUE flag_val
 
 flag = FIX2INT(flag_val)
 
static VALUE VALUE dummy
 
t tv_sec = 0
 
t tv_usec = (long)(no_event_wait*1000.0)
 
static int int check_root = check_root
 
int update_flag = update_flag
 
intcheck_var = check_var
 
int found_event = 1
 
int event_flag
 
struct timeval t
 
int status
 
int depth = rbtk_eventloop_depth
 
 return
 
VALUE VALUE args
 
volatile VALUE current_evloop = rb_thread_current()
 
static VALUE VALUE check_rootwidget
 
int prev_val = -1
 
int chance = 0
 
int check = RTEST(check_rootwidget)
 
struct timeval t0 t1
 
 do
 
VALUE VALUE arg = argv[1]
 
*q done = 1
 
static VALUE VALUE th = rb_thread_create(_thread_call_proc, (void*)q)
 
VALUE proc
 
int foundEvent
 
 q = (struct thread_call_proc_arg *)ALLOC(struct thread_call_proc_arg)
 
int is_ip
 
int flags
 
VALUE exc = tcltkip_init_tk(interp)
 
Tcl_DString dstr
 
static VALUE VALUE obj
 
VALUE data
 
 rb_trap_immediate = 0
 
 code = tcl_protect_core(interp, proc, data)
 
static VALUE char * name = argv[0]
 
 klass = rb_eval_string_protect(name, &state)
 
static VALUE char * str = argv[1]
 
int len = strlen(str)
 
 buf = ALLOC_N(char, len + 2)
 
 receiver = rb_gv_get(buf)
 
volatile ID method
 
int i
 
VALUE old_gc = rb_gc_disable()
 
char * param = (struct th_update_param *)ckalloc(sizeof(struct th_update_param))
 
char * endptr
 
int objc
 
char * objv []
 
static CONST char * updateOptions [] = {"idletasks", (char *) NULL}
 
return TCL_ERROR
 
return TCL_OK
 
volatile VALUE current_thread = rb_thread_current()
 
param thread = current_thread
 
char * name1
 
char * name2
 
donePtr = 1
 
XEvent * eventPtr
 
Tk_Window window
 
int index = argv[1]
 
static CONST char * optionStrings []
 
char * nameString = objv[2]
 
size_t length = strlen(objv[1])
 
Tk_Window tkwin = (Tk_Window) clientData
 
VALUE var
 
volatile VALUE cmd_str = rb_str_new2("thread_vwait")
 
VALUE target
 
static void Tcl_Interp * ip
 
Tcl_Interp * slave
 
char * slave_list
 
char * slave_name = objv[1]
 
VALUE rb_debug_bup = ruby_debug
 
VALUE rb_verbose_bup = ruby_verbose
 
 ruby_debug = rb_debug_bup
 
 ruby_verbose = rb_verbose_bup
 
Tk_Window mainWin = Tk_MainWindow(slave)
 
VALUE argv0
 
VALUE opts
 
int cnt = rb_scan_args(argc, argv, "02", &argv0, &opts)
 
int st = ruby_tcl_stubs_init()
 
int with_tk = 1
 
ptr ref_count = 0
 
ptr allow_ruby_exit = 1
 
ptr return_value = 0
 
ptr has_orig_exit = Tcl_GetCommandInfo(ptr->ip, "exit", &(ptr->orig_exit_info))
 
VALUE safemode = argv[1]
 
int safe
 
VALUE callargv [2] = name
 
static VALUE VALUE master
 
return Qfalse
 
VALUE callq = (struct call_queue *)ckalloc(sizeof(struct call_queue))
 
static int Tcl_Event * evPtr
 
volatile VALUE q_dat
 
q result = (VALUE)NULL
 
static VALUE VALUE(* func )() = func
 
intalloc_done = (int*)ckalloc(sizeof(int))
 
int is_tk_evloop_thread = 1
 
volatile VALUE current = rb_thread_current()
 
volatile VALUE ip_obj = obj
 
callq safe_level = rb_safe_level()
 
int cmd_len
 
VALUE evq = (struct eval_queue *)ckalloc(sizeof(struct eval_queue))
 
char * eval_str
 
Tcl_QueuePosition position = TCL_QUEUE_TAIL
 
VALUE retval
 
VALUE src
 
VALUE encodename
 
int all_bs
 
VALUE enc_name
 
int unknown_flag = 0
 
struct invoke_info inf
 
inf cmdinfo = info
 
char ** av = (char**)ckalloc(sizeof(char *) * (argc+1))
 
 v = ip_invoke_core(interp, argc, av)
 
VALUE ivq = (struct invoke_queue *)ckalloc(sizeof(struct invoke_queue))
 
volatile VALUE varname = argv[0]
 
volatile VALUE strval
 
volatile VALUE value = argv[2]
 
return Qtrue
 
VALUE list_str
 
volatile VALUE ary
 
volatile VALUE elem
 
int idx
 
int taint_flag = OBJ_TAINTED(list_str)
 
intflagPtr
 
char * dst = result
 
VALUE error_mode
 
static VALUE VALUE table
 
VALUE enc
 
VALUE menu_path
 

Macro Definition Documentation

#define CONST

Definition at line 138 of file tcltklib.c.

#define CONST84

Definition at line 139 of file tcltklib.c.

#define CONST86   CONST84

Definition at line 147 of file tcltklib.c.

#define CONTROL_BY_STATUS_OF_RB_THREAD_WAITING_FOR_VALUE   1

Definition at line 489 of file tcltklib.c.

#define DEFAULT_EVENT_LOOP_MAX   800/*counts*/

Definition at line 513 of file tcltklib.c.

#define DEFAULT_EVENTLOOP_DEPTH   7

Referenced by Init_tcltklib().

#define DEFAULT_NO_EVENT_TICK   10/*counts*/

Definition at line 514 of file tcltklib.c.

#define DEFAULT_NO_EVENT_WAIT   20/*milliseconds ( 1 -- 999 ) */

Definition at line 515 of file tcltklib.c.

#define DEFAULT_TIMER_TICK   0/*milliseconds ( 0 -- 999 ) */

Definition at line 517 of file tcltklib.c.

#define DO_THREAD_SCHEDULE_AT_CALLBACK_DONE   0

Definition at line 491 of file tcltklib.c.

#define DUMP1 (   ARG1)    if (ruby_debug) { fprintf(stderr, "tcltklib: %s\n", ARG1); fflush(stderr); }
#define DUMP2 (   ARG1,
  ARG2 
)
Value:
if (ruby_debug) { fprintf(stderr, "tcltklib: ");\
fprintf(stderr, ARG1, ARG2); fprintf(stderr, "\n"); fflush(stderr); }
ruby_debug
Definition: tcltklib.c:5806

Definition at line 163 of file tcltklib.c.

Referenced by check_eventloop_interp(), for(), if(), tcl_protect_core(), and while().

#define DUMP3 (   ARG1,
  ARG2,
  ARG3 
)
Value:
if (ruby_debug) { fprintf(stderr, "tcltklib: ");\
fprintf(stderr, ARG1, ARG2, ARG3); fprintf(stderr, "\n"); fflush(stderr); }
ruby_debug
Definition: tcltklib.c:5806

Definition at line 165 of file tcltklib.c.

#define EVENT_HANDLER_TIMEOUT   100/*milliseconds*/

Definition at line 521 of file tcltklib.c.

#define EVLOOP_WAKEUP_CHANCE   3

Definition at line 2777 of file tcltklib.c.

#define NO_THREAD_INTERRUPT_TIME   100/*milliseconds ( 1 -- 999 ) */

Definition at line 518 of file tcltklib.c.

Referenced by for().

#define RARRAY_LEN (   s)    (RARRAY(s)->len)

Definition at line 36 of file tcltklib.c.

#define RARRAY_PTR (   s)    (RARRAY(s)->ptr)

Definition at line 35 of file tcltklib.c.

#define rb_errinfo (   void)    (ruby_errinfo+0) /* cannot be l-value */
#define rb_hash_lookup   rb_hash_aref
#define rb_safe_level (   void)    (ruby_safe_level+0)
#define rb_sourcefile (   void)    (ruby_sourcefile+0)
#define RbTk_OBJ_UNTRUST (   x)    OBJ_TAINT(x)

Definition at line 42 of file tcltklib.c.

Referenced by Init_tcltklib().

#define RSTRING_LEN (   s)    (RSTRING(s)->len)

Definition at line 32 of file tcltklib.c.

Referenced by if().

#define RSTRING_PTR (   s)    (RSTRING(s)->ptr)

Definition at line 31 of file tcltklib.c.

Referenced by if(), Init_tcltklib(), and tcl_protect_core().

#define ruby_native_thread_p (   void)    is_ruby_native_thread()
#define RUBY_RELEASE_DATE   "unknown release-date"

Definition at line 19 of file tcltklib.c.

Referenced by tcltklib_compile_info().

#define RUBY_VERSION   "(unknown version)"

Definition at line 16 of file tcltklib.c.

Referenced by Init_dl(), and tcltklib_compile_info().

#define SUPPORT_NESTED_CONST_AS_IP_RUBY_CMD_RECEIVER   1

Definition at line 3480 of file tcltklib.c.

#define TAG_BREAK   0x2

Definition at line 153 of file tcltklib.c.

Referenced by tcl_protect_core().

#define TAG_FATAL   0x8

Definition at line 159 of file tcltklib.c.

Referenced by for(), switch(), and tcl_protect_core().

#define TAG_NEXT   0x3

Definition at line 154 of file tcltklib.c.

Referenced by tcl_protect_core().

#define TAG_RAISE   0x6

Definition at line 157 of file tcltklib.c.

Referenced by for(), switch(), and tcl_protect_core().

#define TAG_REDO   0x5

Definition at line 156 of file tcltklib.c.

Referenced by if(), pending_exception_check0(), and tcl_protect_core().

#define TAG_RETRY   0x4

Definition at line 155 of file tcltklib.c.

Referenced by if(), pending_exception_check0(), and tcl_protect_core().

#define TAG_RETURN   0x1

Definition at line 152 of file tcltklib.c.

Referenced by tcl_protect_core().

#define TAG_THROW   0x7

Definition at line 158 of file tcltklib.c.

Referenced by if(), pending_exception_check0(), and tcl_protect_core().

#define TCL_ALPHA_RELEASE   0 /* "alpha" */

Definition at line 99 of file tcltklib.c.

Referenced by Init_tcltklib(), and switch().

#define TCL_BETA_RELEASE   1 /* "beta" */

Definition at line 100 of file tcltklib.c.

Referenced by Init_tcltklib(), and switch().

#define TCL_CANCEL_UNWIND   0x100000

Definition at line 7810 of file tcltklib.c.

#define Tcl_DecrRefCount (   obj)    (1)

Definition at line 313 of file tcltklib.c.

Referenced by if(), and switch().

#define Tcl_Eval   tcl_eval

Definition at line 287 of file tcltklib.c.

Referenced by switch().

#define TCL_FINAL_RELEASE   2 /* "final" */

Definition at line 101 of file tcltklib.c.

Referenced by Init_tcltklib(), and switch().

#define Tcl_GetStringResult (   interp)    ((interp)->result)

Definition at line 318 of file tcltklib.c.

Referenced by if(), and switch().

#define Tcl_GlobalEval   tcl_global_eval

Definition at line 308 of file tcltklib.c.

Referenced by if(), and Tcl_GetCommandInfo().

#define Tcl_IncrRefCount (   obj)    (1)

Definition at line 312 of file tcltklib.c.

Referenced by if().

#define TCL_NAMESPACE_DEBUG   0

Definition at line 556 of file tcltklib.c.

#define TCLTKLIB_RELEASE_DATE   "2010-08-25"

Definition at line 7 of file tcltklib.c.

Referenced by tcltklib_compile_info().

#define TK_WINDOWING_SYSTEM   "x11"

Referenced by Init_tcltklib().

#define TKWAIT_MODE_DESTROY   2
#define TKWAIT_MODE_VISIBILITY   1
#define TRAP_CHECK ( )
Value:
do { \
} while (0)
if(len<=MAX_WORD_LENGTH &&len >=MIN_WORD_LENGTH)
Definition: name2ctype.h:23841
int * check_var
Definition: tcltklib.c:2178
while(a->frac[0]/shift==0)
Definition: bigdecimal.c:4978
static int trap_check(int *check_var)
Definition: tcltklib.c:2132
return
Definition: name2ctype.h:23857

Definition at line 2127 of file tcltklib.c.

Referenced by for().

#define USE_EVLOOP_THREAD_ALONE_CHECK_FLAG   0

Definition at line 2089 of file tcltklib.c.

#define USE_RUBY_ALLOC   0
#define USE_TOGGLE_WINDOW_MODE_FOR_IDLE   0

Definition at line 490 of file tcltklib.c.

#define va_init_list (   a,
  b 
)    va_start(a)
#define WATCHDOG_INTERVAL   10/*milliseconds ( 1 -- 999 ) */

Definition at line 516 of file tcltklib.c.

Enumeration Type Documentation

enum options
Enumerator
TKWAIT_VARIABLE 
TKWAIT_VISIBILITY 
TKWAIT_WINDOW 
TKWAIT_VARIABLE 
TKWAIT_VISIBILITY 
TKWAIT_WINDOW 

Definition at line 4470 of file tcltklib.c.

enum options
Enumerator
TKWAIT_VARIABLE 
TKWAIT_VISIBILITY 
TKWAIT_WINDOW 
TKWAIT_VARIABLE 
TKWAIT_VISIBILITY 
TKWAIT_WINDOW 

Definition at line 5084 of file tcltklib.c.

enum static CONST char * updateOptions = {"idletasks", (char *) NULL}
Enumerator
REGEXP_IDLETASKS 
REGEXP_IDLETASKS 

Definition at line 3884 of file tcltklib.c.

Enumerator
REGEXP_IDLETASKS 
REGEXP_IDLETASKS 

Definition at line 4038 of file tcltklib.c.

Function Documentation

&& !RTEST ( rb_funcall(thread, ID_stop_p, 0)  )

Definition at line 7013 of file tcltklib.c.

References DUMP1.

static void ip_finalize _ ( (Tcl_Interp *)  )
static
static VALUE encoding_table_get_obj_core _ ( (VALUE, VALUE, VALUE )
static
static VALUE callq_safelevel_handler _ ( (VALUE, VALUE )
static
static VALUE create_encoding_table _ ( (VALUE )
static
static VALUE ip_invoke _ ( (int, VALUE *, VALUE )
static
static VALUE ip_invoke_with_position _ ( (int, VALUE *, VALUE, Tcl_QueuePosition)  )
static
static VALUE tk_funcall _ ( (VALUE(), int, VALUE *, VALUE )
static
static int ip_ruby_cmd _ ( (ClientData, Tcl_Interp *, int, char **)  )
static
static void rb_threadUpdateProc _ ( (ClientData)  )
static
static int ip_rb_threadTkWaitCommand _ ( (ClientData, Tcl_Interp *, int, char *[])  )
static
static char *rb_threadVwaitProc _ ( (ClientData, Tcl_Interp *, char *, char *, int )
static
static void rb_threadWaitWindowProc _ ( (ClientData, XEvent *)  )
static
int invoke_queue_handler _ ( (Tcl_Event *, int )
static
void _thread_call_proc_arg_mark ( struct thread_call_proc_arg q)

Definition at line 2900 of file tcltklib.c.

References thread_call_proc_arg::proc, and rb_gc_mark().

void call_queue_mark ( struct call_queue q)
static int check_eventloop_interp ( )
static

Definition at line 2162 of file tcltklib.c.

References DUMP1, DUMP2, and NULL.

Referenced by for().

ckfree ( (char *)  param)

Referenced by if().

ckfree ( eval_str  )
Data_Get_Struct ( self  ,
struct tcltkip  ,
ptr   
)
Data_Get_Struct ( callq  ,
struct call_queue  ,
q   
)
Data_Get_Struct ( evq  ,
struct eval_queue  ,
q   
)
Data_Get_Struct ( ivq  ,
struct invoke_queue  ,
q   
)
DATA_PTR ( self  )
return Data_Wrap_Struct ( CLASS_OF(interp ,
,
ip_free  ,
slave   
)
delete_slaves ( ip  )
DUMP1 ( "Tk_Init"  )
DUMP1 ( "original_exit is called"  )
DUMP1 ( "complete original_exit"  )
DUMP1 ( "call _timer_for_tcl"  )
DUMP1 ( "call ip_ruby_cmd_core"  )
DUMP1 ( "finish ip_ruby_cmd_core"  )
DUMP1 ( "start ip_RubyExitCommand"  )
DUMP1 ( "Ruby's 'update' is called"  )
DUMP1 ( "finish Ruby's 'update'"  )
DUMP1 ( "threadUpdateProc is called"  )
DUMP1 ( "Ruby's 'thread_update' is called"  )
DUMP1 ( "start Ruby's 'thread_update' body"  )
DUMP1 ( "pass argument check )
DUMP1 ( "set idle proc )
DUMP1 ( "finish Ruby's 'thread_update'"  )
DUMP1 ( "Ruby's 'tkwait' is called"  )
DUMP1 ( "Ruby's 'thread_tkwait' is called"  )
DUMP1 ( "delete slaves"  )
DUMP1 ( "start ip_finalize )
DUMP1 ( "check `destroy'"  )
DUMP1 ( "destroy root widget"  )
DUMP1 ( "check `finalize-hook-proc'"  )
DUMP1 ( "check `foreach' & `after'"  )
DUMP1 ( "finish ip_finalize )
DUMP1 ( "complete freeing Tcl Interp"  )
DUMP1 ( "Tcl_CreateCommand(\"tkwait\")"  )
DUMP1 ( "Tcl_CreateCommand(\"thread_vwait\")"  )
DUMP1 ( "Tcl_CreateCommand(\"thread_tkwait\")"  )
DUMP1 ( "Tcl_CreateCommand(\"update\")"  )
DUMP1 ( "Tcl_CreateCommand(\"thread_update\")"  )
DUMP1 ( "Tcl_CreateCommand(\"exit\") --> \"interp_exit\""  )
DUMP1 ( "start ip_CallWhenDeleted"  )
DUMP1 ( "finish ip_CallWhenDeleted"  )
DUMP1 ( "Tcl_CreateInterp"  )
DUMP1 ( "Tcl_Init"  )
DUMP1 ( "Tcl_CreateCommand(\"ruby\")"  )
DUMP1 ( "Tcl_CreateCommand(\"ruby_eval\")"  )
DUMP1 ( "Tcl_CreateCommand(\"ruby_cmd\")"  )
DUMP1 ( "Tcl_CreateCommand(\"interp_exit\")"  )
DUMP1 ( "Tcl_CreateCommand(\"ruby_exit\")"  )
DUMP1 ( "Tcl_CreateCommand(\"exit\") --> \"ruby_exit\""  )
DUMP1 ( "delete interp )
DUMP1 ( "add handler"  )
DUMP1 ( "exit tk_funcall )
DUMP1 ( "end Tcl_GetCommandInfo )
DUMP1 ( "exit ip_invoke"  )
DUMP2 ( "eventloop_sleep: rb_thread_wait_for() at thread : %lx"  ,
rb_thread_current()   
)
DUMP2 ( "eventloop_sleep: finish at thread : %lx"  ,
rb_thread_current()   
)
DUMP2 ( "eventloop_ensure: current-thread : %lx"  ,
current_evloop   
)
DUMP2 ( "eventloop_ensure: eventloop-thread : %lx"  ,
eventloop_thread   
)
DUMP2 ( "finish current eventloop %lx"  ,
current_evloop   
)
DUMP2 ( "rb_eval_string(%s)"  ,
arg   
)
DUMP2 ( "rb_apply return:%lx"  ,
ret   
)
DUMP2 ( "receiver:%s ,
str   
)
DUMP2 ( "last result '%s'"  ,
Tcl_GetStringResult(interp  
)
DUMP2 ( "free Tcl Interp %lx"  ,
(unsigned long) ptr->  ip 
)
DUMP2 ( )
DUMP2 ( "call_queue_handler thread : %lx"  ,
rb_thread_current()   
)
DUMP2 ( "added by thread : %lx"  ,
thread   
)
DUMP2 ( "call function (current thread:%lx)"  ,
rb_thread_current()   
)
DUMP2 ( " (current thread:%lx)"  ,
rb_thread_current()   
)
DUMP2 ( "tk_funcall from thread %lx (NOT current eventloop)"  ,
current   
)
DUMP2 ( "callq wait for handler (current thread:%lx)"  ,
current   
)
DUMP2 ( "*** callq wakeup (current thread:%lx)"  ,
current   
)
DUMP2 ( "*** (eventloop thread:%lx)"  ,
eventloop_thread   
)
DUMP2 ( "back from handler (current thread:%lx)"  ,
current   
)
DUMP2 ( "Tcl_Eval(%s)"  ,
cmd_str   
)
DUMP2 ( "(TCL_Eval result) %d ,
ptr->  return_value 
)
DUMP2 ( "eval_queue_thread : %lx"  ,
rb_thread_current()   
)
DUMP2 ( "status: Tcl_GetCurrentThread %p ,
Tcl_GetCurrentThread()   
)
DUMP2 ( "status: eventloopt_thread %lx"  ,
eventloop_thread   
)
DUMP2 ( "eval from thread %lx (NOT current eventloop)"  ,
current   
)
DUMP2 ( "evq wait for handler (current thread:%lx)"  ,
current   
)
DUMP2 ( "*** evq wakeup (current thread:%lx)"  ,
current   
)
DUMP2 ( "call  Tcl_GetCommandInfo,
%s ,
cmd   
)
DUMP2 ( "invoke_real called by thread:%lx"  ,
rb_thread_current()   
)
DUMP2 ( "invoke queue_thread : %lx"  ,
rb_thread_current()   
)
DUMP2 ( "call invoke_real (current thread:%lx)"  ,
rb_thread_current()   
)
DUMP2 ( "invoke from thread %lx (NOT current eventloop)"  ,
current   
)
DUMP2 ( "ivq wait for handler (current thread:%lx)"  ,
current   
)
DUMP2 ( "*** ivq wakeup (current thread:%lx)"  ,
current   
)
DUMP3 ( "tcltklib: eventloop-thread : %lx -> %lx\n ,
parent_evloop  ,
eventloop_thread   
)
void eval_queue_mark ( struct eval_queue q)

Definition at line 444 of file tcltklib.c.

References eval_queue::interp, rb_gc_mark(), eval_queue::result, and eval_queue::thread.

for ( ;;  )
for ( )

Definition at line 3657 of file tcltklib.c.

References DUMP2, i, RARRAY, rb_ary_push(), rb_tainted_str_new(), rb_tainted_str_new2(), and s.

free ( buf  )
free_invoke_arguments ( argc  ,
av   
)
if ( ptr  = = 0)
Initial value:
{
struct tcltkip *ptr = get_ip(self)
return ptr
Definition: tcltklib.c:780

Definition at line 772 of file tcltklib.c.

References NULL.

if ( ptr->  ip = = (Tcl_Interp*)NULL)
Initial value:
{
ptr->ref_count++
return ptr
Definition: tcltklib.c:780

Definition at line 776 of file tcltklib.c.

References NULL.

if ( )

Definition at line 818 of file tcltklib.c.

Definition at line 1356 of file tcltklib.c.

References tcltkip::ip, rb_eRuntimeError, and rb_exc_new2().

if ( NIL_Pexc)&&rb_obj_is_kind_of(exc, rb_eException)
if ( ptr->has_orig_exit)

Definition at line 1463 of file tcltklib.c.

if ( timer_tick  ,
 
)

Definition at line 1619 of file tcltklib.c.

References timer_token.

if ( RTEST(mode )

Definition at line 1659 of file tcltklib.c.

if ( deleted_ip(ptr )
Initial value:
{
struct tcltkip *ptr = get_ip(self)
return ptr
Definition: tcltklib.c:780

Definition at line 1729 of file tcltklib.c.

if ( Tcl_GetMaster(ptr->ip)!  = (Tcl_Interp*)NULL)

Definition at line 1733 of file tcltklib.c.

if ( t_wait<=  0)

Definition at line 1756 of file tcltklib.c.

References rb_eArgError, and rb_raise().

if ( lpmax<=0||no_ev<=  0)

Definition at line 1810 of file tcltklib.c.

References rb_eArgError, and rb_raise().

if ( RTEST(val )

Definition at line 1928 of file tcltklib.c.

else if ( NIL_P(val )

Definition at line 1930 of file tcltklib.c.

if ( Tcl_DoOneEvent(flag )

Definition at line 2040 of file tcltklib.c.

References Qtrue.

if ( no_event_wait<=  0)

Definition at line 2059 of file tcltklib.c.

References Qnil.

if ( update_flag  )

Definition at line 2192 of file tcltklib.c.

if ( lib_eventloop_core(params->check_root,params->update_flag,params->check_var,params->interp )

Definition at line 2558 of file tcltklib.c.

References Qtrue.

if ( eventloop_thread!  = current_evloop)

Definition at line 2614 of file tcltklib.c.

References DUMP2, Qnil, rb_thread_critical, evloop_params::thr_crit_bup, and xfree.

if ( parent_evloop  = eventloop_thread)

Definition at line 2687 of file tcltklib.c.

References DUMP2, and rbtk_eventloop_depth.

if ( !NIL_P(parent_evloop)&&parent_evloop!  = eventloop_thread)

Definition at line 2692 of file tcltklib.c.

References DUMP1, DUMP2, rb_funcall(), rb_thread_run(), and RTEST.

if ( rb_scan_args(argc, argv,"01",&check_rootwidget = = 0)
Initial value:
{
unsigned long VALUE
Definition: ruby.h:88
static VALUE VALUE check_rootwidget
Definition: tcltklib.c:2771

Definition at line 2731 of file tcltklib.c.

References Qtrue.

Definition at line 2733 of file tcltklib.c.

if ( NIL_Pwatchdog_thread)

Definition at line 2795 of file tcltklib.c.

References Qnil, rb_funcall(), and RTEST.

if ( rb_scan_args(argc, argv,"01",&proc = = 0)

Definition at line 2953 of file tcltklib.c.

References rb_block_proc().

Definition at line 2976 of file tcltklib.c.

References Qnil, and rb_funcall().

Definition at line 2989 of file tcltklib.c.

References rb_errinfo, and rb_exc_raise().

if ( NIL_Peventloop_thread)

Definition at line 3017 of file tcltklib.c.

References rb_eRuntimeError, and rb_raise().

if ( rb_scan_args(argc, argv,"01",&vflags)  = = 0)

Definition at line 3023 of file tcltklib.c.

if ( rb_safe_level() >=4||(rb_safe_level() >=1 &&OBJ_TAINTED(vflags))  )

Definition at line 3030 of file tcltklib.c.

if ( is_ip  )

Definition at line 3034 of file tcltklib.c.

References tcltkip::ip, NULL, and Qfalse.

Definition at line 3052 of file tcltklib.c.

References Qfalse.

if ( found_event  )

Definition at line 3056 of file tcltklib.c.

References Qtrue.

if ( interp  = = (Tcl_Interp*)NULL)

Definition at line 3402 of file tcltklib.c.

References rb_eRuntimeError, rb_exc_new2(), rbtk_pending_exception, and TCL_ERROR.

if ( argc!  = 2)
if ( state  )

Definition at line 3494 of file tcltklib.c.

References Qnil.

else if ( str  [0] = = ':' || ('A' <= str[0] && str[0] <= 'Z'))

Definition at line 3543 of file tcltklib.c.

References Qnil, and rb_protect().

if ( NIL_P(receiver )
if ( old_gc  = Qfalse)

Definition at line 3674 of file tcltklib.c.

if ( argc< 1||argc 2)

Definition at line 3782 of file tcltklib.c.

References NULL, Tcl_AppendResult(), and TCL_ERROR.

else if ( objc  = = 1)

Definition at line 3902 of file tcltklib.c.

if ( NIL_Prbtk_pending_exception)
if ( rb_trap_pending  )

Definition at line 3971 of file tcltklib.c.

References Tcl_Release().

if ( eventPtr->  type = = DestroyNotify)
Initial value:
{
pure parser lex param
Definition: ripper.y:617
static void ClientData clientData
Definition: tcltklib.c:1603

Definition at line 4444 of file tcltklib.c.

if ( objc!  = 3)
if ( (c== 'v')&&(strncmp(objv[1],"variable", length)==0)&&(length >=2)  )

Definition at line 4550 of file tcltklib.c.

References TKWAIT_VARIABLE.

else if ( (c== 'v')&&(strncmp(objv[1],"visibility", length)==0)&&(length >=2)  )

Definition at line 4553 of file tcltklib.c.

else if ( (c== 'w')&&(strncmp(objv[1],"window", length)==0)  )

Definition at line 4556 of file tcltklib.c.

if ( flags TCL_INTERP_DESTROYED|TCL_TRACE_DESTROYED)

Definition at line 4861 of file tcltklib.c.

References th_vwait_param::done.

if ( param->done!  = 0)

Definition at line 4866 of file tcltklib.c.

if ( rb_thread_alone()||  eventloop_thread = current_thread)

Definition at line 5098 of file tcltklib.c.

References DUMP1, and DUMP2.

if ( Tcl_InterpDeletedip)&&Tcl_Eval(ip,"interp slaves" = TCL_OK)

Definition at line 5604 of file tcltklib.c.

References argc, DUMP2, i, ip_finalize(), and TCL_OK.

if ( ip  = = (Tcl_Interp*)NULL)

Definition at line 5688 of file tcltklib.c.

References DUMP1.

if ( Tcl_InterpDeleted(ip )

Definition at line 5693 of file tcltklib.c.

References DUMP2.

if ( at_exit  )

Definition at line 5717 of file tcltklib.c.

References Tcl_CreateCommand().

if ( Tcl_GetCommandInfo(ip,"destroy",&info)  )

Definition at line 5748 of file tcltklib.c.

References DUMP1, and Tcl_GlobalEval.

if ( tk_stubs_init_p()&&Tk_MainWindow(ip)!  = (Tk_Window)NULL)

Definition at line 5755 of file tcltklib.c.

References DUMP1, Qfalse, Qnil, rb_debug_bup, rb_verbose_bup, ruby_debug, and ruby_verbose.

Definition at line 5783 of file tcltklib.c.

References DUMP2, Qfalse, Qnil, rb_debug_bup, rb_verbose_bup, ruby_debug, ruby_verbose, and Tcl_GlobalEval.

if ( slave  = NULL)

Definition at line 5988 of file tcltklib.c.

References Tcl_AppendResult(), and TCL_ERROR.

if ( rb_safe_level() >=  4)

Definition at line 6144 of file tcltklib.c.

References rb_eSecurityError, rb_raise(), and rb_safe_level.

if ( Tcl_Init(ptr->ip = TCL_ERROR)

Definition at line 6267 of file tcltklib.c.

References tcltkip::ip, rb_eRuntimeError, rb_raise(), and Tcl_GetStringResult.

if ( with_tk  )
if ( mainWin!  = (Tk_Window)NULL)

Definition at line 6375 of file tcltklib.c.

if ( deleted_ip(master )

Definition at line 6398 of file tcltklib.c.

References rb_eRuntimeError, and rb_exc_new2().

if ( Tcl_IsSafe(master->ip = = 1)

Definition at line 6406 of file tcltklib.c.

else if ( safemode  = Qfalse || NIL_P(safemode))

Definition at line 6408 of file tcltklib.c.

if ( slave->  ip = NULL)

Definition at line 6442 of file tcltklib.c.

References rb_eRuntimeError, rb_exc_new2(), rb_thread_critical, and thr_crit_bup.

if ( rb_scan_args(argc, argv,"11",&name,&safemode = = 1)

Definition at line 6512 of file tcltklib.c.

References Qfalse.

if ( Tcl_IsSafe(master->ip)!  = 1 && (safemode == Qfalse || NIL_P(safemode)))

Definition at line 6515 of file tcltklib.c.

References rb_secure().

if ( tk_stubs_init_p())

Definition at line 6571 of file tcltklib.c.

if ( Tcl_GetVar(ptr->ip,"tcl_interactive", TCL_GLOBAL_ONLY)  = = (char*)NULL)

Definition at line 6575 of file tcltklib.c.

References tcltkip::ip.

if ( Tcl_MakeSafe(ptr->ip = TCL_ERROR)

Definition at line 6640 of file tcltklib.c.

References tcltkip::ip, rb_eRuntimeError, and Tcl_GetStringResult.

if ( Tcl_IsSafe(ptr->ip )

Definition at line 6690 of file tcltklib.c.

References Qtrue.

if ( Tcl_InterpDeletedptr->ip)

Definition at line 6790 of file tcltklib.c.

References DUMP1, tcltkip::ip, ip_finalize(), and Tcl_Release().

if ( deleted_ip(ptr)||!tk_stubs_init_p()  )

Definition at line 6848 of file tcltklib.c.

References Qnil.

else if ( Tk_MainWindow(ptr->ip = = (Tk_Window)NULL)

Definition at line 6850 of file tcltklib.c.

if ( rb_safe_level()!  = q->safe_level)
if ( NIL_Pip_obj)&&rb_obj_is_kind_of(ip_obj, tcltkip_class)

Definition at line 7107 of file tcltklib.c.

References Qnil.

if ( is_tk_evloop_thread &&  NIL_P(eventloop_thread)||current==eventloop_thread)

Definition at line 7128 of file tcltklib.c.

References DUMP2, func, NIL_P, rb_eException, rb_exc_raise(), rb_obj_is_kind_of(), and result.

if ( argv  )

Definition at line 7149 of file tcltklib.c.

References argc, MEMCPY, and Tcl_Preserve().

Definition at line 7226 of file tcltklib.c.

References DUMP1.

Definition at line 7271 of file tcltklib.c.

References DUMP1, rb_exc_new3(), rb_exc_raise(), rb_funcall(), and rb_obj_class().

if ( pending_exception_check1(thr_crit_bup, ptr )

Definition at line 7433 of file tcltklib.c.

References rbtk_pending_exception, and rbtk_release_ip().

if ( ptr->return_value!  = TCL_OK)

Definition at line 7439 of file tcltklib.c.

References exc, tcltkip::ip, rb_eRuntimeError, rbtk_release_ip(), and tcltkip::return_value.

if ( rb_scan_args(argc, argv,"01",&retval = = 0)

Definition at line 7799 of file tcltklib.c.

References Qnil.

if ( ip_cancel_eval_core(get_ip(self) ->ip, retval, 0)  = TCL_OK)

Definition at line 7802 of file tcltklib.c.

References Qtrue.

if ( ip_cancel_eval_core(get_ip(self) ->ip, retval, flag = TCL_OK)

Definition at line 7826 of file tcltklib.c.

References Qtrue.

if ( NIL_Pexc)

Definition at line 7881 of file tcltklib.c.

References exc, rb_thread_critical, rbtk_release_ip(), and thr_crit_bup.

if ( NIL_P(src )

Definition at line 7957 of file tcltklib.c.

References rb_str_new2().

if ( rb_scan_args(argc, argv,"11",&str,&encodename = = 1)
Initial value:
{
static unsigned int register const char * str
Definition: name2ctype.h:22209
VALUE encodename
Definition: tcltklib.c:7941
unsigned long VALUE
Definition: ruby.h:88

Definition at line 8099 of file tcltklib.c.

References Qnil.

if ( Tcl_GetCommandInfoptr->ip, cmd,&info)
if ( unknown_flag  )

Definition at line 8754 of file tcltklib.c.

References ckfree(), free, Tcl_DecrRefCount, and Tcl_Release().

if ( ret  = = (char*)NULL)
if ( NIL_Pindex)
if ( NIL_P(retval )

Definition at line 9405 of file tcltklib.c.

References rb_tainted_str_new2().

if ( NIL_P(ip_obj )

Definition at line 9714 of file tcltklib.c.

else if ( get_ip(ip_obj = = (struct tcltkip *)NULL)

Definition at line 9716 of file tcltklib.c.

if ( Tcl_SplitList(interp, RSTRING_PTR(list_str),&argc,&argv = TCL_ERROR)

Definition at line 9797 of file tcltklib.c.

References rb_eRuntimeError, and rb_raise().

if ( taint_flag  )

Definition at line 9807 of file tcltklib.c.

if ( num <  argc = = 0)

Definition at line 9861 of file tcltklib.c.

if ( dst  = result)

Definition at line 9908 of file tcltklib.c.

if ( NIL_P(table )

Definition at line 10601 of file tcltklib.c.

References rb_define_singleton_method().

void Init_tcltklib ( )
void invoke_queue_mark ( struct invoke_queue q)
return ip_eval_real ( q->  interp,
q->  str,
q->  len 
)

Referenced by if().

ip_finalize ( ip  )

Referenced by if().

return ip_get_result_string_obj ( ptr->  ip)
return ip_invoke_core ( q->  interp,
q->  argc,
q->  argv 
)
return ip_invoke_with_position ( ,
argv  ,
self  ,
TCL_QUEUE_TAIL   
)
return ip_invoke_with_position ( ,
argv  ,
self  ,
TCL_QUEUE_TAIL   
)
return ip_invoke_with_position ( argc  ,
argv  ,
obj  ,
TCL_QUEUE_HEAD   
)
ip_replace_wait_commands ( slave  ,
mainWin   
)
ip_replace_wait_commands ( ptr->  ip,
mainWin   
)
ip_replace_wait_commands ( slave->  ip,
mainWin   
)
ip_wrap_namespace_command ( ptr->  ip)
ip_wrap_namespace_command ( slave->  ip)
return lib_eventloop_launcher ( RTEST(check_rootwidget ,
,
(int *)  NULL,
(Tcl_Interp *)  NULL 
)

Referenced by switch().

return lib_evloop_abort_on_exc ( self  )

Referenced by Init_tcltklib().

return lib_evloop_abort_on_exc_set ( self  ,
val   
)

Referenced by Init_tcltklib().

return lib_fromUTF8_core ( Qnil  ,
str  ,
encodename   
)
return lib_fromUTF8_core ( self  ,
str  ,
encodename   
)
return lib_mainloop_watchdog ( argc  ,
argv  ,
self   
)

Referenced by Init_tcltklib().

return lib_restart ( self  )
return lib_toUTF8_core ( Qnil  ,
str  ,
encodename   
)
return lib_toUTF8_core ( self  ,
str  ,
encodename   
)
int matherr ( )
memcpy ( buf 1,
str  ,
len   
)

Referenced by addrinfo_mload(), allocate_converted_string(), append_fspath(), date_strftime_with_tmx(), dlhandle_sym(), dln_find_1(), EVP_CIPHER_CTX_copy(), flo_to_s(), get_addr(), getaddrinfo(), getrusage_time(), glob_helper(), glob_make_pattern(), global_id(), gzfile_readpartial(), HMAC_CTX_copy(), if(), inet_ntop(), inet_pton(), init_addrinfo(), inspect1(), inspect_errno(), inspect_int(), inspect_timeval_as_interval(), int_sip_post_update(), int_sip_pre_update(), io_reader(), ip_s_getaddress(), join_argv(), join_path(), load_transcoder_entry(), makroom(), md5_process(), MD5_Update(), moreswitches(), nl_langinfo_codeset(), ole_val2olevariantdata(), opendir_internal(), ossl_asn1cons_to_der(), ossl_asn1data_to_der(), ossl_buf2str(), ossl_cipher_init(), ossl_pem_passwd_cb(), ossl_x509ext_set_value(), pack_unpack(), parse_ddd_cb(), parse_mode_enc(), PEM_def_callback(), putpair(), rb_digest_base_copy(), rb_dlptr_aset(), rb_econv_convert0(), rb_econv_insert_output(), rb_econv_putback(), rb_file_expand_path_internal(), rb_home_dir(), rb_proc_exec(), rb_quad_pack(), rb_quad_unpack(), rb_reg_quote(), rb_str_append(), rb_str_cat(), rb_str_format(), rb_str_justify(), rb_str_plus(), rb_str_reverse(), rb_str_shared_replace(), rb_str_sub_bang(), rb_str_times(), rb_strftime_with_timespec(), rb_syck_io_str_read(), rb_w32_cmdvector(), rb_w32_conv_from_wstr(), rb_w32_fd_copy(), rb_w32_fd_dup(), rb_w32_inet_ntop(), rb_w32_spawn(), rb_w32_system_tmpdir(), read_digits(), RMD160_Finish(), RMD160_Update(), ruby_brace_expand(), ruby_strdup(), s3e(), SHA1_Transform(), SHA1_Update(), sock_s_getnameinfo(), sockopt_bool(), sockopt_int(), sockopt_linger(), splpage(), st_copy(), str_buf_cat(), str_make_independent_expand(), str_new(), str_replace_shared(), strio_ungetbyte(), stub_sysinit(), syck_new_str2(), syck_replace_str2(), sym_inspect(), unpack_entries(), VpAsgn(), w_float(), and zstream_append_buffer().

memcpy ( eval_str  ,
RSTRING_PTR(str ,
RSTRING_LEN(str  
)
NIL_P ( eventloop_thread  )

Definition at line 4057 of file tcltklib.c.

References DUMP1.

static int pending_exception_check0 ( )
static
RARRAY_PTR ( q->  result) = ret

Referenced by apply2files(), array2fdset(), ary2sv(), ary_add_hash(), ary_join_0(), ary_join_1(), ary_make_partial(), ary_make_shared(), ary_make_substitution(), ary_reject(), ary_reject_bang(), ary_resize_capa(), BigDecimal_to_i(), BigDecimal_to_r(), bmcall(), callback(), caller_setup_args(), check_exec_fds(), check_exec_redirect(), check_funcall_exec(), clear_coverage_i(), code_page(), coverage(), curry(), d_lite_marshal_load(), decorate_convpath(), dir_s_glob(), do_coerce(), enum_cycle(), enum_reverse_each(), enum_sort_by(), enum_zip(), enumerator_block_call(), env_each_key(), env_each_pair(), env_each_value(), env_reject_bang(), env_replace(), env_select_bang(), error_print(), eval_string_with_cref(), fdbm_delete_if(), fgdbm_delete_if(), flatten(), fsdbm_delete_if(), function_call(), gc_mark_children(), gc_profile_result(), get_stack_tail(), iconv_convert(), initialize(), initialize_params(), inspect_ary(), inspect_enumerator(), inspect_struct(), io_puts_ary(), iseq_build_from_ary_body(), iseq_build_from_ary_exception(), iseq_data_to_ary(), iseq_set_arguments(), iseq_set_exception_table(), loaded_feature_path(), make_addrinfo(), make_struct(), method_missing(), nucomp_marshal_load(), nurat_marshal_load(), open_key_args(), ossl_sslctx_setup(), ossl_x509_set_extensions(), ossl_x509crl_set_extensions(), ossl_x509crl_set_revoked(), ossl_x509req_set_attributes(), ossl_x509revoked_set_extensions(), pack_pack(), pack_unpack(), parse_main(), parser_set_encode(), path_entries(), path_s_glob(), permute0(), process_options(), process_sflag(), r_object0(), random_load(), rb_apply(), rb_ary_assoc(), rb_ary_collect(), rb_ary_collect_bang(), rb_ary_combination(), rb_ary_compact_bang(), rb_ary_count(), rb_ary_cycle(), rb_ary_delete(), rb_ary_delete_at(), rb_ary_diff(), rb_ary_drop_while(), rb_ary_dup(), rb_ary_each(), rb_ary_elt(), rb_ary_fetch(), rb_ary_fill(), rb_ary_first(), rb_ary_includes(), rb_ary_index(), rb_ary_initialize(), rb_ary_join(), rb_ary_last(), rb_ary_modify(), rb_ary_new3(), rb_ary_new4(), rb_ary_permutation(), rb_ary_plus(), rb_ary_pop(), rb_ary_product(), rb_ary_push_1(), rb_ary_rassoc(), rb_ary_repeated_combination(), rb_ary_repeated_permutation(), rb_ary_replace(), rb_ary_resize(), rb_ary_resurrect(), rb_ary_reverse_each(), rb_ary_rindex(), rb_ary_s_create(), rb_ary_sample(), rb_ary_select(), rb_ary_select_bang(), rb_ary_shift(), rb_ary_shift_m(), rb_ary_shuffle_bang(), rb_ary_slice_bang(), rb_ary_sort_bang(), rb_ary_splice(), rb_ary_store(), rb_ary_take_while(), rb_ary_times(), rb_ary_unshift_m(), rb_check_argv(), rb_check_backtrace(), rb_dlcfunc_call(), rb_env_clear(), rb_eval_cmd(), rb_feature_p(), rb_fiber_start(), rb_file_join(), rb_find_file_ext_safe(), rb_find_file_safe(), rb_get_expanded_load_path(), rb_hash_s_create(), rb_io_s_popen(), rb_iseq_build_from_ary(), rb_proc_call(), rb_reg_preprocess_dregexp(), rb_run_exec_options_err(), rb_str_format_m(), rb_str_split_m(), rb_struct_alloc(), rb_struct_aref_id(), rb_struct_aset_id(), rb_struct_getmember(), rb_struct_initialize(), rb_struct_new(), rb_struct_s_def(), rb_struct_s_members_m(), rb_struct_set(), rb_vm_bugreport(), rb_yield_splat(), rcombinate0(), readline_attempted_completion_function(), recursive_hash(), reduce0(), rpermute0(), rt_complete_frags(), run_exec_close(), run_exec_dup2(), run_exec_dup2_child(), run_exec_open(), run_finalizer(), select_internal(), sock_s_getnameinfo(), sort_by_i(), start_document(), string_to_c(), string_to_c_strict(), string_to_r(), string_to_r_internal(), string_to_r_strict(), sym_to_proc(), thread_initialize(), thread_start_func_2(), update_coverage(), update_i(), vm_call0(), vm_expandarray(), vm_yield_setup_block_args(), w_object(), warn_deprecated(), yield_under(), zip_ary(), and zip_i().

return rb_ary_new3 ( ,
loop_max  ,
no_event   
)
rb_ary_push ( eventloop_stack  ,
parent_evloop   
)
return rb_ensure ( lib_eventloop_main_core  ,
(VALUE args,
lib_eventloop_ensure  ,
(VALUE args 
)
return rb_ensure ( lib_watchdog_core  ,
check_rootwidget  ,
lib_watchdog_ensure  ,
Qnil   
)
return rb_ensure ( _thread_call_proc_core  ,
(VALUE q,
_thread_call_proc_ensure  ,
(VALUE q 
)
rb_exc_raise ( exc  )
return rb_funcall ( q->  proc,
ID_call  ,
 
)

Referenced by add(), argument_error(), basic_obj_respond_to(), BigDecimal_power(), BigDecimal_to_i(), BigDecimal_to_r(), bsock_setsockopt(), call_next(), callback(), chunk_i(), chunk_ii(), cmp(), cmp_ge(), cmp_gt(), cmp_le(), cmp_lt(), code_page(), coerce_body(), const_missing(), convert_encoding(), copy_stream_fallback_body(), cParser_initialize(), cState_aref(), cState_from_state_s(), cState_generate(), date_strftime_with_tmx(), default_inspect(), dir_inspect(), divmodv(), DupPrivPKeyPtr(), enum_find(), enum_zip(), eq(), error_print(), evs_length(), exc_message(), f_add(), f_cmp(), f_div(), f_eqeq_p(), f_ge_p(), f_gt_p(), f_le_p(), f_lt_p(), f_mul(), f_negative_p(), f_one_p(), f_sub(), f_to_f(), f_to_i(), f_zero_p(), fix_pow(), flo_pow(), flo_quo(), fole_s_show_help(), foleparam_inspect(), foletype_s_ole_classes(), foletypelib_s_typelibs(), folevariable_inspect(), folevariant_value(), function_call(), generate_json(), generate_json_bignum(), generate_json_float(), generate_json_object(), generate_json_string(), generic_to_value(), get_backtrace(), GetConfigPtr(), GetPrivPKeyPtr(), GetVpValueWithPrec(), grep_i(), grep_iter_i(), gzfile_close(), gzfile_read_raw_partial(), gzfile_read_raw_rescue(), gzfile_reader_rewind(), gzfile_write_raw(), id_hash_new(), if(), Init_generator(), Init_parser(), Init_syck(), Init_win32ole(), initialize(), inject_op_i(), int_dotimes(), int_downto(), int_even_p(), int_odd_p(), int_round_0(), int_upto(), io_call_close(), io_reader(), io_write(), is_negative(), is_one(), is_zero(), JSON_parse_array(), JSON_parse_object(), JSON_parse_string(), lexer_iter(), load_file_internal(), make_exception(), match_i(), max_by_i(), max_i(), min_by_i(), min_i(), minmax_by_i(), minmax_by_i_update(), minmax_i(), minmax_i_update(), mktime_do(), mktime_r(), mlambda(), mnew(), mObject_to_json(), mod(), mString_Extend_json_create(), mString_included_s(), mString_to_json_raw_object(), mul(), negate_lit(), NIL_P(), num_abs(), num_div(), num_equal(), num_fdiv(), num_modulo(), num_nonzero_p(), num_quo(), num_remainder(), num_step(), num_to_int(), num_uminus(), nurat_div(), ole_invoke(), ole_typelib_from_itypeinfo(), ossl_call_client_cert_cb(), ossl_call_session_get_cb(), ossl_call_session_new_cb(), ossl_call_session_remove_cb(), ossl_call_tmp_dh_callback(), ossl_call_verify_cb_proc(), ossl_pkey_sign(), ossl_ssl_close(), ossl_ssl_initialize(), ossl_ssl_read_internal(), ossl_ssl_session_get_time(), ossl_ssl_session_set_time(), ossl_ssl_write_internal(), ossl_sslctx_flush_sessions(), ossl_to_der(), ossl_x509attr_get_value(), ossl_x509attr_initialize(), ossl_x509ext_initialize(), ossl_x509store_verify(), parse(), parse_main(), path_atime(), path_basename(), path_blockdev_p(), path_chardev_p(), path_chmod(), path_chown(), path_ctime(), path_directory_p(), path_dirname(), path_entries(), path_executable_p(), path_executable_real_p(), path_exist_p(), path_expand_path(), path_extname(), path_file_p(), path_fnmatch(), path_ftype(), path_grpowned_p(), path_lchmod(), path_lchown(), path_lstat(), path_make_link(), path_make_symlink(), path_mkdir(), path_mtime(), path_owned_p(), path_pipe_p(), path_readable_p(), path_readable_real_p(), path_readlink(), path_realdirpath(), path_realpath(), path_rename(), path_rmdir(), path_s_getwd(), path_setgid_p(), path_setuid_p(), path_size(), path_size_p(), path_socket_p(), path_split(), path_stat(), path_sticky_p(), path_symlink_p(), path_truncate(), path_utime(), path_world_readable_p(), path_world_writable_p(), path_writable_p(), path_writable_real_p(), path_zero_p(), protected_alias(), protected_empty(), protected_end_document(), protected_end_mapping(), protected_end_sequence(), protected_end_stream(), protected_start_stream(), quo(), r_le(), r_leave(), r_lt(), r_object0(), raise_method_missing(), range_check(), range_each_func(), range_eqq(), range_max(), range_min(), range_step(), rb_big_pow(), rb_class_inherited(), rb_cmpint(), rb_digest_class_s_digest(), rb_digest_instance_bubblebabble(), rb_digest_instance_digest(), rb_digest_instance_digest_bang(), rb_digest_instance_hexdigest(), rb_digest_instance_hexdigest_bang(), rb_digest_instance_length(), rb_digest_instance_new(), rb_digest_instance_to_s(), rb_enc_get_index(), rb_eql(), rb_equal(), rb_exc_new(), rb_exc_new3(), rb_gzreader_initialize(), rb_gzwriter_flush(), rb_gzwriter_initialize(), rb_hash(), rb_hash_aref(), rb_hash_default(), rb_hash_shift(), rb_inspect(), rb_int_pred(), rb_int_succ(), rb_io_flush(), rb_io_write(), rb_mod_include(), rb_num_coerce_bin(), rb_num_coerce_cmp(), rb_num_coerce_relop(), rb_obj_alloc(), rb_obj_as_string(), rb_obj_clone(), rb_obj_dup(), rb_obj_extend(), rb_obj_init_dup_clone(), rb_obj_inspect(), rb_obj_not_equal(), rb_obj_not_match(), rb_obj_respond_to(), rb_range_values(), rb_str_cmp_m(), rb_str_match(), rb_str_sum(), rb_str_upto(), rb_strftime_with_timespec(), rb_syck_load_handler(), rbtime2vtdate(), readline_attempted_completion_function(), recursive_cmp(), reduce0(), rescue_callback(), rt_complete_frags(), set_backtrace(), set_option_encoding_once(), shift(), slicebefore_i(), slicebefore_ii(), sockopt_unpack(), sort_2(), sort_by_cmp(), step_i(), sub(), switch(), syck_badalias_cmp(), syck_defaultresolver_node_import(), syck_emitter_emit(), syck_emitter_node_export(), syck_emitter_s_alloc(), syck_genericresolver_node_import(), syck_map_add_m(), syck_map_initialize(), syck_map_value_set(), syck_merge_i(), syck_node_transform(), syck_out_map(), syck_out_scalar(), syck_out_seq(), syck_parser_bufsize_set(), syck_parser_load_documents(), syck_resolver_node_import(), syck_resolver_transfer(), syck_scalar_initialize(), syck_seq_add_m(), syck_seq_initialize(), syck_set_model(), sym_step_i(), syserr_eqq(), tcl_protect_core(), time_cmp(), time_timespec(), time_to_time(), unlink_body(), unlink_rescue(), vtdate2rbtime(), w_object(), wadd(), wcmp(), wdivmod(), weq(), while(), wmul(), wquo(), writer(), wsub(), and yaml_org_handler().

rb_ivar_set ( einfo  ,
ID_at_interp  ,
interp   
)
rb_ivar_set ( interp  ,
ID_encoding_table  ,
table   
)
rb_notimplement ( )
rb_secure ( )
Initial value:
{
int t_wait = NUM2INT(wait)
#define NUM2INT(x)
Definition: ruby.h:536
VALUE wait
Definition: tcltklib.c:1750

Referenced by apply2files(), bsock_do_not_rev_lookup_set(), bsock_do_not_reverse_lookup_set(), bsock_setsockopt(), check_dirname(), check_gid_switch(), check_uid_switch(), curses_init_screen(), dir_s_chdir(), dlhandle_sym(), env_assoc(), env_delete(), env_each_pair(), env_empty_p(), env_fetch(), env_has_key(), env_has_value(), env_inspect(), env_key(), env_keys(), env_rassoc(), env_select(), env_shift(), env_size(), env_to_a(), env_to_hash(), env_update(), env_values(), env_values_at(), etc_getgrgid(), etc_getgrnam(), etc_getlogin(), etc_getpwuid(), etc_group(), etc_passwd(), ev_advise(), fdbm_modify(), fev_off_event(), fole_free(), fole_initialize(), fole_respond_to(), fole_s_connect(), fole_s_const_load(), gc_stress_set(), get_pid(), get_ppid(), hist_delete_at(), hist_each(), hist_empty_p(), hist_get(), hist_length(), hist_pop(), hist_push(), hist_push_method(), hist_shift(), id2ref(), if(), io_write(), iseq_eval(), iseq_s_compile(), iseq_s_compile_file(), iseq_s_compile_option_set(), iseq_s_disasm(), iseq_to_a(), mSyslog_close(), mSyslog_set_mask(), ole_types_from_typelib(), os_each_obj(), proc_detach(), proc_wait(), proc_waitall(), rb_alias(), rb_check_safe_obj(), rb_define_const(), rb_dir_getwd(), rb_dl_free(), rb_dl_malloc(), rb_dl_ptr2value(), rb_dl_realloc(), rb_dlcfunc_new(), rb_dlhandle_initialize(), rb_dlptr_malloc(), rb_dlptr_new2(), rb_dlptr_s_allocate(), rb_exec_arg_addopt(), rb_export_method(), rb_f_abort(), rb_f_exit(), rb_f_exit_bang(), rb_f_getenv(), rb_f_kill(), rb_f_srand(), rb_f_trace_var(), rb_f_untrace_var(), rb_file_chmod(), rb_file_chown(), rb_file_executable_p(), rb_file_executable_real_p(), rb_file_flock(), rb_file_identical_p(), rb_file_lstat(), rb_file_readable_p(), rb_file_readable_real_p(), rb_file_s_chmod(), rb_file_s_chown(), rb_file_s_ftype(), rb_file_s_lstat(), rb_file_s_rename(), rb_file_s_stat(), rb_file_s_umask(), rb_file_s_unlink(), rb_file_s_utime(), rb_file_symlink_p(), rb_file_writable_p(), rb_file_writable_real_p(), rb_gdbm_modify(), rb_include_module(), rb_io_autoclose_p(), rb_io_initialize(), rb_io_reopen(), rb_io_set_autoclose(), rb_io_syswrite(), rb_io_write_nonblock(), rb_ioctl(), rb_iseq_disasm(), rb_load_internal(), rb_obj_taint(), rb_obj_trust(), rb_obj_untaint(), rb_obj_untrust(), rb_realpath_internal(), rb_remove_history(), rb_secure_update(), rb_stat(), rb_stat_init(), rb_thread_abort_exc_set(), rb_thread_kill(), rb_thread_priority_set(), rb_thread_s_abort_exc_set(), rb_undef(), readline_readline(), readline_s_get_completion_case_fold(), readline_s_get_completion_proc(), readline_s_set_completion_case_fold(), readline_s_set_completion_proc(), readline_s_set_input(), readline_s_set_output(), remove_method(), rsock_bsock_send(), rsock_s_accept(), rsock_s_accept_nonblock(), rsock_sock_listen(), sig_trap(), sock_initialize(), sock_s_gethostbyname(), syslog_write(), tcp_s_gethostbyname(), test_check(), thgroup_add(), top_include(), udp_bind(), udp_connect(), udp_init(), udp_send(), window_initialize(), and writable().

rb_set_safe_level ( q->  safe_level)

Referenced by process_options().

rb_thread_schedule ( )
rb_thread_wait_for ( t  )
rb_thread_wakeup ( param->  thread)

Referenced by if(), Init_Thread(), rb_thread_run(), and while().

void rbtk_EventCheckProc ( ClientData  clientData,
int  flag 
)

Definition at line 1992 of file tcltklib.c.

References rb_thread_schedule().

void rbtk_EventSetupProc ( ClientData  clientData,
int  flag 
)

Definition at line 1983 of file tcltklib.c.

References long, and tcl_time.

rbtk_preserve_ip ( ptr  )
rbtk_preserve_ip ( slave  )
rbtk_release_ip ( ptr  )

Referenced by if().

return ( ptr->  ref_count)
return ( char *  )

Definition at line 4202 of file tcltklib.c.

return ( (q->func)(q->interp, q->argc, q->argv )
return ( INT2FIX(ptr->return_value )
return ( strval  )
return set_eventloop_tick ( self  ,
tick   
)

Referenced by Init_tcltklib().

return set_eventloop_weight ( self  ,
loop_max  ,
no_event   
)

Referenced by Init_tcltklib().

return set_no_event_wait ( self  ,
wait   
)

Referenced by Init_tcltklib().

static void set_tcltk_version ( )
static

Definition at line 112 of file tcltklib.c.

References tcltk_version.

StringValue ( msg  )
StringValue ( name  )
StringValue ( str  )
StringValue ( varname  )
StringValue ( value  )
StringValue ( list_str  )
switch ( TYPE(time )
switch ( argc  )
switch ( (enum options index)
switch ( cnt  )

Definition at line 6224 of file tcltklib.c.

References tcltkip::ip, NIL_P, Qfalse, StringValuePtr, and Tcl_Eval.

switch ( status  )
switch ( tcltk_version.  type)
Tcl_AllowExceptions ( interp  )
Tcl_AppendResult ( interp  ,
RSTRING_PTR(msg ,
(char *)  NULL 
)

Referenced by if(), switch(), and tcl_protect_core().

Tcl_CallWhenDeleted ( ptr->  ip,
ip_CallWhenDeleted  ,
(ClientData)  mainWin 
)
Tcl_CallWhenDeleted ( slave->  ip,
ip_CallWhenDeleted  ,
(ClientData)  mainWin 
)
Tcl_CreateCommand ( interp  ,
"vwait"  ,
ip_rbVwaitCommand  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)

Referenced by if().

Tcl_CreateCommand ( interp  ,
"tkwait"  ,
ip_rbTkWaitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( interp  ,
"thread_vwait"  ,
ip_rb_threadVwaitCommand  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( interp  ,
"thread_tkwait"  ,
ip_rb_threadTkWaitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( interp  ,
"update"  ,
ip_rbUpdateCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( interp  ,
"thread_update"  ,
ip_rb_threadUpdateCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( slave  ,
"exit"  ,
ip_InterpExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"ruby"  ,
ip_ruby_eval  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"ruby_eval"  ,
ip_ruby_eval  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"ruby_cmd"  ,
ip_ruby_cmd  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"interp_exit"  ,
ip_InterpExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"ruby_exit"  ,
ip_RubyExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"exit"  ,
ip_RubyExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"__replace_slave_tk_commands__"  ,
ip_rb_replaceSlaveTkCmdsCommand  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( slave->  ip,
"exit"  ,
ip_InterpExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( slave->  ip,
"__replace_slave_tk_commands__"  ,
ip_rb_replaceSlaveTkCmdsCommand  ,
(ClientData)  NULL,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateCommand ( ptr->  ip,
"exit"  ,
ip_InterpExitCommand  ,
(ClientData)  mainWin,
(Tcl_CmdDeleteProc *)  NULL 
)
Tcl_CreateEventSource ( rbtk_EventSetupProc  ,
rbtk_EventCheckProc  ,
(ClientData)  args 
)
Tcl_DeleteEventSource ( rbtk_EventSetupProc  ,
rbtk_EventCheckProc  ,
(ClientData)  args 
)
Tcl_DeleteTimerHandler ( timer_token  )

Referenced by while().

Tcl_DoWhenIdle ( rb_threadUpdateProc  ,
(ClientData)  param 
)
Tcl_Eval ( ptr->  ip,
"set argc 0; set argv {}; set argv0 tcltklib.so"   
)
&& Tcl_GetCommandInfo ( ip  ,
"after"  ,
info 
)

Definition at line 5794 of file tcltklib.c.

References DUMP1, Qfalse, Qnil, rb_debug_bup, rb_verbose_bup, ruby_debug, ruby_verbose, and Tcl_GlobalEval.

Referenced by if().

Tcl_Preserve ( interp  )

Referenced by if().

Tcl_Preserve ( tkwin  )
Tcl_Preserve ( (ClientData)  param)
Tcl_Preserve ( ip  )
static int tcl_protect_core ( Tcl_Interp *  interp,
VALUE (*)()  proc,
VALUE  data 
)
static
Tcl_QueueEvent ( (Tcl_Event *)  callq,
TCL_QUEUE_HEAD   
)
Tcl_QueueEvent ( (Tcl_Event *)  evq,
position   
)
Tcl_Release ( interp  )

Referenced by if(), and switch().

Tcl_Release ( tkwin  )
Tcl_Release ( (ClientData)  param)
Tcl_Release ( ip  )
Tcl_ResetResult ( interp  )

Referenced by if(), switch(), and tcl_protect_core().

Tcl_ResetResult ( ptr->  ip)
Tcl_ResetResult ( inf->ptr->  ip)
tcl_stubs_check ( )
static
Initial value:
{
volatile VALUE str = src
static unsigned int register const char * str
Definition: name2ctype.h:22209
unsigned long VALUE
Definition: ruby.h:88
VALUE src
Definition: tcltklib.c:7940

Definition at line 1275 of file tcltklib.c.

References FAIL_CreateInterp, FAIL_Tcl_InitStubs, NO_CreateInterp, NO_DeleteInterp, NO_FindExecutable, NO_TCL_DLL, rb_eLoadError, rb_eRuntimeError, rb_raise(), ruby_tcl_stubs_init(), st, tcl_stubs_init_p(), and TCLTK_STUBS_OK.

Referenced by Init_tcltklib().

static VALUE tcltklib_compile_info ( )
static
return tk_funcall ( ip_create_slave_core  ,
,
callargv  ,
self   
)
return tk_funcall ( ip_create_console_core  ,
,
(VALUE *)  NULL,
self   
)
return tk_funcall ( ip_make_safe_core  ,
,
(VALUE *)  NULL,
self   
)
return tk_funcall ( lib_restart_core  ,
,
(VALUE *)  NULL,
self   
)
return tk_funcall ( ip_make_menu_embeddable_core  ,
,
argv  ,
interp   
)
static int trap_check ( int check_var)
static
va_end ( args  )
va_init_list ( args  ,
fmt   
)
while ( )
while ( !param->  done)

Definition at line 4131 of file tcltklib.c.

References DUMP1, NIL_P, and rb_thread_wait_for().

xfree ( ptr  )
xfree ( q->  done)
xfree ( q  )
xfree ( buf  )

Variable Documentation

int all_bs

Definition at line 8325 of file tcltklib.c.

while alloc_done = (int*)ckalloc(sizeof(int))

Definition at line 7098 of file tcltklib.c.

ptr allow_ruby_exit = 1

Definition at line 6159 of file tcltklib.c.

VALUE VALUE arg = argv[1]

Definition at line 2838 of file tcltklib.c.

static VALUE int argc
Initial value:
{
return rb_funcall(th, ID_value, 0)
static VALUE VALUE th
Definition: tcltklib.c:2937
static ID ID_value
Definition: tcltklib.c:228
return rb_funcall(q->proc, ID_call, 0)

Definition at line 1961 of file tcltklib.c.

Referenced by argf_getpartial(), call_cfunc(), callback(), caller_setup_args(), check_funcall(), chfunc(), compat_init_setproctitle(), dir_globs(), enum_zip(), enumerator_block_call(), enumerator_initialize(), env_values_at(), establishShell(), exit_initialize(), fdbm_values_at(), fgdbm_values_at(), fiber_switch(), flock_winnt(), fsdbm_values_at(), function_call(), gzfile_wrap(), if(), initialize(), inspect_enumerator(), invoke_block_from_c(), iseq_build_from_ary_body(), iseq_compile_each(), iseq_specialized_instruction(), main(), moreswitches(), new_insn_body(), new_insn_core(), new_insn_send(), obj_to_enum(), open_key_args(), pipe_open(), pipe_open_s(), proc_options(), rb_add_method_cfunc(), rb_apply(), rb_ary_zip(), rb_block_call(), rb_check_argv(), rb_cont_call(), rb_exec_fillarg(), rb_f_kill(), rb_f_p(), rb_fiber_start(), rb_get_values_at(), rb_hash_s_create(), rb_hash_values_at(), rb_io_print(), rb_io_puts(), rb_io_s_foreach(), rb_iseq_disasm(), rb_marshal_dump(), rb_mod_attr_accessor(), rb_mod_attr_reader(), rb_mod_attr_writer(), rb_mod_include(), rb_mod_modfunc(), rb_mod_remove_method(), rb_mod_undef_method(), rb_obj_extend(), rb_proc_exec_n(), rb_reg_s_union(), rb_scan_args(), rb_spawn_process(), rb_str_count(), rb_str_delete_bang(), rb_str_encode(), rb_str_end_with(), rb_str_format(), rb_str_slice_bang(), rb_str_squeeze_bang(), rb_str_start_with(), rb_w32_asynchronize(), ruby_set_argv(), ruby_sysinit(), set_const_visibility(), set_method_visibility(), setup_args(), stub_sysinit(), vm_call0(), vm_call_method(), vm_callee_setup_arg_complex(), vm_invoke_block(), vm_setup_method(), and vm_yield_setup_block_args().

VALUE args
Initial value:
{
return lib_eventloop_main_core(args)
VALUE VALUE args
Definition: tcltklib.c:2550

Definition at line 2550 of file tcltklib.c.

Referenced by ary2sv(), ary_join_1(), assoc_i(), bind_eval(), bmcall(), check_funcall(), chown_internal(), console_dev(), copy_stream_body(), cState_generate(), date_strftime_with_tmx(), deflate_run(), dvar_defined_gen(), enc_names(), enum_drop(), enum_drop_while(), enum_each_cons(), enum_each_slice(), enum_take(), enum_zip(), ev_on_event(), EVENTSINK_Invoke(), GetVpValueWithPrec(), glob_func_caller(), iconv_fail(), inflate_run(), initialize(), int_ossl_asn1_decode0_cons(), int_ossl_asn1_decode0_prim(), interrupt_init(), iseq_compile_each(), iseq_data_to_ary(), iseq_load(), key_i(), local_id_gen(), make_curry_proc(), mark(), name_err_mesg_to_str(), next_ii(), nometh_err_initialize(), objspace_each_objects(), ole_raise(), onig_syntax_warn(), open_key_args(), ossl_debug(), ossl_exc_new(), ossl_raise(), ossl_tmp_dh_callback(), ossl_x509name_initialize(), parse(), path_binread(), path_each_entry(), path_each_line(), path_open(), path_opendir(), path_read(), path_readlines(), path_s_glob(), path_sysopen(), pipe_open(), process_sflag(), protected_alias(), protected_end_document(), protected_scalar(), protected_start_document(), protected_start_mapping(), protected_start_sequence(), protected_start_stream(), raise_method_missing(), range_each(), range_init(), range_step(), rassoc_i(), rb_bug(), rb_compile_bug(), rb_compile_error(), rb_compile_error_append(), rb_compile_error_with_enc(), rb_compile_warn(), rb_compile_warning(), rb_deflate_s_deflate(), rb_fatal(), rb_fiber_start(), rb_glob_caller(), rb_hash_assoc(), rb_hash_key(), rb_hash_rassoc(), rb_inflate_s_inflate(), rb_io_s_pipe(), rb_iseq_parameters(), rb_loaderror(), rb_name_error(), rb_obj_methods(), rb_proc_exec_n(), rb_raise(), rb_reg_s_union(), rb_rescue2(), rb_str_upto(), rb_strftime_with_timespec(), rb_struct_new(), rb_sys_warning(), rb_warn(), rb_warning(), rb_yield_values(), run_finalizer(), run_single_final(), switch(), take_items(), thread_create_core(), warn_printf(), zip_ary(), and zip_i().

VALUE * argv = cmd_str
VALUE argv0
Initial value:
{
struct tcltkip *ptr
return ptr
Definition: tcltklib.c:780

Definition at line 6135 of file tcltklib.c.

VALUE ary
Initial value:
{
Tcl_Interp *interp
static int Tcl_Interp * interp
Definition: tcltklib.c:273

Definition at line 9700 of file tcltklib.c.

Referenced by argf_readlines(), ary_alloc(), ary_make_shared(), ary_new(), ary_reject_bang(), ary_resize(), bug_start(), caller_setup_args(), check_exec_fds(), check_exec_redirect(), class_instance_method_list(), compile_array_(), dir_globs(), dir_s_glob(), divmodv(), do_coerce(), each_cons_i(), each_slice_i(), econv_primitive_errinfo(), enc_list(), enum_collect(), enum_cycle(), enum_each_slice(), enum_find_all(), enum_flat_map(), enum_grep(), enum_minmax(), enum_partition(), enum_reject(), enum_reverse_each(), enum_sort_by(), enum_take_while(), enum_to_a(), enum_zip(), env_each_pair(), env_keys(), env_to_a(), env_values(), EVENTSINK_Invoke(), fdbm_delete_if(), fdbm_keys(), fdbm_to_a(), fdbm_values(), fgdbm_delete_if(), fgdbm_keys(), fgdbm_to_a(), fgdbm_values(), fsdbm_delete_if(), fsdbm_keys(), fsdbm_to_a(), fsdbm_values(), iconv_s_ctlmethods(), Init_ossl_asn1(), Init_ossl_ssl(), int_ossl_asn1_decode0_cons(), iseq_data_to_ary(), lfp_svar_get(), lfp_svar_set(), make_addrinfo(), make_hostent_internal(), match_array(), mString_Extend_json_create(), mString_to_json_raw_object(), nsdr(), ossl_asn1_decode_all(), ossl_asn1cons_to_der(), ossl_call_client_cert_cb(), ossl_generate_cb(), ossl_get_errors(), ossl_pkcs7_get_recipient(), ossl_pkcs7_get_signer(), ossl_pkcs7_set_certificates(), ossl_pkcs7_set_crls(), ossl_ssl_cipher_to_ary(), ossl_ssl_get_peer_cert_chain(), ossl_sslctx_get_ciphers(), ossl_sslctx_session_get_cb(), ossl_sslctx_session_new_cb(), ossl_sslctx_session_remove_cb(), ossl_x509_get_extensions(), ossl_x509_set_extensions(), ossl_x509crl_get_extensions(), ossl_x509crl_get_revoked(), ossl_x509crl_set_extensions(), ossl_x509crl_set_revoked(), ossl_x509name_to_a(), ossl_x509req_get_attributes(), ossl_x509req_set_attributes(), ossl_x509revoked_get_extensions(), ossl_x509revoked_set_extensions(), ossl_x509stctx_get_chain(), pack_unpack(), path_entries(), path_s_glob(), path_split(), push_glob(), random_load(), range_first(), rb_ary_clear(), rb_ary_collect_bang(), rb_ary_combination(), rb_ary_compact(), rb_ary_compact_bang(), rb_ary_delete_if(), rb_ary_each(), rb_ary_each_index(), rb_ary_fill(), rb_ary_flatten_bang(), rb_ary_initialize(), rb_ary_insert(), rb_ary_keep_if(), rb_ary_new3(), rb_ary_new4(), rb_ary_permutation(), rb_ary_product(), rb_ary_push_1(), rb_ary_push_m(), rb_ary_repeated_combination(), rb_ary_repeated_permutation(), rb_ary_resize(), rb_ary_reverse_each(), rb_ary_s_create(), rb_ary_select_bang(), rb_ary_shuffle(), rb_ary_shuffle_bang(), rb_ary_sort(), rb_ary_sort_bang(), rb_ary_sort_by_bang(), rb_ary_to_a(), rb_ary_to_ary_m(), rb_ary_uniq_bang(), rb_ary_unshift_m(), rb_const_list(), rb_enc_aliases_enc_i(), rb_enc_name_list(), rb_enc_name_list_i(), rb_exec_arg_addopt(), rb_f_global_variables(), rb_f_local_variables(), rb_f_untrace_var(), rb_gc_register_mark_object(), rb_get_expanded_load_path(), rb_hash_flatten(), rb_hash_keys(), rb_hash_to_a(), rb_hash_values(), rb_insns_name_array(), rb_io_readlines(), rb_mod_ancestors(), rb_mod_class_variables(), rb_mod_included_modules(), rb_mod_nesting(), rb_obj_instance_variables(), rb_obj_singleton_methods(), rb_push_glob(), rb_reg_names(), rb_str_freeze(), rb_str_scan(), rb_struct_define(), rb_struct_s_members_m(), rb_sym_all_symbols(), rb_thread_keys(), rb_thread_list(), readline_attempted_completion_function(), recursive_join(), reg_named_captures_iter(), reg_names_iter(), rsock_ipaddr(), save_env(), sock_s_gethostbyaddr(), sort_by_cmp(), sort_by_i(), strio_readlines(), switch(), thgroup_list(), thgroup_list_i(), thread_list_i(), time_timespec(), vm_backtrace(), vm_expandarray(), vm_yield_setup_block_args(), vm_yield_setup_block_args_complex(), and wdivmod().

int at_exit = 0
static

Definition at line 181 of file tcltklib.c.

Referenced by ruby_vm_at_exit().

char ** av = (char**)ckalloc(sizeof(char *) * (argc+1))
buf[len+1] = ALLOC_N(char, len + 2)

Definition at line 3560 of file tcltklib.c.

callargv[1] = name

Definition at line 6503 of file tcltklib.c.

callq = (struct call_queue *)ckalloc(sizeof(struct call_queue))

Definition at line 6975 of file tcltklib.c.

int chance = 0

Definition at line 2785 of file tcltklib.c.

Definition at line 2786 of file tcltklib.c.

args check_root = check_root
static

Definition at line 2176 of file tcltklib.c.

static VALUE VALUE check_rootwidget
static

Definition at line 2771 of file tcltklib.c.

check_rootwidget_flag = 0
static

Definition at line 534 of file tcltklib.c.

args check_var = check_var

Definition at line 2178 of file tcltklib.c.

static int ClientData clientData
static
Initial value:
{
at_exit = 1
static int at_exit
Definition: tcltklib.c:181

Definition at line 1603 of file tcltklib.c.

char * cmd
int cmd_len

Definition at line 7311 of file tcltklib.c.

char * cmd_str = rb_str_new2("thread_vwait")

Definition at line 5509 of file tcltklib.c.

inf cmdinfo = info

Definition at line 8665 of file tcltklib.c.

cnt = rb_scan_args(argc, argv, "02", &argv0, &opts)
volatile VALUE current = rb_thread_current()

Definition at line 7101 of file tcltklib.c.

volatile VALUE current_evloop = rb_thread_current()

Definition at line 2608 of file tcltklib.c.

current_interp = ptr->ip

Definition at line 476 of file tcltklib.c.

volatile VALUE current_thread = rb_thread_current()

Definition at line 4039 of file tcltklib.c.

VALUE data

Definition at line 3357 of file tcltklib.c.

VALUE divmod
Initial value:
{
struct Tcl_Time tcl_time
Tcl_SetMaxBlockTime & tcl_time
Definition: tcltklib.c:1885

Definition at line 1858 of file tcltklib.c.

do
Initial value:
{
DUMP2("eventloop thread %lx is sleeping or dead",
evloop = rb_thread_create(watchdog_evloop_launcher,
(void*)&check_rootwidget);
DUMP2("create new eventloop thread %lx", evloop);
chance = 0;
rb_thread_run(evloop);
} else {
++chance;
} else {
chance = 0;
}
} else {
}
}
} while(!check || !tk_stubs_init_p() || Tk_GetNumMainWindows() != 0)
int chance
Definition: tcltklib.c:2785
static VALUE VALUE check_rootwidget
Definition: tcltklib.c:2771
static VALUE eventloop_thread
Definition: tcltklib.c:466
rb_thread_wait_for(t)
int prev_val
Definition: tcltklib.c:2784
int check
Definition: tcltklib.c:2786
#define DUMP2(ARG1, ARG2)
Definition: tcltklib.c:163
struct timeval t0 t1
Definition: tcltklib.c:2787
static ID ID_stop_p
Definition: tcltklib.c:224
#define RTEST(v)
Definition: ruby.h:373
static int event_loop_wait_event
Definition: tcltklib.c:530
VALUE rb_thread_run(VALUE)
Definition: thread.c:1655
return rb_funcall(q->proc, ID_call, 0)
VALUE rb_thread_create(VALUE(*)(ANYARGS), void *)
Definition: thread.c:658
int tk_stubs_init_p()
Definition: stubs.c:498
static int loop_counter
Definition: tcltklib.c:532
#define EVLOOP_WAKEUP_CHANCE
Definition: tcltklib.c:2777

Definition at line 2805 of file tcltklib.c.

ivq done = 1
* donePtr = 1

Definition at line 4201 of file tcltklib.c.

volatile VALUE dst = result
Tcl_DString dstr
Initial value:
{
char *buf
unsigned char buf[MIME_BUF_SIZE]
Definition: nkf.c:3913

Definition at line 3086 of file tcltklib.c.

int dummy
static

Definition at line 2054 of file tcltklib.c.

Referenced by BigDecimal_dump(), readdir_internal(), sort_1(), and sort_2().

Definition at line 843 of file tcltklib.c.

Referenced by error_print(), make_regexp(), and rb_reg_prepare_re().

volatile VALUE elem

Definition at line 9700 of file tcltklib.c.

Referenced by ADD_ELEM(), APPEND_ELEM(), ole_invoke2(), ossl_sslctx_set_ciphers(), and POP_ELEMENT().

VALUE eLocalJumpError
static

Definition at line 209 of file tcltklib.c.

else
Initial value:
{
Tcl_Preserve((ClientData)ptr->ip)
return ptr
Definition: tcltklib.c:780
Tcl_Preserve(interp)

Definition at line 807 of file tcltklib.c.

VALUE enc

Definition at line 10402 of file tcltklib.c.

Referenced by and_cclass(), check_dirname(), chopped_length(), compile_length_string_node(), compile_string_node(), dir_initialize(), econv_get_replacement(), econv_set_replacement(), enc_arg(), enc_compatible_p(), euctw_mbc_to_code(), fetch_escaped_value(), fetch_name(), fetch_name_with_level(), fetch_range_quantifier(), fetch_token_in_cc(), gzreader_gets(), iconv_iconv(), Init_id(), int_chr(), io_encoding_set(), is_code_ctype(), lex_get_str(), load_file_internal(), make_dummy_encoding(), make_encoding(), make_replacement(), make_writeconv(), must_be_ascii_compatible(), nkf_default_encoding(), nkf_locale_encoding(), ole_vstr2wc(), onigenc_set_default_encoding(), options(), or_cclass(), parser_here_document(), parser_parse_string(), parser_set_encode(), parser_tokadd_string(), parser_yylex(), path_check_0(), process_options(), push_glob(), rb_define_dummy_encoding(), rb_econv_open_opts(), rb_enc_aliases_enc_i(), rb_enc_check(), rb_enc_find_index(), rb_enc_from_encoding_index(), rb_enc_str_asciionly_p(), rb_enc_str_coderange(), rb_encdb_dummy(), rb_file_dirname(), rb_file_expand_path_internal(), rb_file_s_basename(), rb_get_path_check(), rb_glob2(), rb_home_dir(), rb_intern_str(), rb_io_each_char(), rb_io_each_codepoint(), rb_io_extract_modeenc(), rb_io_getc(), rb_io_getline_1(), rb_obj_encoding(), rb_path_to_class(), rb_realpath_internal(), rb_reg_adjust_startpos(), rb_reg_check_preprocess(), rb_reg_desc(), rb_reg_initialize_m(), rb_reg_initialize_str(), rb_reg_prepare_enc(), rb_reg_prepare_re(), rb_reg_preprocess(), rb_reg_quote(), rb_reg_s_union(), rb_reg_to_s(), rb_str_append(), rb_str_buf_cat_ascii(), rb_str_capitalize_bang(), rb_str_casecmp(), rb_str_chomp_bang(), rb_str_concat(), rb_str_count(), rb_str_delete_bang(), rb_str_downcase_bang(), rb_str_dump(), rb_str_each_char(), rb_str_each_codepoint(), rb_str_each_line(), rb_str_ellipsize(), rb_str_encode_ospath(), rb_str_end_with(), rb_str_format(), rb_str_hex(), rb_str_index(), rb_str_inspect(), rb_str_justify(), rb_str_lstrip_bang(), rb_str_oct(), rb_str_plus(), rb_str_reverse(), rb_str_rindex(), rb_str_rindex_m(), rb_str_rstrip_bang(), rb_str_shared_replace(), rb_str_splice(), rb_str_split_m(), rb_str_squeeze_bang(), rb_str_sub_bang(), rb_str_subpat_set(), rb_str_substr(), rb_str_succ(), rb_str_swapcase_bang(), rb_str_upcase_bang(), rb_str_upto(), read_all(), readline_attempted_completion_function(), realpath_rec(), reg_named_capture_assign_iter(), ruby_brace_expand(), scan_once(), set_base_encoding(), single_byte_optimizable(), str_end_with_asciichar(), strio_each_codepoint(), strio_getc(), strio_set_encoding(), strio_substr(), strio_ungetc(), strio_write(), swallow(), sym_inspect(), tr_trans(), transcode_search_path(), unescape_escaped_nonascii(), unescape_nonascii(), update_char_offset(), and w_encoding().

VALUE enc_name

Definition at line 8432 of file tcltklib.c.

Referenced by code_page(), enc_dump(), Init_Encoding(), ole_cp2encoding(), and proc_options().

VALUE encodename

Definition at line 7941 of file tcltklib.c.

VALUE ENCODING_NAME_BINARY
static

Definition at line 191 of file tcltklib.c.

VALUE ENCODING_NAME_UTF8
static

Definition at line 190 of file tcltklib.c.

char* endptr

Definition at line 3771 of file tcltklib.c.

VALUE error_mode

Definition at line 10082 of file tcltklib.c.

VALUE eTkCallbackBreak
static

Definition at line 206 of file tcltklib.c.

Referenced by tcl_protect_core().

VALUE eTkCallbackContinue
static

Definition at line 207 of file tcltklib.c.

Referenced by tcl_protect_core().

VALUE eTkCallbackRedo
static

Definition at line 213 of file tcltklib.c.

VALUE eTkCallbackRetry
static

Definition at line 212 of file tcltklib.c.

VALUE eTkCallbackReturn
static

Definition at line 205 of file tcltklib.c.

Referenced by tcl_protect_core().

VALUE eTkCallbackThrow
static

Definition at line 214 of file tcltklib.c.

VALUE eTkLocalJumpError
static

Definition at line 211 of file tcltklib.c.

eval_str[RSTRING_LEN(str)]
Initial value:
{
struct eval_queue *evq
VALUE evq
Definition: tcltklib.c:7471

Definition at line 7593 of file tcltklib.c.

int event_flag

Definition at line 2183 of file tcltklib.c.

int event_loop_abort_on_exc = 1
static

Definition at line 531 of file tcltklib.c.

event_loop_max = DEFAULT_EVENT_LOOP_MAX
static

Definition at line 523 of file tcltklib.c.

Referenced by for().

int event_loop_wait_event = 0
static

Definition at line 530 of file tcltklib.c.

eventloop_interp = ptr->ip
static

Definition at line 467 of file tcltklib.c.

VALUE eventloop_stack
static

Definition at line 471 of file tcltklib.c.

eventloop_thread = rb_thread_current()
static

Definition at line 466 of file tcltklib.c.

XEvent * eventPtr

Definition at line 4440 of file tcltklib.c.

int Tcl_Event * evPtr
static

Definition at line 6988 of file tcltklib.c.

evq = (struct eval_queue *)ckalloc(sizeof(struct eval_queue))

Definition at line 7471 of file tcltklib.c.

exc = tcltkip_init_tk(interp)
const char finalize_hook_name[] = "INTERP_FINALIZE_HOOK"
static

Definition at line 177 of file tcltklib.c.

VALUE VALUE flag_val
static

Definition at line 2034 of file tcltklib.c.

int* flagPtr
Initial value:
{
int num, len
register unsigned int len
Definition: name2ctype.h:22210

Definition at line 9852 of file tcltklib.c.

int flags
Initial value:
{
volatile VALUE vflags
unsigned long VALUE
Definition: ruby.h:88

Definition at line 3012 of file tcltklib.c.

Referenced by addrinfo_getnameinfo(), addrinfo_initialize(), addrinfo_s_getaddrinfo(), BSD_vfprintf(), check_class(), check_exec_redirect(), date_strftime_with_tmx(), dir_s_glob(), dispose_string(), dln_load(), econv_primitive_convert(), fdbm_initialize(), fgdbm_initialize(), file_s_fnmatch(), find_coclass(), find_default_source_from_typeinfo(), gzfile_make_header(), gzfile_read_header(), init_copy(), make_fd_nonblock(), memsize_of(), obj_free(), ole_method_event(), ole_type_impl_ole_types(), ossl_pkcs7_decrypt(), ossl_pkcs7_s_encrypt(), ossl_pkcs7_s_sign(), ossl_pkcs7_s_write_smime(), ossl_pkcs7_verify(), ossl_x509stctx_set_flags(), ossl_x509store_set_flags(), overlapped_socket_io(), parser_tokadd_escape(), path_fnmatch(), proc_wait(), range_initialize(), rb_big_realloc(), rb_check_inheritable(), rb_class_real(), rb_file_expand_path_internal(), rb_gc_force_recycle(), rb_getnameinfo(), rb_maygvl_fd_fix_cloexec(), rb_reg_desc(), rb_reg_initialize_m(), rb_reg_options(), rb_reg_prepare_enc(), rb_search_method_entry(), rb_singleton_class_clone(), rb_str_format(), rb_str_shared_replace(), rb_strftime_with_timespec(), rb_transcoding_open_by_transcoder(), rb_waitpid(), recvmsg(), rsock_addrinfo(), rsock_bsock_send(), rsock_s_recvfrom_nonblock(), ruby_brace_glob0(), sock_s_getaddrinfo(), sock_s_getnameinfo(), strio_init(), syck_scan_scalar(), trans_sweep(), and udp_send().

const char* fmt
int found_event = 1

Definition at line 2182 of file tcltklib.c.

Referenced by for().

foundEvent
Initial value:
q->done, (Tcl_Interp*)NULL))
n NULL
Definition: yaml2byte.c:134
#define RTEST(v)
Definition: ruby.h:373
return lib_eventloop_launcher(RTEST(check_rootwidget), 0,(int *) NULL,(Tcl_Interp *) NULL)
q
Definition: tcltklib.c:2957

Definition at line 2951 of file tcltklib.c.

callq func = func
static

Definition at line 7091 of file tcltklib.c.

slave has_orig_exit = Tcl_GetCommandInfo(ptr->ip, "exit", &(ptr->orig_exit_info))

Definition at line 6201 of file tcltklib.c.

int have_rb_thread_waiting_for_value = 0
static

Definition at line 495 of file tcltklib.c.

int i
Initial value:
{
struct invoke_info *inf = (struct invoke_info *)arg
struct invoke_info inf
Definition: tcltklib.c:8561
arg
Definition: ripper.y:1287

Definition at line 3593 of file tcltklib.c.

ID ID_alive_p
static

Definition at line 225 of file tcltklib.c.

ID ID_at_enc
static

Definition at line 218 of file tcltklib.c.

ID ID_at_interp
static

Definition at line 219 of file tcltklib.c.

ID ID_at_reason
static

Definition at line 234 of file tcltklib.c.

ID ID_backtrace
static

Definition at line 231 of file tcltklib.c.

ID ID_break
static

Definition at line 236 of file tcltklib.c.

ID ID_call
static

Definition at line 230 of file tcltklib.c.

ID ID_encoding_name
static

Definition at line 221 of file tcltklib.c.

ID ID_encoding_table
static

Definition at line 222 of file tcltklib.c.

ID ID_inspect
static

Definition at line 240 of file tcltklib.c.

ID ID_join
static

Definition at line 227 of file tcltklib.c.

ID ID_kill
static

Definition at line 226 of file tcltklib.c.

ID ID_message
static

Definition at line 232 of file tcltklib.c.

ID ID_next
static

Definition at line 237 of file tcltklib.c.

ID ID_return
static

Definition at line 235 of file tcltklib.c.

ID ID_stop_p
static

Definition at line 224 of file tcltklib.c.

ID ID_to_s
static

Definition at line 239 of file tcltklib.c.

ID ID_value
static

Definition at line 228 of file tcltklib.c.

int idx
VALUE index = argv[1]
struct invoke_info inf

Definition at line 8561 of file tcltklib.c.

Referenced by allocate_cbsubst_info(), Init_process(), isinf(), and X509_CRL_add0_revoked().

Tcl_CmdInfo info
Initial value:
{
static int int thr_crit_bup
Definition: tcltklib.c:1409

Definition at line 1454 of file tcltklib.c.

Referenced by Init_Cont(), Init_syslog(), rb_iseq_disasm(), rb_w32_fstat(), rb_w32_fstati64(), and tcltklib_compile_info().

static VALUE VALUE interp = interp
static

Definition at line 273 of file tcltklib.c.

slave ip
static

Definition at line 5590 of file tcltklib.c.

Referenced by Init_tcltklib().

static VALUE VALUE ip_obj = obj

Definition at line 7102 of file tcltklib.c.

int is_ip

Definition at line 3011 of file tcltklib.c.

is_tk_evloop_thread = 1

Definition at line 7100 of file tcltklib.c.

ivq = (struct invoke_queue *)ckalloc(sizeof(struct invoke_queue))

Definition at line 8961 of file tcltklib.c.

Definition at line 3493 of file tcltklib.c.

Referenced by call_trace_func(), call_trace_proc(), check_funcall(), coverage(), enum_sort_by(), exc_inspect(), find_class_path(), flatten(), fole_s_const_load(), generate_json(), gzfile_wrap(), id2ref(), include_class_new(), Init_string(), Init_VM(), int_ossl_asn1_decode0_cons(), int_ossl_asn1_decode0_prim(), JSON_parse_object(), JSON_parse_string(), make_singleton_class(), mnew(), obj_alloc_by_path(), path_entries(), permute0(), proc_new(), r_object0(), range_loader(), rb_alias(), rb_any_cmp(), rb_ary_combination(), rb_ary_subseq(), rb_class_boot(), rb_class_initialize(), rb_const_defined_0(), rb_const_get_0(), rb_cvar_get(), rb_cvar_set(), rb_define_class(), rb_define_class_id(), rb_define_class_id_under(), rb_f_autoload(), rb_f_autoload_p(), rb_include_module(), rb_io_fdopen(), rb_io_s_pipe(), rb_io_s_popen(), rb_ivar_set(), rb_method_call_status(), rb_method_entry_get_without_cache(), rb_method_entry_make(), rb_mod_ancestors(), rb_mod_included_modules(), rb_mod_init_copy(), rb_mod_nesting(), rb_mod_s_constants(), rb_module_s_alloc(), rb_obj_define_method(), rb_obj_instance_eval(), rb_obj_instance_exec(), rb_obj_singleton_methods(), rb_raise_jump(), rb_search_method_entry(), rb_singleton_class(), rb_singleton_class_clone(), rb_str_new_frozen(), rb_str_vcatf(), rb_struct_define_without_accessor(), rb_struct_initialize_m(), rb_threadptr_exec_event_hooks(), rb_undef(), rcombinate0(), rpermute0(), rsock_s_recvfrom(), ruby__sfvwrite(), singleton_class_of(), sort_by_i(), sort_reentered(), syserr_initialize(), thread_exec_event_hooks(), vm_call0(), vm_call_method(), vm_call_super(), vm_define_method(), vm_get_cbase(), vm_get_const_base(), vm_get_cvar_base(), vm_get_ev_const(), vm_getivar(), vm_method_search(), vm_search_superclass(), vm_setivar(), w_class(), w_object(), and w_uclass().

int len = strlen(str)

Definition at line 3557 of file tcltklib.c.

size_t length = strlen(objv[1])
VALUE list_str

Definition at line 9699 of file tcltklib.c.

int loop_counter = 0
static

Definition at line 532 of file tcltklib.c.

VALUE loop_max

Definition at line 1802 of file tcltklib.c.

Tk_Window mainWin = Tk_MainWindow(slave)

Definition at line 5876 of file tcltklib.c.

int major
VALUE VALUE master
static

Definition at line 6531 of file tcltklib.c.

Referenced by chfunc(), and establishShell().

VALUE menu_path

Definition at line 10741 of file tcltklib.c.

method
int minor
VALUE mode
VALUE name = argv[0]
static

Definition at line 3484 of file tcltklib.c.

char * name1

Definition at line 4194 of file tcltklib.c.

Referenced by ossl_x509name_cmp0(), and rb_alias_variable().

char * name2

Definition at line 4195 of file tcltklib.c.

Referenced by ossl_x509name_cmp0().

char * nameString = objv[2]

Definition at line 4471 of file tcltklib.c.

int no_ev = NUM2INT(no_event)

Definition at line 1806 of file tcltklib.c.

VALUE no_event

Definition at line 1803 of file tcltklib.c.

no_event_tick = DEFAULT_NO_EVENT_TICK
static

Definition at line 524 of file tcltklib.c.

Referenced by for().

no_event_wait = DEFAULT_NO_EVENT_WAIT
static

Definition at line 525 of file tcltklib.c.

VALUE obj
static

Definition at line 3147 of file tcltklib.c.

Referenced by ary_new_dim(), ary_store_dim(), BigDecimal_coerce(), BigDecimal_inspect(), BigDecimal_prec(), BigDecimal_split(), binding_alloc(), boot_defclass(), class_alloc(), create_win32ole_object(), cState_init_copy(), d_complex_new_internal(), d_simple_new_internal(), decode_obj(), define_final(), dh_instance(), dir_s_alloc(), dsa_instance(), enum_each_entry(), enum_each_with_index(), enum_reverse_each(), enumerator_each(), enumerator_init(), enumerator_init_copy(), enumerator_rewind(), env_alloc(), etc_each_passwd(), EVENTSINK_Invoke(), exec_recursive(), fdbm_clear(), fdbm_delete_if(), fdbm_each_key(), fdbm_each_pair(), fdbm_each_value(), fdbm_initialize(), fdbm_replace(), fdbm_s_open(), fdbm_update(), fev_s_allocate(), fgdbm_clear(), fgdbm_delete_if(), fgdbm_each_key(), fgdbm_each_pair(), fgdbm_each_value(), fgdbm_initialize(), fgdbm_reorganize(), fgdbm_replace(), fgdbm_s_open(), fgdbm_sync(), fgdbm_update(), fole_method_help(), fole_s_allocate(), folemethod_initialize(), folemethod_s_allocate(), foleparam_s_allocate(), foletype_s_allocate(), foletype_s_ole_classes(), foletypelib_s_allocate(), folevariant_s_allocate(), folevariant_s_array(), fsdbm_clear(), fsdbm_delete_if(), fsdbm_each_key(), fsdbm_each_pair(), fsdbm_each_value(), fsdbm_initialize(), fsdbm_replace(), fsdbm_s_open(), fsdbm_update(), gc_mark(), gc_mark_children(), gc_mark_stacked_objects(), generator_allocate(), generator_init(), generator_init_copy(), get_digest_base_metadata(), gzfile_wrap(), hide_obj(), iseq_build_from_ary_body(), iseq_set_sequence(), marshal_dump(), match_init_copy(), mnew(), mString_to_json_raw(), mutex_alloc(), nucomp_s_new_internal(), nurat_s_new_internal(), obj2vint(), obj_alloc_by_path(), obj_ivar_each(), obj_resurrect(), ole_ary_m_entry(), ole_each_sub(), ole_invoke(), ole_invoke2(), ole_variant2val(), ossl_bn_alloc(), ossl_bn_new(), ossl_bn_s_generate_prime(), ossl_cipher_alloc(), ossl_client_cert_cb(), ossl_dh_new(), ossl_dh_s_generate(), ossl_dh_to_public_key(), ossl_digest_alloc(), ossl_dsa_new(), ossl_dsa_s_generate(), ossl_dsa_to_public_key(), ossl_hmac_alloc(), ossl_pkcs12_s_allocate(), ossl_pkcs12_s_create(), ossl_pkcs7_alloc(), ossl_pkcs7ri_alloc(), ossl_pkcs7ri_new(), ossl_pkcs7si_alloc(), ossl_pkcs7si_new(), ossl_pkey_alloc(), ossl_protect_obj2bio(), ossl_rsa_new(), ossl_rsa_s_generate(), ossl_rsa_to_public_key(), ossl_spki_alloc(), ossl_ssl_get_peer_cert(), ossl_to_der_if_possible(), ossl_x509_alloc(), ossl_x509_new(), ossl_x509_new_from_file(), ossl_x509attr_alloc(), ossl_x509attr_new(), ossl_x509attr_set_oid(), ossl_x509crl_alloc(), ossl_x509crl_new(), ossl_x509ext_alloc(), ossl_x509ext_new(), ossl_x509ext_set_oid(), ossl_x509extfactory_alloc(), ossl_x509extfactory_create_ext(), ossl_x509name_alloc(), ossl_x509name_new(), ossl_x509req_alloc(), ossl_x509req_new(), ossl_x509revoked_alloc(), ossl_x509revoked_new(), ossl_x509stctx_alloc(), ossl_x509stctx_clear_ptr(), ossl_x509stctx_new(), ossl_x509store_alloc(), ossl_x509store_new(), predefined_dlhandle(), prep_window(), random_alloc(), random_copy(), random_init(), random_load(), rb_ary_count(), rb_block_call(), rb_class_allocate_instance(), rb_class_new_instance(), rb_deflate_addstr(), rb_deflate_initialize(), rb_digest_base_alloc(), rb_digest_class_s_digest(), rb_dlcfunc_s_allocate(), rb_dlhandle_s_allocate(), rb_dlptr_s_allocate(), rb_dlptr_s_malloc(), rb_enc_associate_index(), rb_gdbm_delete(), rb_get_path_check(), rb_gzreader_each(), rb_gzreader_initialize(), rb_gzwriter_flush(), rb_gzwriter_initialize(), rb_hash_assoc(), rb_hash_rassoc(), rb_inflate_addstr(), rb_inflate_initialize(), rb_marshal_dump(), rb_mod_extend_object(), rb_mod_private_constant(), rb_mod_private_method(), rb_mod_public_constant(), rb_mod_public_method(), rb_newobj(), rb_obj_alloc(), rb_obj_as_string(), rb_obj_extend(), rb_obj_freeze(), rb_obj_init_copy(), rb_obj_init_dup_clone(), rb_obj_taint(), rb_obj_tap(), rb_obj_trust(), rb_obj_untaint(), rb_obj_untrust(), rb_run_exec_options_err(), rb_syck_load_handler(), rb_undef(), rsa_instance(), rsock_sockopt_new(), ruby_debug_print_value(), select_internal(), strio_s_open(), syck_defaultresolver_node_import(), syck_genericresolver_node_import(), syck_map_alloc(), syck_resolver_node_import(), syck_resolver_transfer(), syck_scalar_alloc(), syck_seq_alloc(), sym_call(), thread_alloc(), time_s_alloc(), undefine_final(), w_object(), window_addstr2(), window_initialize(), yaml_org_handler(), yielder_allocate(), yielder_init(), yielder_yield_push(), and zstream_new().

int objc

Definition at line 3876 of file tcltklib.c.

Referenced by if().

char * objv

Definition at line 3877 of file tcltklib.c.

VALUE old_gc = rb_gc_disable()

Definition at line 3597 of file tcltklib.c.

Referenced by tcl_protect_core().

static CONST char * optionStrings
static
Initial value:
= { "variable", "visibility", "window",
(char *) NULL }
n NULL
Definition: yaml2byte.c:134

Definition at line 4468 of file tcltklib.c.

VALUE opts
param = (struct th_update_param *)ckalloc(sizeof(struct th_update_param))

Definition at line 3767 of file tcltklib.c.

int patchlevel

Definition at line 108 of file tcltklib.c.

Tcl_QueuePosition position = TCL_QUEUE_TAIL

Definition at line 7605 of file tcltklib.c.

Referenced by find_prev_line_no(), and get_insn_info().

int prev_val = -1

Definition at line 2784 of file tcltklib.c.

ivq ev proc
* ptr
Initial value:
{
) {
DUMP1("ip is deleted");
return 1;
}
return 0
#define DUMP1(ARG1)
Definition: tcltklib.c:162

Definition at line 780 of file tcltklib.c.

Referenced by add_pointer(), addrinfo_mark(), argf_free(), argf_mark(), ary_resize_capa(), atomic_size_exchange(), autoload_memsize(), BigDecimal_memsize(), binding_free(), binding_mark(), bm_free(), bm_mark(), caller_setup_args(), code_status(), compile_data_alloc(), constant_arg(), cont_free(), cont_mark(), cont_memsize(), convert_encoding(), convert_UTF8_to_JSON(), deallocate(), dir_free(), dir_mark(), dlcfunc_free(), dlcfunc_mark(), dlcfunc_memsize(), dlhandle_free(), dlptr_free(), dlptr_mark(), dlptr_memsize(), e2s_conv(), econv_free(), enumerator_allocate(), enumerator_init(), enumerator_mark(), enumerator_ptr(), env_free(), env_mark(), env_memsize(), error_print(), fiber_free(), fiber_mark(), fiber_memsize(), flo_to_s(), function_memsize(), gc_with_gvl(), generator_allocate(), generator_each(), generator_init(), generator_mark(), generator_ptr(), get_proc_address(), get_rnd(), get_strio(), get_system_directory(), get_thread_errinfo(), get_wsa_extension_function(), has_redirection(), id2ref(), init_copy(), initialize(), inspect_struct(), internal_read_func(), internal_write_func(), iseq_build_from_ary_body(), iseq_build_from_ary_exception(), iseq_free(), iseq_mark(), iseq_memsize(), iseq_set_exception_table(), ivar_get(), mark_dump_arg(), mark_load_arg(), match_backref_number(), match_inspect(), mbstr_to_wstr(), memsize_of(), mktime_do(), mutex_free(), name_err_mesg_mark(), name_err_mesg_to_str(), name_to_backref_number(), nkf_xmalloc(), nkf_xrealloc(), nogvl_getaddrinfo(), nogvl_getnameinfo(), nogvl_ioctl(), ossl_asn1_get_asn1type(), ossl_sslctx_session_get_cb(), ossl_sslctx_session_new_cb(), ossl_sslctx_session_remove_cb(), pack_pack(), pack_unpack(), proc_mark(), r_object0(), rb_ary_modify(), rb_ary_replace(), rb_ary_sample(), rb_ary_shuffle_bang(), rb_ary_times(), rb_big2str0(), rb_dl_free(), rb_dl_malloc(), rb_dl_realloc(), rb_dlhandle_initialize(), rb_dlptr2cptr(), rb_dlptr_initialize(), rb_dlptr_malloc(), rb_dlptr_minus(), rb_dlptr_new2(), rb_dlptr_plus(), rb_dlptr_s_to_ptr(), rb_gc_guarded_ptr(), rb_ivar_set(), rb_name_err_mesg_new(), rb_obj_inspect(), rb_parser_calloc(), rb_parser_malloc(), rb_parser_realloc(), rb_random_bytes(), rb_realpath_internal(), rb_reg_casefold_p(), rb_reg_check(), rb_reg_desc(), rb_reg_equal(), rb_reg_initialize_m(), rb_reg_inspect(), rb_reg_named_captures(), rb_reg_names(), rb_reg_prepare_enc(), rb_reg_regsub(), rb_reg_search(), rb_reg_to_s(), rb_str_drop_bytes(), rb_str_each_char(), rb_str_each_codepoint(), rb_str_each_line(), rb_str_split_m(), rb_str_sum(), rb_string_value(), rb_struct_aref_id(), rb_struct_aset_id(), rb_struct_getmember(), rb_struct_set(), rb_thread_mark(), rb_vm_mark(), rb_w32_cmdvector(), rb_w32_conv_from_wstr(), rb_wait_for_single_fd(), readable(), recursive_eql(), recursive_equal(), recursive_hash(), reg_named_capture_assign_gen(), rehash(), ruby_atomic_compare_and_swap(), ruby_atomic_exchange(), skipspace(), sock_sockaddr(), st_cleanup_safe(), st_clear(), st_copy(), st_delete(), st_delete_safe(), st_foreach(), st_get_key(), st_hash(), st_insert(), st_insert2(), st_lookup(), st_shift(), str_make_independent_expand(), strio_alloc(), strio_close(), strio_close_read(), strio_close_write(), strio_closed(), strio_closed_read(), strio_closed_write(), strio_copy(), strio_each(), strio_each_byte(), strio_each_codepoint(), strio_eof(), strio_finalize(), strio_free(), strio_getbyte(), strio_getc(), strio_initialize(), strio_mark(), strio_memsize(), strio_putc(), strio_read(), strio_readlines(), strio_rewind(), strio_seek(), strio_set_pos(), strio_set_string(), strio_ungetbyte(), strio_ungetc(), strio_write(), strip_glibc_option(), strscan_do_scan(), syck_base64dec(), syck_io_str_read(), syck_parser_str(), sym_inspect(), sysopen_func(), thread_free(), thread_memsize(), time_mark(), time_mload(), transcode_char_start(), vm_expandarray(), vm_getivar(), vm_memsize(), vm_setivar(), w_objivar(), writable(), wstr_to_mbstr(), yaml_org_handler(), yielder_allocate(), yielder_init(), yielder_mark(), yielder_ptr(), and yielder_yield().

volatile VALUE q_dat

Definition at line 6993 of file tcltklib.c.

return Qfalse

Definition at line 6768 of file tcltklib.c.

Referenced by addrinfo_ip_p(), addrinfo_ipv4_loopback_p(), addrinfo_ipv4_multicast_p(), addrinfo_ipv4_p(), addrinfo_ipv4_private_p(), addrinfo_ipv6_p(), addrinfo_unix_p(), argf_binmode_p(), argf_eof(), basic_obj_respond_to(), big_op(), big_sparse_p(), BigDecimal_DoDivmod(), BigDecimal_IsFinite(), BigDecimal_IsNaN(), BigDecimal_mode(), BigDecimal_zero(), BigDecimalCmp(), bigdivrem(), bsock_do_not_rev_lookup(), bsock_do_not_reverse_lookup(), canonical(), case_when_optimizable_literal(), check_definition(), check_exec_fds(), cmp_between(), cmp_eq(), cmp_eq_recursive(), cmp_failed(), cmp_ge(), cmp_gt(), cmp_le(), cmp_lt(), compile_array_(), compile_cpath(), console_echo_p(), convert_type(), cParser_quirks_mode_p(), cState_allow_nan_p(), cState_ascii_only_p(), cState_check_circular_p(), cState_quirks_mode_p(), cState_to_h(), curses_bkgd(), curses_resizeterm(), curses_scrl(), curses_setscrreg(), d_lite_eql_p(), d_lite_equal(), date_s_valid_civil_p(), date_s_valid_commercial_p(), date_s_valid_jd_p(), date_s_valid_ordinal_p(), decode_bool(), DEFINE_ENUMFUNCS(), defined_expr(), dh_instance(), dsa_instance(), econv_equal(), enc_ascii_compatible_p(), enc_dummy_p(), enum_any(), enum_drop_while(), enum_member(), enum_one(), enumerator_init(), enumerator_rewind(), env_empty_p(), env_has_key(), env_has_value(), eql_i(), EVENTSINK_Invoke(), exc_equal(), exit_success_p(), extract_user_token(), f_one_p(), f_zero_p(), false_and(), false_or(), false_value(), false_xor(), fdbm_closed(), fdbm_empty_p(), fdbm_has_key(), fdbm_has_value(), fev_on_event(), fgdbm_closed(), fgdbm_empty_p(), fgdbm_has_key(), fgdbm_has_value(), fgdbm_set_syncmode(), file_s_fnmatch(), fix_equal(), fix_even_p(), fix_ge(), fix_gt(), fix_le(), fix_lt(), fix_odd_p(), fix_zero_p(), flo_eq(), flo_eql(), flo_ge(), flo_gt(), flo_is_finite_p(), flo_is_nan_p(), flo_le(), flo_lt(), flo_zero_p(), fole_respond_to(), folemethod_event(), foletype_initialize(), foletypelib_initialize(), foletypelib_visible(), fsdbm_closed(), fsdbm_empty_p(), fsdbm_has_key(), fsdbm_has_value(), gc_lazy_sweep(), gc_profile_enable_get(), gc_stress_get(), generate_json(), generic_ivar_defined(), hash_equal(), hist_empty_p(), iconv_convert(), iconv_try(), id2encidx(), id2ref(), if(), ignorecase_getter(), Init_fiddle(), Init_Object(), Init_openssl(), Init_ossl_pkcs12(), Init_ossl_pkcs7(), Init_ossl_ssl(), Init_ossl_x509ext(), Init_ossl_x509store(), int_even_p(), int_odd_p(), int_ossl_asn1_decode0_cons(), io_ready_p(), io_wait(), is_all_index_under(), is_one(), is_zero(), iseq_compile_each(), iseq_s_compile_file(), JSON_parse_value(), load_encoding(), make_compile_option(), make_econv_exception(), match_equal(), method_eq(), mnew(), mSyslog_isopen(), name_err_mesg_equal(), new_yield_gen(), nucomp_eql_p(), nucomp_false(), num_eql(), num_int_p(), num_zero_p(), numhash_each(), nurat_eqeq_p(), obj_respond_to(), obj_respond_to_missing(), ole_method_event(), ole_method_visible(), ole_param_flag_mask(), ole_type_visible(), ole_variable_visible(), ole_variant2val(), oleclass_from_typelib(), oletypelib_search_registry(), oletypelib_search_registry2(), opt_eq_func(), opt_W_getter(), ossl_asn1_decode0(), ossl_asn1_initialize(), ossl_asn1data_initialize(), ossl_asn1eoc_initialize(), ossl_bn_eql(), ossl_bn_is_bit_set(), ossl_bn_is_prime(), ossl_bn_is_prime_fasttest(), ossl_bn_s_generate_prime(), ossl_call_client_cert_cb(), ossl_call_tmp_dh_callback(), ossl_dh_check_params(), ossl_dh_is_private(), ossl_dh_is_public(), ossl_dh_new(), ossl_dh_s_generate(), ossl_dh_to_public_key(), ossl_dsa_is_private(), ossl_dsa_is_public(), ossl_dsa_new(), ossl_dsa_s_generate(), ossl_dsa_to_public_key(), ossl_dsa_verify(), ossl_pem_passwd_cb(), ossl_pkcs7_detached_p(), ossl_pkcs7_get_detached(), ossl_pkcs7_set_detached(), ossl_pkcs7_verify(), ossl_pkey_verify(), ossl_rand_status(), ossl_rsa_is_private(), ossl_rsa_new(), ossl_rsa_s_generate(), ossl_rsa_to_public_key(), ossl_spki_verify(), ossl_ssl_initialize(), ossl_ssl_session_eq(), ossl_ssl_session_reused(), ossl_sslctx_session_add(), ossl_sslctx_session_remove(), ossl_verify_cb(), ossl_x509_check_private_key(), ossl_x509_verify(), ossl_x509crl_verify(), ossl_x509ext_get_critical(), ossl_x509extfactory_create_ext(), ossl_x509name_eql(), ossl_x509req_verify(), ossl_x509stctx_verify(), p_gid_exchangeable(), p_gid_have_saved_id(), p_uid_exchangeable(), p_uid_have_saved_id(), parse(), parse_ddd_cb(), parse_main(), parser_initialize(), path_eq(), prepare_iseq_build(), proc_curry(), proc_eq(), proc_options(), process_options(), pst_success_p(), pst_wcoredump(), pst_wifexited(), pst_wifsignaled(), pst_wifstopped(), r_le(), r_lt(), r_object0(), rand_range(), random_equal(), random_rand(), range_cover(), range_each(), range_each_func(), range_eq(), range_eql(), range_exclude_end_p(), range_include(), range_step(), range_values(), rb_add_method(), rb_ary_aref(), rb_ary_empty_p(), rb_ary_eql(), rb_ary_equal(), rb_ary_frozen_p(), rb_ary_includes(), rb_autoload_load(), rb_barrier_wait(), rb_big_eq(), rb_big_eql(), rb_big_even_p(), rb_big_odd_p(), rb_class_inherited_p(), rb_const_defined_0(), rb_cvar_defined(), rb_digest_instance_equal(), rb_dlhandle_close_enabled_p(), rb_dlptr_eql(), rb_dlptr_null_p(), rb_equal(), rb_exec_arg_addopt(), rb_exec_arg_prepare(), rb_f_block_given_p(), rb_f_exec(), rb_f_exit(), rb_f_exit_bang(), rb_f_rand(), rb_f_system(), rb_f_test(), rb_false(), rb_fiber_alive_p(), rb_file_blockdev_p(), rb_file_chardev_p(), rb_file_directory_p(), rb_file_executable_p(), rb_file_executable_real_p(), rb_file_exist_p(), rb_file_file_p(), rb_file_flock(), rb_file_grpowned_p(), rb_file_identical_p(), rb_file_owned_p(), rb_file_pipe_p(), rb_file_readable_p(), rb_file_readable_real_p(), rb_file_rowned_p(), rb_file_sgid_p(), rb_file_socket_p(), rb_file_suid_p(), rb_file_symlink_p(), rb_file_writable_p(), rb_file_writable_real_p(), rb_file_zero_p(), rb_gc_disable(), rb_gc_enable(), rb_get_values_at(), rb_gvar_defined(), rb_gzfile_closed_p(), rb_gzfile_eof_p(), rb_gzfile_sync(), rb_hash_compare_by_id_p(), rb_hash_empty_p(), rb_hash_has_key(), rb_hash_has_value(), rb_inflate_sync_point_p(), rb_io_autoclose_p(), rb_io_binmode_p(), rb_io_closed(), rb_io_eof(), rb_io_initialize(), rb_io_isatty(), rb_io_sync(), rb_iseq_compile_with_option(), rb_iseq_new_with_opt(), rb_ivar_defined(), rb_load_internal(), rb_mod_attr(), rb_mod_gt(), rb_mod_include_p(), rb_mod_lt(), rb_mod_method_defined(), rb_mutex_abandon_locking_mutex(), rb_mutex_lock(), rb_mutex_locked_p(), rb_mutex_trylock(), rb_obj_equal(), rb_obj_frozen_p(), rb_obj_is_fiber(), rb_obj_is_instance_of(), rb_obj_is_kind_of(), rb_obj_is_method(), rb_obj_is_mutex(), rb_obj_is_proc(), rb_obj_is_thread(), rb_obj_not(), rb_obj_not_equal(), rb_obj_not_match(), rb_obj_tainted(), rb_obj_untrusted(), rb_parser_end_seen_p(), rb_parser_get_yydebug(), rb_proc_lambda_p(), rb_range_beg_len(), rb_range_values(), rb_reg_casefold_p(), rb_reg_eqq(), rb_reg_equal(), rb_reg_fixed_encoding_p(), rb_reg_nth_defined(), rb_require_safe(), rb_reset_coverages(), rb_run_exec_options_err(), rb_stat_b(), rb_stat_c(), rb_stat_d(), rb_stat_f(), rb_stat_grpowned(), rb_stat_l(), rb_stat_owned(), rb_stat_p(), rb_stat_r(), rb_stat_R(), rb_stat_rowned(), rb_stat_S(), rb_stat_sgid(), rb_stat_sticky(), rb_stat_suid(), rb_stat_w(), rb_stat_W(), rb_stat_x(), rb_stat_X(), rb_stat_z(), rb_str_aref(), rb_str_associated(), rb_str_empty(), rb_str_end_with(), rb_str_eql(), rb_str_equal(), rb_str_include(), rb_str_is_ascii_only_p(), rb_str_start_with(), rb_str_valid_encoding_p(), rb_struct_eql(), rb_struct_equal(), rb_thread_abort_exc(), rb_thread_alive_p(), rb_thread_key_p(), rb_thread_s_abort_exc(), rb_thread_status(), rb_thread_stop_p(), rb_to_float(), rb_zstream_closed_p(), rb_zstream_finished_p(), recursive_check(), recursive_eql(), recursive_equal(), rsa_instance(), rsock_revlookup_flag(), ruby_executable_node(), s3e(), setup_args(), setup_narg(), singleton_class_of(), sockopt_bool(), sockopt_linger(), str_byte_aref(), str_eql(), strio_closed(), strio_closed_read(), strio_closed_write(), strio_eof(), strio_false(), strscan_bol_p(), strscan_eos_p(), strscan_matched_p(), strscan_rest_p(), switch(), sym_equal(), sym_to_proc(), syserr_eqq(), Tcl_GetCommandInfo(), tcl_protect_core(), test_fdset(), thgroup_enclosed_p(), thread_cleanup_func(), thread_create_core(), thread_free(), thread_join_sleep(), thread_start_func_2(), time_eql(), time_isdst(), time_to_a(), time_utc_p(), true_and(), true_xor(), udp_connect_internal(), w_encoding(), w_object(), when_vals(), window_bkgd(), window_resize(), window_scrl(), window_scroll(), window_setscrreg(), yaml_org_handler(), and zstream_sync().

return Qnil
Initial value:
{
#define Qnil
Definition: ruby.h:367
static VALUE eventloop_thread
Definition: tcltklib.c:466

Definition at line 1365 of file tcltklib.c.

return Qtrue

Definition at line 9597 of file tcltklib.c.

Referenced by addrinfo_ip_p(), addrinfo_ipv4_loopback_p(), addrinfo_ipv4_multicast_p(), addrinfo_ipv4_p(), addrinfo_ipv4_private_p(), addrinfo_ipv6_p(), addrinfo_unix_p(), argf_binmode_p(), argf_eof(), ary_add_hash(), asn1integer_to_num(), basic_obj_respond_to(), big_op(), big_sparse_p(), BigDecimal_DoDivmod(), BigDecimal_IsFinite(), BigDecimal_IsNaN(), BigDecimal_mode(), BigDecimal_zero(), BigDecimalCmp(), bsock_do_not_rev_lookup(), bsock_do_not_reverse_lookup(), canonical(), check_definition(), check_exec_fds(), check_funcall(), cleanup_iseq_build(), cmp_between(), cmp_eq(), cmp_equal(), cmp_ge(), cmp_gt(), cmp_le(), cmp_lt(), compile_array_(), compile_cpath(), console_echo_p(), convert_type(), cParser_quirks_mode_p(), cState_allow_nan_p(), cState_ascii_only_p(), cState_check_circular_p(), cState_quirks_mode_p(), cState_to_h(), curses_bkgd(), curses_resizeterm(), curses_scrl(), curses_setscrreg(), d_lite_equal(), date_s__parse_internal(), date_s_parse(), date_s_valid_civil_p(), date_s_valid_commercial_p(), date_s_valid_jd_p(), date_s_valid_ordinal_p(), datetime_s_parse(), decode_bool(), DEFINE_ENUMFUNCS(), defined_expr(), drop_while_i(), DupPrivPKeyPtr(), econv_equal(), enc_ascii_compatible_p(), enc_dummy_p(), enum_all(), enum_none(), env_empty_p(), env_has_key(), env_has_value(), EVENTSINK_Invoke(), exc_equal(), exit_success_p(), false_or(), false_xor(), fdbm_closed(), fdbm_empty_p(), fdbm_has_key(), fdbm_has_value(), fev_on_event_with_outargs(), fgdbm_closed(), fgdbm_empty_p(), fgdbm_has_key(), fgdbm_has_value(), fgdbm_set_syncmode(), file_s_fnmatch(), finish_writeconv(), fix_equal(), fix_even_p(), fix_ge(), fix_gt(), fix_le(), fix_lt(), fix_odd_p(), fix_zero_p(), flatten(), flo_eq(), flo_eql(), flo_ge(), flo_gt(), flo_is_finite_p(), flo_is_nan_p(), flo_le(), flo_lt(), flo_zero_p(), fole_respond_to(), folemethod_event_interface(), foletypelib_initialize(), foletypelib_visible(), fptr_finalize(), fsdbm_closed(), fsdbm_empty_p(), fsdbm_has_key(), fsdbm_has_value(), garbage_collect(), gc_lazy_sweep(), gc_profile_enable_get(), gc_stress_get(), generate_json(), generic_ivar_defined(), GetPrivPKeyPtr(), goruby_run_node(), hash_equal(), hist_empty_p(), id2encidx(), id2ref(), if(), Init_fiddle(), Init_Object(), Init_ossl_asn1(), initialize(), int_even_p(), int_int_p(), int_odd_p(), int_ossl_asn1_decode0_cons(), io_ready_p(), io_wait(), is_all_index_under(), iseq_compile_each(), JSON_parse_value(), make_compile_option(), make_econv_exception(), match_equal(), member_i(), method_eq(), mnew(), mSyslog_isopen(), name_err_mesg_equal(), new_yield_gen(), NIL_P(), num_equal(), num_real_p(), num_zero_p(), numhash_each(), numhash_i(), nurat_eqeq_p(), obj_respond_to(), ole_method_event(), ole_method_visible(), ole_param_flag_mask(), ole_set_safe_array(), ole_type_visible(), ole_variable_visible(), ole_variant2val(), oleclass_from_typelib(), oletypelib_search_registry(), oletypelib_search_registry2(), opt_eq_func(), opt_W_getter(), ossl_asn1_decode0(), ossl_asn1cons_to_der(), ossl_asn1data_to_der(), ossl_asn1obj_s_register(), ossl_bn_eql(), ossl_bn_is_bit_set(), ossl_bn_is_prime(), ossl_bn_is_prime_fasttest(), ossl_bn_to_i(), ossl_call_client_cert_cb(), ossl_call_tmp_dh_callback(), ossl_debug(), ossl_debug_set(), ossl_dh_check_params(), ossl_dh_is_private(), ossl_dh_is_public(), ossl_dsa_is_private(), ossl_dsa_is_public(), ossl_dsa_verify(), ossl_make_error(), ossl_pem_passwd_cb(), ossl_pkcs7_detached_p(), ossl_pkcs7_get_detached(), ossl_pkcs7_set_detached(), ossl_pkcs7_verify(), ossl_pkey_sign(), ossl_pkey_verify(), ossl_rand_egd(), ossl_rand_egd_bytes(), ossl_rand_load_file(), ossl_rand_status(), ossl_rand_write_file(), ossl_rsa_is_private(), ossl_rsa_is_public(), ossl_spki_verify(), ossl_ssl_session_eq(), ossl_ssl_session_reused(), ossl_ssl_setup(), ossl_sslctx_session_add(), ossl_sslctx_session_remove(), ossl_sslctx_setup(), ossl_verify_cb(), ossl_x509_check_private_key(), ossl_x509_verify(), ossl_x509crl_verify(), ossl_x509ext_get_critical(), ossl_x509name_eql(), ossl_x509req_verify(), ossl_x509stctx_verify(), p_gid_exchangeable(), p_gid_have_saved_id(), p_uid_exchangeable(), p_uid_have_saved_id(), parse(), parser_nextc(), parser_yylex(), prelude_eval(), prepare_iseq_build(), proc_curry(), proc_eq(), proc_options(), process_options(), process_sflag(), pst_equal(), pst_success_p(), pst_wcoredump(), pst_wifexited(), pst_wifsignaled(), pst_wifstopped(), r_le(), r_lt(), r_object0(), random_equal(), range_cover(), range_each(), range_eq(), range_eql(), range_exclude_end_p(), range_include(), range_step(), rb_ary_empty_p(), rb_ary_eql(), rb_ary_equal(), rb_ary_frozen_p(), rb_ary_includes(), rb_ary_slice_bang(), rb_barrier_wait(), rb_big_eq(), rb_big_eql(), rb_big_even_p(), rb_big_odd_p(), rb_big_stop(), rb_class_inherited_p(), rb_const_defined_0(), rb_cvar_defined(), rb_digest_instance_equal(), rb_dlhandle_close_enabled_p(), rb_dlptr_eql(), rb_dlptr_null_p(), rb_equal(), rb_exec_arg_addopt(), rb_exec_arg_prepare(), rb_f_block_given_p(), rb_f_exit(), rb_f_exit_bang(), rb_f_load(), rb_f_system(), rb_f_test(), rb_fiber_alive_p(), rb_file_blockdev_p(), rb_file_chardev_p(), rb_file_directory_p(), rb_file_executable_p(), rb_file_executable_real_p(), rb_file_exist_p(), rb_file_file_p(), rb_file_grpowned_p(), rb_file_identical_p(), rb_file_owned_p(), rb_file_pipe_p(), rb_file_readable_p(), rb_file_readable_real_p(), rb_file_rowned_p(), rb_file_socket_p(), rb_file_symlink_p(), rb_file_writable_p(), rb_file_writable_real_p(), rb_file_zero_p(), rb_gc_disable(), rb_gc_enable(), rb_gvar_defined(), rb_gzfile_closed_p(), rb_gzfile_eof_p(), rb_gzfile_sync(), rb_hash_compare_by_id_p(), rb_hash_empty_p(), rb_hash_has_key(), rb_hash_search_value(), rb_inflate_sync_point_p(), rb_io_autoclose_p(), rb_io_binmode_p(), rb_io_closed(), rb_io_eof(), rb_io_isatty(), rb_io_sync(), rb_ivar_defined(), rb_mod_attr(), rb_mod_const_defined(), rb_mod_const_get(), rb_mod_constants(), rb_mod_include_p(), rb_mod_method_defined(), rb_mutex_locked_p(), rb_mutex_trylock(), rb_obj_equal(), rb_obj_freeze(), rb_obj_frozen_p(), rb_obj_is_fiber(), rb_obj_is_instance_of(), rb_obj_is_kind_of(), rb_obj_is_method(), rb_obj_is_mutex(), rb_obj_is_proc(), rb_obj_is_thread(), rb_obj_methods(), rb_obj_not(), rb_obj_not_equal(), rb_obj_not_match(), rb_obj_respond_to(), rb_obj_singleton_methods(), rb_obj_tainted(), rb_obj_untrusted(), rb_parser_end_seen_p(), rb_parser_get_yydebug(), rb_proc_lambda_p(), rb_range_beg_len(), rb_range_values(), rb_reg_casefold_p(), rb_reg_eqq(), rb_reg_equal(), rb_reg_fixed_encoding_p(), rb_reg_nth_defined(), rb_require_safe(), rb_stat_b(), rb_stat_c(), rb_stat_d(), rb_stat_f(), rb_stat_grpowned(), rb_stat_l(), rb_stat_owned(), rb_stat_p(), rb_stat_r(), rb_stat_R(), rb_stat_rowned(), rb_stat_S(), rb_stat_sgid(), rb_stat_sticky(), rb_stat_suid(), rb_stat_w(), rb_stat_W(), rb_stat_x(), rb_stat_X(), rb_stat_z(), rb_str_empty(), rb_str_end_with(), rb_str_eql(), rb_str_equal(), rb_str_include(), rb_str_is_ascii_only_p(), rb_str_start_with(), rb_str_valid_encoding_p(), rb_struct_eql(), rb_struct_equal(), rb_thread_abort_exc(), rb_thread_alive_p(), rb_thread_key_p(), rb_thread_s_abort_exc(), rb_thread_stop_p(), rb_to_float(), rb_true(), rb_vm_set_finish_env(), rb_zstream_closed_p(), rb_zstream_finished_p(), recursive_check(), recursive_eql(), recursive_equal(), recursive_push(), rsock_revlookup_flag(), ruby_executable_node(), save_env(), set_canonical(), setup_narg(), singleton_class_of(), sockopt_bool(), sockopt_linger(), str_eql(), strio_closed(), strio_closed_read(), strio_closed_write(), strio_eof(), strio_get_sync(), strscan_bol_p(), strscan_eos_p(), strscan_matched_p(), strscan_rest_p(), switch(), syck_parser_assign_io(), sym_equal(), syserr_eqq(), tcl_protect_core(), test_fdset(), test_select(), thgroup_enclosed_p(), thread_join_sleep(), time_isdst(), time_to_a(), time_utc_p(), tr_setup_table(), tr_trans(), true_and(), true_or(), true_value(), true_xor(), udp_connect_internal(), verbose_setter(), w_encoding(), w_object(), window_attroff(), window_attron(), window_attrset(), window_bkgd(), window_resize(), window_scrl(), window_scroll(), window_setscrreg(), yaml_org_handler(), and zstream_sync().

rb_debug_bup = ruby_debug

Definition at line 5678 of file tcltklib.c.

Referenced by if(), and Tcl_GetCommandInfo().

rb_thread_critical = thr_crit_bup

Definition at line 1593 of file tcltklib.c.

Referenced by if(), switch(), tcl_protect_core(), and while().

rb_trap_immediate = 0

Definition at line 3374 of file tcltklib.c.

rb_verbose_bup = ruby_verbose

Definition at line 5678 of file tcltklib.c.

Referenced by if(), and Tcl_GetCommandInfo().

int rbtk_eventloop_depth = 0
static

Definition at line 1371 of file tcltklib.c.

Referenced by for(), if(), pending_exception_check0(), and while().

rbtk_internal_eventloop_handler = 0
static

Definition at line 1372 of file tcltklib.c.

Referenced by if(), and pending_exception_check0().

rbtk_pending_exception = Qnil
static

Definition at line 1370 of file tcltklib.c.

Referenced by for(), if(), Init_tcltklib(), pending_exception_check0(), switch(), and tcl_protect_core().

return receiver = rb_gv_get(buf)

Definition at line 3565 of file tcltklib.c.

slave ref_count = 0

Definition at line 6158 of file tcltklib.c.

int req_timer_tick = DEFAULT_TIMER_TICK
static

Definition at line 527 of file tcltklib.c.

Referenced by for().

char * result = (VALUE)NULL

Definition at line 7059 of file tcltklib.c.

Referenced by ary_join_1(), ary_make_partial(), ary_reject(), ary_reject_bang(), code_status(), cParser_parse_quirks_mode(), cParser_parse_strict(), cState_generate(), cState_to_h(), date_strftime_with_tmx(), DEFINE_ENUMFUNCS(), do_select(), econv_convpath(), enum_all(), enum_any(), enum_max(), enum_min(), enum_none(), enum_one(), enum_zip(), env_rassoc(), env_select(), env_values_at(), eval_string_with_cref(), EVENTSINK_Invoke(), exec_recursive(), exec_recursive_i(), fbuffer_dup(), fbuffer_to_s(), filename_completion_proc_call(), finish_overlapped_socket(), fix_string_encoding(), flatten(), fole_each(), fstrndup(), gc_profile_result(), get_user_from_path(), gmtime_with_leapsecond(), gmtimew(), h_conv(), if(), init_leap_second_info(), initialize(), json_string_unescape(), kanji_convert(), localtime_with_gmtoff_zone(), localtimew(), method_missing(), mString_included_s(), mString_to_json_raw_object(), next_i(), ole_invoke(), ole_invoke2(), onig_st_insert_strend(), ossl_bn_s_generate_prime(), ossl_x509name_cmp(), ossl_x509name_eql(), ossl_x509stctx_verify(), ossl_x509store_verify(), p_gamma(), parser_yylex(), permute0(), proc_waitall(), q_gamma(), rb_ary_drop(), rb_ary_flatten(), rb_ary_flatten_bang(), rb_ary_join(), rb_ary_pop_m(), rb_ary_product(), rb_ary_sample(), rb_ary_select(), rb_ary_shift_m(), rb_ary_transpose(), rb_ary_zip(), rb_cstr_to_inum(), rb_dlcfunc_call(), rb_enc_sprintf(), rb_enc_vsprintf(), rb_ensure(), rb_equal(), rb_f_backquote(), rb_file_expand_path_internal(), rb_file_join(), rb_get_values_at(), rb_gmtime_r2(), rb_hash_select(), rb_hash_values_at(), rb_home_dir(), rb_io_inspect(), rb_localtime_r2(), rb_method_call_with_block(), rb_name_err_mesg_new(), rb_obj_not_equal(), rb_obj_not_match(), rb_protect(), rb_reg_match_m(), rb_reg_preprocess_dregexp(), rb_reg_search(), rb_require_safe(), rb_rescue2(), rb_sprintf(), rb_str_cmp_m(), rb_str_crypt(), rb_str_dump(), rb_str_format(), rb_str_inspect(), rb_str_match_m(), rb_str_scan(), rb_str_slice_bang(), rb_str_split_m(), rb_strftime_with_timespec(), rb_struct_select(), rb_thread_wait_fd_rw(), rb_vm_make_jump_tag_but_local_jump(), rb_waitpid(), rb_waitpid_blocking(), rcombinate0(), readline_attempted_completion_function(), readline_readline(), recursive_join(), rpermute0(), ruby__sfvwrite(), scan_once(), strtol(), take_items(), thread_suppress_tracing(), time_add(), ttymode(), unescape_unicode(), username_completion_proc_call(), vm_exec(), zip_ary(), and zip_i().

return ret
Initial value:
{
char *buf = strdup(cmd)
unsigned char buf[MIME_BUF_SIZE]
Definition: nkf.c:3913
#define strdup(s)
Definition: util.h:69
const char * cmd
Definition: tcltklib.c:274

Definition at line 276 of file tcltklib.c.

Referenced by accept_blocking(), addrinfo_firstonly_new(), addrinfo_inspect(), addrinfo_ip_address(), addrinfo_ip_unpack(), addrinfo_list_new(), addrinfo_s_ip(), addrinfo_to_sockaddr(), BigDecimal_save_exception_mode(), BigDecimal_save_limit(), BigDecimal_save_rounding_mode(), BigDecimal_to_i(), bmcall(), BSD_vfprintf(), bytestring_alloc(), call_asynchronous(), callback(), coderange_scan(), constant_arg(), date_s_civil(), date_s_commercial(), date_s_jd(), date_s_ordinal(), date_s_today(), datetime_s_civil(), datetime_s_commercial(), datetime_s_jd(), datetime_s_now(), datetime_s_ordinal(), decode_bstr(), decode_enum(), decode_int(), decode_obj(), decode_time(), do_lstat(), do_stat(), econv_convert(), econv_finish(), econv_get_replacement(), econv_insert_output(), econv_set_replacement(), enc_succ_alnum_char(), fcntl(), fdbm_delete_if(), fgdbm_delete_if(), fsdbm_delete_if(), h_conv(), hash2result(), Init_tcltklib(), initialize(), insn_operand_intern(), inspect_sockaddr(), io_read_nonblock(), io_readpartial(), is_console(), is_pipe(), is_readable_console(), is_readable_pipe(), iseq_s_disasm(), kill(), link(), make_inspectname(), maygvl_copy_stream_wait_read(), new_child_iseq(), nogvl_copy_stream_func(), nogvl_copy_stream_read_write(), nogvl_copy_stream_wait_write(), nogvl_getaddrinfo(), numhash_i(), ole_param_flag_mask(), ole_search_event_at(), onigenc_mbclen_approximate(), ossl_asn1_decode(), ossl_asn1_get_asn1type(), ossl_asn1_is_explicit(), ossl_asn1_tag_class(), ossl_asn1obj_get_ln(), ossl_asn1obj_get_sn(), ossl_cipher_new(), ossl_digest_new(), ossl_dsa_verify(), ossl_membio2str(), ossl_membio2str0(), ossl_pkcs7_s_encrypt(), ossl_pkcs7_s_read_smime(), ossl_pkcs7_s_sign(), ossl_pkcs7_sym2typeid(), ossl_protect_obj2bio(), ossl_ssl_get_state(), ossl_start_ssl(), ossl_verify_cb(), ossl_x509attr_get_oid(), ossl_x509crl_verify(), ossl_x509ext_get_oid(), ossl_x509ext_get_value(), ossl_x509name_to_a(), output_hex_charref(), output_replacement_character(), overlapped_socket_io(), quo(), rand_int(), rb_chsize(), rb_cloexec_fcntl_dupfd(), rb_dlhandle_close(), rb_econv_convert(), rb_econv_init_by_convpath(), rb_econv_init_by_convpath_i(), rb_econv_open_by_transcoder_entries(), rb_econv_open_opts(), rb_enc_strlen_cr(), rb_exec(), rb_f_p(), rb_file_load_ok(), rb_getaddrinfo(), rb_getnameinfo(), rb_hash_dup(), rb_io_s_pipe(), rb_iseq_compile_node(), rb_maygvl_fd_fix_cloexec(), rb_pipe(), rb_proc_exec(), rb_proc_exec_n(), rb_reg_initialize_str(), rb_remove_event_hook(), rb_str_coderange_scan_restartable(), rb_str_ellipsize(), rb_str_to_dbl(), rb_str_to_inum(), rb_syck_compile(), rb_thread_flock(), rb_threadptr_remove_event_hook(), rb_w32_aspawn_flags(), rb_w32_fdisset(), rb_w32_fstat(), rb_w32_fstati64(), rb_w32_mkdir(), rb_w32_open(), rb_w32_opendir(), rb_w32_pipe(), rb_w32_read(), rb_w32_rename(), rb_w32_rmdir(), rb_w32_spawn(), rb_w32_stati64(), rb_w32_truncate(), rb_w32_uchdir(), rb_w32_uchmod(), rb_w32_ulink(), rb_w32_umkdir(), rb_w32_unlink(), rb_w32_uopen(), rb_w32_uopendir(), rb_w32_urename(), rb_w32_urmdir(), rb_w32_ustati64(), rb_w32_utime(), rb_w32_uunlink(), rb_w32_uutime(), rb_w32_write(), realpath_rec(), recvmsg(), rsock_fd_socket_addrinfo(), RUBY_ALIAS_FUNCTION(), ruby_dtoa(), ruby_snprintf(), ruby_strtod(), ruby_strtoul(), ruby_vsnprintf(), run_exec_close(), run_exec_dup2(), run_exec_dup2_child(), run_exec_open(), s_iconv(), scan_digits(), sendmsg(), sip_hash_final(), sock_s_getaddrinfo(), socketpair_internal(), sockopt_inspect(), stack_check(), strscan_do_scan(), syck_lookup_sym(), syck_yaml2byte(), tcl_protect_core(), tcltklib_compile_info(), time_to_date(), time_to_datetime(), timegmw_noleapsecond(), transcode_loop(), u8to64_le(), udp_connect(), unicode_iconv(), unicode_to_jis_common(), validate_label(), w16e_conv(), w2e_conv(), w_iconv(), wait_connectable(), waitpid(), wmkdir(), wquo(), wrmdir(), wstati64(), wunlink(), wutime(), x0212_shift(), and x0212_unshift().

return

Definition at line 2536 of file tcltklib.c.

ptr return_value = 0

Definition at line 6160 of file tcltklib.c.

VALUE retval
ruby_debug = rb_debug_bup
ruby_verbose = rb_verbose_bup
run_timer_flag = 0
static

Definition at line 528 of file tcltklib.c.

int safe
ivq safe_level = rb_safe_level()

Definition at line 7185 of file tcltklib.c.

Referenced by safe_setter().

VALUE safemode = argv[1]

Definition at line 6391 of file tcltklib.c.

static VALUE VALUE self
static
Initial value:
{
static VALUE INT2NUM(int v)
Definition: ruby.h:981
static int timer_tick
Definition: tcltklib.c:526

Definition at line 765 of file tcltklib.c.

Referenced by strscan_init_copy().

struct tcltkip * slave
Initial value:
{
static int int thr_crit_bup
Definition: tcltklib.c:1409

Definition at line 5591 of file tcltklib.c.

Referenced by chfunc(), and establishShell().

char* slave_list

Definition at line 5596 of file tcltklib.c.

slave_name = objv[1]

Definition at line 5597 of file tcltklib.c.

VALUE src

Definition at line 6139 of file tcltklib.c.

Initial value:
{
volatile VALUE klass = rb_cObject
unsigned long VALUE
Definition: ruby.h:88
RUBY_EXTERN VALUE rb_cObject
Definition: ruby.h:1246
klass
Definition: tcltklib.c:3493

Definition at line 1453 of file tcltklib.c.

return status
volatile VALUE str = argv[1]
static

Definition at line 3536 of file tcltklib.c.

volatile VALUE strval
Initial value:
{
char *ret
int ret
Definition: tcltklib.c:276

Definition at line 9352 of file tcltklib.c.

struct timeval t

Definition at line 2184 of file tcltklib.c.

struct timeval t0 t1
return table
static
Initial value:
{
return create_dummy_encoding_for_tk_core(interp, name, Qtrue)
static int Tcl_Interp * interp
Definition: tcltklib.c:273
return Qtrue
Definition: tcltklib.c:9597
const char * name
Definition: nkf.c:208

Definition at line 10121 of file tcltklib.c.

Referenced by define_final(), get_insn_info(), insn_make_insn_table(), rb_gc_copy_finalizer(), rb_iseq_translate_threaded_code(), rb_str_count(), run_final(), scan_digits(), st_foreach_safe(), tr_find(), tr_setup_table(), and unpack_entries().

int taint_flag = OBJ_TAINTED(list_str)

Definition at line 9704 of file tcltklib.c.

VALUE target
return TCL_ERROR

Definition at line 3943 of file tcltklib.c.

Referenced by if(), switch(), and tcl_protect_core().

return TCL_OK
Initial value:
{
static int Tcl_Interp * interp
Definition: tcltklib.c:273
Tcl_ResetResult(interp)

Definition at line 3988 of file tcltklib.c.

Referenced by if(), switch(), and tcl_protect_core().

Tcl_SetMaxBlockTime& tcl_time

Definition at line 1885 of file tcltklib.c.

Referenced by rbtk_EventSetupProc().

int* tclDummyMathPtr = (int *) matherr

Definition at line 391 of file tcltklib.c.

struct { ... } tcltk_version

Referenced by set_tcltk_version().

VALUE tcltkip_class
static

Definition at line 216 of file tcltklib.c.

const char tcltklib_release_date[] = TCLTKLIB_RELEASE_DATE
static

Definition at line 174 of file tcltklib.c.

VALUE th = rb_thread_create(_thread_call_proc, (void*)q)
static

Definition at line 2937 of file tcltklib.c.

Referenced by check_deadlock_i(), clear_trace_func_i(), cont_capture(), cont_mark(), cont_new(), cont_restore_thread(), cont_save_thread(), do_select(), err_append(), error_handle(), error_print(), exec_interrupts(), gc_marks(), init_heap(), Init_VM(), lock_func(), method_entry_of_iseq(), proc_new(), process_options(), rb_add_method(), rb_binding_new(), rb_block_given_p(), rb_dvar_defined(), rb_errinfo(), rb_exec_end_proc(), rb_fiber_reset_root_local_storage(), rb_frame_caller(), rb_frame_pop(), rb_iseq_compile_with_option(), rb_iseq_new_main(), rb_last_status_set(), rb_load_internal(), rb_local_defined(), rb_longjmp(), rb_memerror(), rb_method_call_with_block(), rb_mutex_lock(), rb_protect(), rb_raise_jump(), rb_require_safe(), rb_rescue2(), rb_set_end_proc(), rb_set_safe_level(), rb_thread_abort_exc(), rb_thread_abort_exc_set(), rb_thread_alive_p(), rb_thread_atfork_internal(), rb_thread_backtrace(), rb_thread_blocking_region(), rb_thread_blocking_region_begin(), rb_thread_blocking_region_end(), rb_thread_call_with_gvl(), rb_thread_execute_interrupts(), rb_thread_group(), rb_thread_inspect(), rb_thread_interrupted(), rb_thread_io_blocking_region(), rb_thread_key_p(), rb_thread_keys(), rb_thread_kill(), rb_thread_local_aref(), rb_thread_local_aset(), rb_thread_polling(), rb_thread_priority(), rb_thread_priority_set(), rb_thread_safe_level(), rb_thread_schedule_limits(), rb_thread_status(), rb_thread_stop_p(), rb_thread_terminate_all(), rb_thread_wait_for(), rb_thread_wakeup_alive(), rb_threadptr_exec_event_hooks(), rb_vmdebug_stack_dump_raw_current(), rb_vmdebug_stack_dump_th(), rb_vmdebug_thread_dump_regs(), rb_vmdebug_thread_dump_state(), remove_from_join_list(), require_libraries(), ruby_cleanup(), ruby_exec_internal(), ruby_stack_length(), ruby_thread_has_gvl_p(), ruby_thread_init(), safe_setter(), set_relation(), set_threads_event_flags_i(), slot_sweep(), stack_check(), terminate_atfork_before_exec_i(), terminate_atfork_i(), terminate_i(), thgroup_add(), thgroup_list_i(), thread_add_trace_func_m(), thread_alloc(), thread_cleanup_func(), thread_cleanup_func_before_exec(), thread_create_core(), thread_fd_close_i(), thread_free(), thread_initialize(), thread_join(), thread_join_sleep(), thread_list_i(), thread_raise_m(), thread_s_new(), thread_set_trace_func_m(), thread_value(), thval2thread_t(), timer_thread_function(), top_include(), vm_search_superclass(), vm_svar_get(), and vm_svar_set().

int thr_crit_bup = rb_thread_critical
static

Definition at line 1409 of file tcltklib.c.

Referenced by if(), switch(), and tcl_protect_core().

ivq thread = current_thread
VALUE tick
Initial value:
{
return Qfalse;
} else {
return Qtrue;
}
}
static VALUE
VALUE self
unsigned long VALUE
Definition: ruby.h:88
return Qtrue
Definition: tcltklib.c:9597
return Qfalse
Definition: tcltklib.c:6768
static int window_event_mode
Definition: tcltklib.c:472

Definition at line 1671 of file tcltklib.c.

VALUE time
timer_tick = DEFAULT_TIMER_TICK
static

Definition at line 526 of file tcltklib.c.

Tcl_TimerToken timer_token = (Tcl_TimerToken)NULL
static

Definition at line 1597 of file tcltklib.c.

Referenced by for(), if(), and while().

Tk_Window tkwin = (Tk_Window) clientData

Definition at line 5079 of file tcltklib.c.

t tv_sec = 0

Definition at line 2063 of file tcltklib.c.

t tv_usec = (long)(no_event_wait*1000.0)

Definition at line 2064 of file tcltklib.c.

int type
int unknown_flag = 0

Definition at line 8558 of file tcltklib.c.

args update_flag = update_flag

Definition at line 2177 of file tcltklib.c.

Referenced by for().

CONST char* updateOptions[] = {"idletasks", (char *) NULL}
static

Definition at line 3883 of file tcltklib.c.

Definition at line 8950 of file tcltklib.c.

va_dcl
Initial value:
{
va_list args
VALUE VALUE args
Definition: tcltklib.c:2550

Definition at line 840 of file tcltklib.c.

VALUE VALUE val
static

Definition at line 1919 of file tcltklib.c.

static int VALUE value = argv[2]
VALUE var
VALUE varname = argv[0]

Definition at line 9298 of file tcltklib.c.

VALUE wait
watchdog_thread = rb_thread_current()
static

Definition at line 474 of file tcltklib.c.

Tk_Window window
Initial value:
{
Tk_Window tkwin = (Tk_Window) clientData
static void ClientData clientData
Definition: tcltklib.c:1603
Tk_Window tkwin
Definition: tcltklib.c:5079

Definition at line 4464 of file tcltklib.c.

Referenced by prep_window(), window_initialize(), and window_subwin().

int window_event_mode = ~0
static

Definition at line 472 of file tcltklib.c.

int with_tk = 1

Definition at line 6140 of file tcltklib.c.