#include "ruby.h"#include "ruby/encoding.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 |
Defines | |
| #define | TCLTKLIB_RELEASE_DATE "2010-08-25" |
| #define | RbTk_OBJ_UNTRUST(x) OBJ_TAINT(x) |
| #define | va_init_list(a, b) va_start(a) |
| #define | RUBY_USE_NATIVE_THREAD 1 |
| #define | TCL_ALPHA_RELEASE 0 |
| #define | TCL_BETA_RELEASE 1 |
| #define | TCL_FINAL_RELEASE 2 |
| #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 | 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 1 |
| #define | DEFAULT_EVENT_LOOP_MAX 800 |
| #define | DEFAULT_NO_EVENT_TICK 10 |
| #define | DEFAULT_NO_EVENT_WAIT 5 |
| #define | WATCHDOG_INTERVAL 10 |
| #define | DEFAULT_TIMER_TICK 0 |
| #define | NO_THREAD_INTERRUPT_TIME 100 |
| #define | EVENT_HANDLER_TIMEOUT 100 |
| #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 |
Functions | |
| VALUE rb_proc_new | _ ((VALUE(*)(ANYARGS), VALUE)) |
| VALUE | rb_errinfo (void) |
| 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)) |
| static int | tcl_eval (Tcl_Interp *interp, const char *cmd) |
| static int | tcl_global_eval (Tcl_Interp *interp, const char *cmd) |
| 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 **)) |
| static struct tcltkip * | get_ip (VALUE self) |
| static int | deleted_ip (struct tcltkip *ptr) |
| static int | rbtk_preserve_ip (struct tcltkip *ptr) |
| static int | rbtk_release_ip (struct tcltkip *ptr) |
| static VALUE | create_ip_exc (interp, VALUE interp:VALUE exc, const char *fmt, va_alist) |
| static void | tcl_stubs_check () |
| static VALUE | tcltkip_init_tk (VALUE interp) |
| static int | pending_exception_check0 () |
| static int | pending_exception_check1 (int thr_crit_bup, struct tcltkip *ptr) |
| static void | call_original_exit (struct tcltkip *ptr, int state) |
| static void _timer_for_tcl | _ ((ClientData)) |
| static void | _timer_for_tcl (ClientData clientData) |
| static VALUE | set_eventloop_window_mode (VALUE self, VALUE mode) |
| static VALUE | get_eventloop_window_mode (VALUE self) |
| static VALUE | set_eventloop_tick (VALUE self, VALUE tick) |
| static VALUE | get_eventloop_tick (VALUE self) |
| static VALUE | ip_set_eventloop_tick (VALUE self, VALUE tick) |
| static VALUE | ip_get_eventloop_tick (VALUE self) |
| static VALUE | set_no_event_wait (VALUE self, VALUE wait) |
| static VALUE | get_no_event_wait (VALUE self) |
| static VALUE | ip_set_no_event_wait (VALUE self, VALUE wait) |
| static VALUE | ip_get_no_event_wait (VALUE self) |
| static VALUE | set_eventloop_weight (VALUE self, VALUE loop_max, VALUE no_event) |
| static VALUE | get_eventloop_weight (VALUE self) |
| static VALUE | ip_set_eventloop_weight (VALUE self, VALUE loop_max, VALUE no_event) |
| static VALUE | ip_get_eventloop_weight (VALUE self) |
| static VALUE | set_max_block_time (VALUE self, VALUE time) |
| static VALUE | lib_evloop_thread_p (VALUE self) |
| static VALUE | lib_evloop_abort_on_exc (VALUE self) |
| static VALUE | ip_evloop_abort_on_exc (VALUE self) |
| static VALUE | lib_evloop_abort_on_exc_set (VALUE self, VALUE val) |
| static VALUE | ip_evloop_abort_on_exc_set (VALUE self, VALUE val) |
| static VALUE | lib_num_of_mainwindows_core (VALUE self, int argc, VALUE *argv) |
| static VALUE | lib_num_of_mainwindows (VALUE self) |
| void | rbtk_EventSetupProc (ClientData clientData, int flag) |
| void | rbtk_EventCheckProc (ClientData clientData, int flag) |
| static VALUE | call_DoOneEvent_core (VALUE flag_val) |
| static VALUE | call_DoOneEvent (VALUE flag_val) |
| static VALUE | eventloop_sleep (VALUE dummy) |
| static int | trap_check (int *check_var) |
| static int | check_eventloop_interp () |
| static int | lib_eventloop_core (int check_root, int update_flag, int *check_var, Tcl_Interp *interp) |
| VALUE | lib_eventloop_main_core (VALUE args) |
| VALUE | lib_eventloop_main (VALUE args) |
| VALUE | lib_eventloop_ensure (VALUE args) |
| static VALUE | lib_eventloop_launcher (int check_root, int update_flag, int *check_var, Tcl_Interp *interp) |
| static VALUE | lib_mainloop (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_mainloop (int argc, VALUE *argv, VALUE self) |
| static VALUE | watchdog_evloop_launcher (VALUE check_rootwidget) |
| static VALUE | lib_watchdog_core (VALUE check_rootwidget) |
| VALUE | lib_watchdog_ensure (VALUE arg) |
| static VALUE | lib_mainloop_watchdog (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_mainloop_watchdog (int argc, VALUE *argv, VALUE self) |
| void | _thread_call_proc_arg_mark (struct thread_call_proc_arg *q) |
| static VALUE | _thread_call_proc_core (VALUE arg) |
| static VALUE | _thread_call_proc_ensure (VALUE arg) |
| static VALUE | _thread_call_proc (VALUE arg) |
| static VALUE | _thread_call_proc_value (VALUE th) |
| static VALUE | lib_thread_callback (int argc, VALUE *argv, VALUE self) |
| static VALUE | lib_do_one_event_core (int argc, VALUE *argv, VALUE self, int is_ip) |
| static VALUE | lib_do_one_event (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_do_one_event (int argc, VALUE *argv, VALUE self) |
| static void | ip_set_exc_message (Tcl_Interp *interp, VALUE exc) |
| static VALUE | TkStringValue (VALUE obj) |
| static int | tcl_protect_core (Tcl_Interp *interp, VALUE(*proc)(), VALUE data) |
| static int | tcl_protect (Tcl_Interp *interp, VALUE(*proc)(), VALUE data) |
| static int | ip_ruby_eval (ClientData clientData, Tcl_Interp *interp, int argc, argv) |
| static VALUE | ip_ruby_cmd_core (struct cmd_body_arg *arg) |
| static VALUE | ip_ruby_cmd_receiver_const_get (char *name) |
| static VALUE | ip_ruby_cmd_receiver_get (char *str) |
| static int | ip_ruby_cmd (ClientData clientData, Tcl_Interp *interp, int argc, argv) |
| static int | ip_InterpExitCommand (ClientData clientData, Tcl_Interp *interp, int argc, argv) |
| static int | ip_RubyExitCommand (ClientData clientData, Tcl_Interp *interp, int argc, argv) |
| static int ip_rbUpdateCommand | _ ((ClientData, Tcl_Interp *, int, char *[])) |
| static int | ip_rbUpdateCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static void | rb_threadUpdateProc (ClientData clientData) |
| static int | ip_rb_threadUpdateCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static char *VwaitVarProc | _ ((ClientData, Tcl_Interp *, char *, char *, int)) |
| static char * | VwaitVarProc (ClientData clientData, Tcl_Interp *interp, char *name1, char *name2, int flags) |
| static int | ip_rbVwaitCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static char * | WaitVariableProc (ClientData clientData, Tcl_Interp *interp, char *name1, char *name2, int flags) |
| static void WaitVisibilityProc | _ ((ClientData, XEvent *)) |
| static void | WaitVisibilityProc (ClientData clientData, XEvent *eventPtr) |
| static void | WaitWindowProc (ClientData clientData, XEvent *eventPtr) |
| static int | ip_rbTkWaitCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static char * | rb_threadVwaitProc (ClientData clientData, Tcl_Interp *interp, char *name1, char *name2, int flags) |
| static void | rb_threadWaitVisibilityProc (ClientData clientData, XEvent *eventPtr) |
| static void | rb_threadWaitWindowProc (ClientData clientData, XEvent *eventPtr) |
| static int | ip_rb_threadVwaitCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static int | ip_rb_threadTkWaitCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static VALUE | ip_thread_vwait (VALUE self, VALUE var) |
| static VALUE | ip_thread_tkwait (VALUE self, VALUE mode, VALUE target) |
| static void | delete_slaves (Tcl_Interp *ip) |
| static void | lib_mark_at_exit (VALUE self) |
| static int | ip_null_proc (ClientData clientData, Tcl_Interp *interp, int argc, argv) |
| static void | ip_finalize (Tcl_Interp *ip) |
| static void | ip_free (struct tcltkip *ptr) |
| static VALUE | ip_alloc (VALUE self) |
| static void | ip_replace_wait_commands (Tcl_Interp *interp, Tk_Window mainWin) |
| static int | ip_rb_replaceSlaveTkCmdsCommand (ClientData clientData, Tcl_Interp *interp, int objc, objv) |
| static void | ip_wrap_namespace_command (Tcl_Interp *interp) |
| static void | ip_CallWhenDeleted (ClientData clientData, Tcl_Interp *ip) |
| static VALUE | ip_init (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_create_slave_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_create_slave (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_is_slave_of_p (VALUE self, VALUE master) |
| static VALUE | ip_create_console_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_create_console (VALUE self) |
| static VALUE | ip_make_safe_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_make_safe (VALUE self) |
| static VALUE | ip_is_safe_p (VALUE self) |
| static VALUE | ip_allow_ruby_exit_p (VALUE self) |
| static VALUE | ip_allow_ruby_exit_set (VALUE self, VALUE val) |
| static VALUE | ip_delete (VALUE self) |
| static VALUE | ip_has_invalid_namespace_p (VALUE self) |
| static VALUE | ip_is_deleted_p (VALUE self) |
| static VALUE | ip_has_mainwindow_p_core (VALUE self, int argc, VALUE *argv) |
| static VALUE | ip_has_mainwindow_p (VALUE self) |
| static VALUE | ip_get_result_string_obj (Tcl_Interp *interp) |
| static VALUE | callq_safelevel_handler (VALUE arg, VALUE callq) |
| static int call_queue_handler | _ ((Tcl_Event *, int)) |
| static int | call_queue_handler (Tcl_Event *evPtr, int flags) |
| static VALUE | tk_funcall (VALUE(*func)(), int argc, VALUE *argv, VALUE obj) |
| static VALUE | ip_eval_real (VALUE self, char *cmd_str, int cmd_len) |
| static VALUE | evq_safelevel_handler (VALUE arg, VALUE evq) |
| int | eval_queue_handler (Tcl_Event *evPtr, int flags) |
| static VALUE | ip_eval (VALUE self, VALUE str) |
| static int | ip_cancel_eval_core (Tcl_Interp *interp, VALUE msg, int flag) |
| static VALUE | ip_cancel_eval (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_cancel_eval_unwind (int argc, VALUE *argv, VALUE self) |
| static VALUE | lib_restart_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | lib_restart (VALUE self) |
| static VALUE | ip_restart (VALUE self) |
| static VALUE | lib_toUTF8_core (VALUE ip_obj, VALUE src, VALUE encodename) |
| static VALUE | lib_toUTF8 (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_toUTF8 (int argc, VALUE *argv, VALUE self) |
| static VALUE | lib_fromUTF8_core (VALUE ip_obj, VALUE src, VALUE encodename) |
| static VALUE | lib_fromUTF8 (int argc, VALUE *argv, VALUE self) |
| static VALUE | ip_fromUTF8 (int argc, VALUE *argv, VALUE self) |
| static VALUE | lib_UTF_backslash_core (VALUE self, VALUE str, int all_bs) |
| static VALUE | lib_UTF_backslash (VALUE self, VALUE str) |
| static VALUE | lib_Tcl_backslash (VALUE self, VALUE str) |
| static VALUE | lib_get_system_encoding (VALUE self) |
| static VALUE | lib_set_system_encoding (VALUE self, VALUE enc_name) |
| static VALUE | invoke_tcl_proc (VALUE arg) |
| static VALUE | ip_invoke_core (VALUE interp, int argc, char **argv) |
| static char ** | alloc_invoke_arguments (int argc, VALUE *argv) |
| static void | free_invoke_arguments (int argc, char **av) |
| static VALUE | ip_invoke_real (int argc, VALUE *argv, VALUE interp) |
| VALUE | ivq_safelevel_handler (VALUE arg, VALUE ivq) |
| int | invoke_queue_handler (Tcl_Event *evPtr, int flags) |
| static VALUE | ip_invoke_with_position (int argc, VALUE *argv, VALUE obj, Tcl_QueuePosition position) |
| static VALUE | ip_retval (VALUE self) |
| static VALUE | ip_invoke (int argc, VALUE *argv, VALUE obj) |
| static VALUE | ip_invoke_immediate (int argc, VALUE *argv, VALUE obj) |
| static VALUE | ip_get_variable2_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_get_variable2 (VALUE self, VALUE varname, VALUE index, VALUE flag) |
| static VALUE | ip_get_variable (VALUE self, VALUE varname, VALUE flag) |
| static VALUE | ip_set_variable2_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_set_variable2 (VALUE self, VALUE varname, VALUE index, VALUE value, VALUE flag) |
| static VALUE | ip_set_variable (VALUE self, VALUE varname, VALUE value, VALUE flag) |
| static VALUE | ip_unset_variable2_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_unset_variable2 (VALUE self, VALUE varname, VALUE index, VALUE flag) |
| static VALUE | ip_unset_variable (VALUE self, VALUE varname, VALUE flag) |
| static VALUE | ip_get_global_var (VALUE self, VALUE varname) |
| static VALUE | ip_get_global_var2 (VALUE self, VALUE varname, VALUE index) |
| static VALUE | ip_set_global_var (VALUE self, VALUE varname, VALUE value) |
| static VALUE | ip_set_global_var2 (VALUE self, VALUE varname, VALUE index, VALUE value) |
| static VALUE | ip_unset_global_var (VALUE self, VALUE varname) |
| static VALUE | ip_unset_global_var2 (VALUE self, VALUE varname, VALUE index) |
| static VALUE | lib_split_tklist_core (VALUE ip_obj, VALUE list_str) |
| static VALUE | lib_split_tklist (VALUE self, VALUE list_str) |
| static VALUE | ip_split_tklist (VALUE self, VALUE list_str) |
| static VALUE | lib_merge_tklist (int argc, VALUE *argv, VALUE obj) |
| static VALUE | lib_conv_listelement (VALUE self, VALUE src) |
| static VALUE | lib_getversion (VALUE self) |
| static VALUE | lib_get_reltype_name (VALUE self) |
| static VALUE | tcltklib_compile_info () |
| static VALUE | create_dummy_encoding_for_tk_core (VALUE interp, VALUE name, VALUE error_mode) |
| static VALUE | create_dummy_encoding_for_tk (VALUE interp, VALUE name) |
| static int | update_encoding_table (VALUE table, VALUE interp, VALUE error_mode) |
| static VALUE | encoding_table_get_name_core (VALUE table, VALUE enc_arg, VALUE error_mode) |
| static VALUE | encoding_table_get_obj_core (VALUE table, VALUE enc, VALUE error_mode) |
| static VALUE | encoding_table_get_name (VALUE table, VALUE enc) |
| static VALUE | encoding_table_get_obj (VALUE table, VALUE enc) |
| static VALUE | create_encoding_table_core (VALUE arg, VALUE interp) |
| static VALUE | create_encoding_table (VALUE interp) |
| static VALUE | ip_get_encoding_table (VALUE interp) |
| static VALUE | ip_make_menu_embeddable_core (VALUE interp, int argc, VALUE *argv) |
| static VALUE | ip_make_menu_embeddable (VALUE interp, VALUE menu_path) |
| void | Init_tcltklib () |
Variables | |
| struct { | |
| int major | |
| int minor | |
| int type | |
| int patchlevel | |
| } | tcltk_version |
| 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 | cRubyEncoding |
| static int | ENCODING_INDEX_UTF8 |
| static int | ENCODING_INDEX_BINARY |
| 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 |
| int * | tclDummyMathPtr = (int *) matherr |
| static VALUE | eventloop_thread |
| static Tcl_Interp * | eventloop_interp |
| Tcl_ThreadId | tk_eventloop_thread_id |
| static VALUE | eventloop_stack |
| static int | window_event_mode = ~0 |
| static VALUE | watchdog_thread |
| Tcl_Interp * | current_interp |
| 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 VALUE | rbtk_pending_exception |
| static int | rbtk_eventloop_depth = 0 |
| static int | rbtk_internal_eventloop_handler = 0 |
| static Tcl_TimerToken | timer_token = (Tcl_TimerToken)NULL |
| #define CONST84 |
Definition at line 139 of file tcltklib.c.
Referenced by call_original_exit(), invoke_tcl_proc(), ip_invoke_core(), ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), ip_rbTkWaitCommand(), ip_rbUpdateCommand(), and ip_rbVwaitCommand().
| #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 485 of file tcltklib.c.
| #define DEFAULT_EVENT_LOOP_MAX 800 |
Definition at line 506 of file tcltklib.c.
| #define DEFAULT_EVENTLOOP_DEPTH 7 |
Referenced by Init_tcltklib().
| #define DEFAULT_NO_EVENT_TICK 10 |
Definition at line 507 of file tcltklib.c.
| #define DEFAULT_NO_EVENT_WAIT 5 |
Definition at line 508 of file tcltklib.c.
| #define DEFAULT_TIMER_TICK 0 |
Definition at line 510 of file tcltklib.c.
| #define DO_THREAD_SCHEDULE_AT_CALLBACK_DONE 1 |
Definition at line 487 of file tcltklib.c.
| #define DUMP1 | ( | ARG1 | ) | if (ruby_debug) { fprintf(stderr, "tcltklib: %s\n", ARG1); fflush(stderr); } |
Definition at line 162 of file tcltklib.c.
Referenced by _timer_for_tcl(), call_original_exit(), call_queue_handler(), check_eventloop_interp(), delete_slaves(), deleted_ip(), eval_queue_handler(), invoke_queue_handler(), ip_allow_ruby_exit_set(), ip_CallWhenDeleted(), ip_create_slave_core(), ip_delete(), ip_eval(), ip_finalize(), ip_free(), ip_init(), ip_InterpExitCommand(), ip_invoke_core(), ip_invoke_with_position(), ip_make_safe_core(), ip_rb_replaceSlaveTkCmdsCommand(), ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbUpdateCommand(), ip_rbVwaitCommand(), ip_replace_wait_commands(), ip_ruby_cmd_core(), ip_RubyExitCommand(), lib_eventloop_core(), lib_eventloop_launcher(), pending_exception_check0(), pending_exception_check1(), rb_threadUpdateProc(), tcl_protect_core(), tcltkip_init_tk(), tk_funcall(), and trap_check().
| #define DUMP2 | ( | ARG1, | |||
| ARG2 | ) |
if (ruby_debug) { fprintf(stderr, "tcltklib: ");\ fprintf(stderr, ARG1, ARG2); fprintf(stderr, "\n"); fflush(stderr); }
Definition at line 163 of file tcltklib.c.
Referenced by call_queue_handler(), callq_safelevel_handler(), check_eventloop_interp(), create_encoding_table_core(), delete_slaves(), eval_queue_handler(), eventloop_sleep(), evq_safelevel_handler(), invoke_queue_handler(), ip_eval(), ip_eval_real(), ip_finalize(), ip_free(), ip_init(), ip_invoke_core(), ip_invoke_real(), ip_invoke_with_position(), ip_rb_threadTkWaitCommand(), ip_rbUpdateCommand(), ip_ruby_cmd(), ip_ruby_cmd_core(), ip_ruby_eval(), ip_set_exc_message(), ivq_safelevel_handler(), lib_eventloop_core(), lib_eventloop_ensure(), lib_eventloop_launcher(), lib_restart_core(), lib_watchdog_core(), tcl_protect_core(), and tk_funcall().
| #define DUMP3 | ( | ARG1, | |||
| ARG2, | |||||
| ARG3 | ) |
if (ruby_debug) { fprintf(stderr, "tcltklib: ");\ fprintf(stderr, ARG1, ARG2, ARG3); fprintf(stderr, "\n"); fflush(stderr); }
Definition at line 165 of file tcltklib.c.
Referenced by lib_eventloop_launcher().
| #define EVENT_HANDLER_TIMEOUT 100 |
Definition at line 521 of file tcltklib.c.
Referenced by ip_eval(), ip_invoke_with_position(), ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), ip_rb_threadVwaitCommand(), and tk_funcall().
| #define EVLOOP_WAKEUP_CHANCE 3 |
Definition at line 2777 of file tcltklib.c.
Referenced by lib_watchdog_core().
| #define NO_THREAD_INTERRUPT_TIME 100 |
Definition at line 511 of file tcltklib.c.
Referenced by lib_eventloop_core(), and lib_watchdog_core().
| #define RbTk_OBJ_UNTRUST | ( | x | ) | OBJ_TAINT(x) |
Definition at line 42 of file tcltklib.c.
Referenced by Init_tcltklib(), ip_get_result_string_obj(), ip_get_variable2_core(), ip_set_variable2_core(), lib_conv_listelement(), lib_fromUTF8_core(), lib_merge_tklist(), lib_split_tklist_core(), lib_toUTF8_core(), and lib_UTF_backslash_core().
| #define RUBY_USE_NATIVE_THREAD 1 |
Definition at line 81 of file tcltklib.c.
Referenced by ip_eval(), and ip_invoke_with_position().
| #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.
| #define TAG_FATAL 0x8 |
Definition at line 159 of file tcltklib.c.
| #define TAG_NEXT 0x3 |
Definition at line 154 of file tcltklib.c.
| #define TAG_RAISE 0x6 |
Definition at line 157 of file tcltklib.c.
| #define TAG_REDO 0x5 |
Definition at line 156 of file tcltklib.c.
| #define TAG_RETRY 0x4 |
Definition at line 155 of file tcltklib.c.
| #define TAG_RETURN 0x1 |
Definition at line 152 of file tcltklib.c.
| #define TAG_THROW 0x7 |
Definition at line 158 of file tcltklib.c.
| #define TCL_ALPHA_RELEASE 0 |
Definition at line 99 of file tcltklib.c.
Referenced by Init_tcltklib(), and lib_get_reltype_name().
| #define TCL_BETA_RELEASE 1 |
Definition at line 100 of file tcltklib.c.
Referenced by Init_tcltklib(), and lib_get_reltype_name().
| #define TCL_CANCEL_UNWIND 0x100000 |
Definition at line 7810 of file tcltklib.c.
Referenced by ip_cancel_eval_unwind().
| #define Tcl_DecrRefCount | ( | obj | ) | (1) |
Definition at line 313 of file tcltklib.c.
Referenced by call_original_exit(), create_encoding_table_core(), free_invoke_arguments(), ip_eval_real(), ip_get_result_string_obj(), ip_get_variable2_core(), ip_invoke_core(), ip_rb_threadTkWaitCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbVwaitCommand(), ip_set_variable2_core(), lib_fromUTF8_core(), lib_split_tklist_core(), and update_encoding_table().
| #define Tcl_Eval tcl_eval |
Definition at line 287 of file tcltklib.c.
Referenced by delete_slaves(), ip_eval_real(), ip_init(), lib_restart_core(), and tcl_eval().
| #define TCL_FINAL_RELEASE 2 |
Definition at line 101 of file tcltklib.c.
Referenced by Init_tcltklib(), and lib_get_reltype_name().
| #define Tcl_GetStringResult | ( | interp | ) | ((interp)->result) |
Definition at line 318 of file tcltklib.c.
Referenced by ip_eval_real(), ip_get_variable2_core(), ip_init(), ip_invoke_core(), ip_make_safe_core(), ip_rbUpdateCommand(), ip_ruby_cmd(), ip_ruby_eval(), ip_RubyExitCommand(), ip_set_variable2_core(), ip_unset_variable2_core(), lib_split_tklist_core(), and tcltkip_init_tk().
| #define Tcl_GlobalEval tcl_global_eval |
Definition at line 308 of file tcltklib.c.
Referenced by ip_finalize(), and tcl_global_eval().
| #define Tcl_IncrRefCount | ( | obj | ) | (1) |
Definition at line 312 of file tcltklib.c.
Referenced by alloc_invoke_arguments(), call_original_exit(), create_encoding_table_core(), ip_cancel_eval_core(), ip_eval_real(), ip_get_result_string_obj(), ip_get_variable2_core(), ip_invoke_core(), ip_rb_threadTkWaitCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbVwaitCommand(), ip_set_variable2_core(), lib_fromUTF8_core(), lib_split_tklist_core(), and update_encoding_table().
| #define TCL_NAMESPACE_DEBUG 0 |
Definition at line 556 of file tcltklib.c.
Referenced by deleted_ip(), and ip_InterpExitCommand().
| #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 |
Definition at line 4872 of file tcltklib.c.
Referenced by ip_rb_threadTkWaitCommand(), rb_threadWaitVisibilityProc(), and rb_threadWaitWindowProc().
| #define TKWAIT_MODE_VISIBILITY 1 |
Definition at line 4871 of file tcltklib.c.
Referenced by ip_rb_threadTkWaitCommand(), and rb_threadWaitVisibilityProc().
| #define TRAP_CHECK | ( | ) |
do { \ if (trap_check(check_var) == 0) return 0; \ } while (0)
Definition at line 2127 of file tcltklib.c.
Referenced by lib_eventloop_core().
| #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 486 of file tcltklib.c.
| #define va_init_list | ( | a, | |||
| b | ) | va_start(a) |
Definition at line 57 of file tcltklib.c.
Referenced by create_ip_exc(), new_insn_body(), ole_raise(), onig_error_code_to_str(), onig_snprintf_with_pattern(), rb_funcall(), rb_rescue2(), rb_yield_values(), and warn_printf().
| #define WATCHDOG_INTERVAL 10 |
Definition at line 509 of file tcltklib.c.
Referenced by lib_watchdog_core().
| int invoke_queue_handler _ | ( | (Tcl_Event *, int) | ) | [static] |
| static void rb_threadWaitWindowProc _ | ( | (ClientData, XEvent *) | ) | [static] |
| static char *rb_threadVwaitProc _ | ( | (ClientData, Tcl_Interp *, char *, char *, int) | ) | [static] |
| static int ip_rb_threadTkWaitCommand _ | ( | (ClientData, Tcl_Interp *, int, char *[]) | ) | [static] |
| static void rb_threadUpdateProc _ | ( | (ClientData) | ) | [static] |
| static int ip_ruby_cmd _ | ( | (ClientData, Tcl_Interp *, int, char **) | ) | [static] |
| static void ip_finalize _ | ( | (Tcl_Interp *) | ) | [static] |
Definition at line 2923 of file tcltklib.c.
References _thread_call_proc_core(), _thread_call_proc_ensure(), and rb_ensure().
Referenced by lib_thread_callback().
| 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().
Definition at line 2906 of file tcltklib.c.
References thread_call_proc_arg::proc, and rb_funcall().
Referenced by _thread_call_proc().
Definition at line 2914 of file tcltklib.c.
References thread_call_proc_arg::done, and Qnil.
Referenced by _thread_call_proc().
Definition at line 2936 of file tcltklib.c.
References rb_funcall().
Referenced by lib_thread_callback().
| static void _timer_for_tcl | ( | ClientData | clientData | ) | [static] |
Definition at line 1602 of file tcltklib.c.
References DUMP1, NULL, Qtrue, and timer_token.
Referenced by lib_eventloop_core(), and set_eventloop_tick().
| static char** alloc_invoke_arguments | ( | int | argc, | |
| VALUE * | argv | |||
| ) | [static] |
Definition at line 8829 of file tcltklib.c.
References Qtrue, strdup, StringValuePtr, and Tcl_IncrRefCount.
Referenced by ip_invoke_real(), and ip_invoke_with_position().
Definition at line 2021 of file tcltklib.c.
References call_DoOneEvent_core(), NULL, and tk_funcall().
Referenced by lib_eventloop_core().
Definition at line 2003 of file tcltklib.c.
References FIX2INT, Qfalse, and Qtrue.
Referenced by call_DoOneEvent().
| static void call_original_exit | ( | struct tcltkip * | ptr, | |
| int | state | |||
| ) | [static] |
Definition at line 1451 of file tcltklib.c.
References ALLOC_N, argv, CONST84, DUMP1, INT2NUM(), NULL, Qtrue, rb_fix2str(), RSTRING_PTR, Tcl_DecrRefCount, Tcl_IncrRefCount, and xfree.
Referenced by Init_tcltklib().
| static int call_queue_handler | ( | Tcl_Event * | evPtr, | |
| int | flags | |||
| ) | [static] |
Definition at line 6987 of file tcltklib.c.
References call_queue::argc, call_queue::argv, call_queue_mark(), callq_safelevel_handler(), Data_Wrap_Struct, deleted_ip(), call_queue::done, DUMP1, DUMP2, call_queue::func, get_ip(), call_queue::interp, RARRAY_PTR, rb_cData, rb_funcall(), rb_gc_force_recycle(), rb_proc_new(), rb_safe_level(), rb_thread_alive_p(), rb_thread_current(), rb_thread_run(), rb_thread_schedule(), rb_thread_wakeup(), rbtk_internal_eventloop_handler, call_queue::result, RTEST, call_queue::safe_level, and call_queue::thread.
Referenced by tk_funcall().
| void call_queue_mark | ( | struct call_queue * | q | ) |
Definition at line 452 of file tcltklib.c.
References call_queue::argc, call_queue::argv, call_queue::interp, rb_gc_mark(), call_queue::result, and call_queue::thread.
Referenced by call_queue_handler().
Definition at line 6973 of file tcltklib.c.
References call_queue::argc, call_queue::argv, Data_Get_Struct, DUMP2, call_queue::func, call_queue::interp, rb_set_safe_level(), and call_queue::safe_level.
Referenced by call_queue_handler().
| static int check_eventloop_interp | ( | ) | [static] |
Definition at line 2162 of file tcltklib.c.
References DUMP1, DUMP2, and NULL.
Referenced by lib_eventloop_core().
Definition at line 10118 of file tcltklib.c.
References create_dummy_encoding_for_tk_core(), and Qtrue.
Referenced by create_encoding_table_core(), and Init_tcltklib().
| static VALUE create_dummy_encoding_for_tk_core | ( | VALUE | interp, | |
| VALUE | name, | |||
| VALUE | error_mode | |||
| ) | [static] |
Definition at line 10079 of file tcltklib.c.
References get_ip(), Qnil, rb_define_dummy_encoding(), rb_eArgError, rb_enc_find_index(), rb_enc_from_encoding(), rb_enc_from_index(), rb_eRuntimeError, rb_raise(), rb_secure(), RSTRING_PTR, RTEST, StringValue, and StringValueCStr.
Referenced by create_dummy_encoding_for_tk(), and update_encoding_table().
Definition at line 10586 of file tcltklib.c.
References create_encoding_table_core(), rb_funcall(), and rb_proc_new().
Referenced by ip_get_encoding_table().
Definition at line 10435 of file tcltklib.c.
References create_dummy_encoding_for_tk(), DUMP2, get_ip(), tcltkip::ip, Qnil, rb_enc_find_index(), rb_enc_from_encoding(), rb_enc_from_index(), rb_eRuntimeError, rb_hash_aset(), rb_hash_new(), rb_ivar_set(), rb_obj_freeze(), rb_raise(), rb_set_safe_level(), rb_set_safe_level_force(), rb_str_new2, RSTRING_PTR, StringValueCStr, Tcl_DecrRefCount, Tcl_IncrRefCount, and tcl_stubs_check().
Referenced by create_encoding_table().
| static VALUE create_ip_exc | ( | interp | , | |
| VALUE interp: VALUE | exc, | |||
| const char * | fmt, | |||
| va_alist | ||||
| ) | [static] |
Definition at line 834 of file tcltklib.c.
References args, get_ip(), tcltkip::ip, msg, rb_exc_new3(), rb_ivar_set(), rb_vsprintf(), and va_init_list.
Referenced by ip_eval_real(), ip_get_variable2_core(), ip_invoke_core(), ip_make_safe_core(), ip_set_variable2_core(), ip_unset_variable2_core(), and tcltkip_init_tk().
| static void delete_slaves | ( | Tcl_Interp * | ip | ) | [static] |
Definition at line 5589 of file tcltklib.c.
References DUMP1, DUMP2, ip_finalize(), Qtrue, and Tcl_Eval.
Referenced by ip_finalize().
| static int deleted_ip | ( | struct tcltkip * | ptr | ) | [static] |
Definition at line 784 of file tcltklib.c.
References DUMP1, and TCL_NAMESPACE_DEBUG.
Referenced by call_queue_handler(), encoding_table_get_name_core(), eval_queue_handler(), invoke_queue_handler(), ip_allow_ruby_exit_p(), ip_allow_ruby_exit_set(), ip_create_console(), ip_create_slave(), ip_create_slave_core(), ip_delete(), ip_eval_real(), ip_evloop_abort_on_exc_set(), ip_get_variable2_core(), ip_has_mainwindow_p_core(), ip_invoke_core(), ip_invoke_real(), ip_is_deleted_p(), ip_is_safe_p(), ip_mainloop(), ip_mainloop_watchdog(), ip_make_safe(), ip_make_safe_core(), ip_restart(), ip_retval(), ip_set_eventloop_tick(), ip_set_eventloop_weight(), ip_set_no_event_wait(), ip_set_variable2_core(), ip_unset_variable2_core(), lib_do_one_event_core(), lib_restart(), lib_restart_core(), lib_toUTF8_core(), tk_funcall(), and update_encoding_table().
Definition at line 10419 of file tcltklib.c.
References encoding_table_get_name_core(), and Qtrue.
Referenced by ip_get_encoding_table().
Definition at line 10185 of file tcltklib.c.
References deleted_ip(), get_ip(), name, NIL_P, Qnil, rb_cEncoding, rb_eArgError, rb_enc_default_external(), rb_enc_default_internal(), rb_enc_find_index(), rb_enc_from_encoding(), rb_enc_from_index(), rb_funcall(), rb_hash_lookup(), rb_ivar_get(), rb_locale_charmap(), rb_obj_is_kind_of(), rb_raise(), rb_respond_to(), rb_str_new2, RSTRING_PTR, RTEST, StringValueCStr, and update_encoding_table().
Referenced by encoding_table_get_name(), and encoding_table_get_obj_core().
Definition at line 10426 of file tcltklib.c.
References encoding_table_get_obj_core(), and Qtrue.
Referenced by ip_get_encoding_table(), and lib_fromUTF8_core().
Definition at line 10292 of file tcltklib.c.
References encoding_table_get_name_core(), Qnil, rb_hash_lookup(), rb_obj_is_kind_of(), and RTEST.
Referenced by encoding_table_get_obj().
| int eval_queue_handler | ( | Tcl_Event * | evPtr, | |
| int | flags | |||
| ) |
Definition at line 7483 of file tcltklib.c.
References Data_Wrap_Struct, deleted_ip(), eval_queue::done, DUMP1, DUMP2, eval_queue_mark(), evq_safelevel_handler(), get_ip(), eval_queue::interp, ip_eval_real(), eval_queue::len, RARRAY_PTR, rb_bug(), rb_cData, rb_funcall(), rb_gc_force_recycle(), rb_proc_new(), rb_safe_level(), rb_thread_alive_p(), rb_thread_current(), rb_thread_run(), rb_thread_schedule(), rb_thread_wakeup(), rbtk_internal_eventloop_handler, eval_queue::result, RTEST, ruby_native_thread_p(), eval_queue::safe_level, eval_queue::str, and eval_queue::thread.
Referenced by ip_eval().
| 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.
Referenced by eval_queue_handler().
Definition at line 2053 of file tcltklib.c.
References DUMP2, long, Qnil, rb_bug(), rb_thread_current(), rb_thread_wait_for(), ruby_native_thread_p(), timeval::tv_sec, and timeval::tv_usec.
Referenced by lib_eventloop_core().
Definition at line 7469 of file tcltklib.c.
References Data_Get_Struct, DUMP2, eval_queue::interp, ip_eval_real(), eval_queue::len, rb_set_safe_level(), eval_queue::safe_level, and eval_queue::str.
Referenced by eval_queue_handler().
| static void free_invoke_arguments | ( | int | argc, | |
| char ** | av | |||
| ) | [static] |
Definition at line 8877 of file tcltklib.c.
References free, and Tcl_DecrRefCount.
Referenced by ip_invoke_real(), and ip_invoke_with_position().
Definition at line 1715 of file tcltklib.c.
References INT2NUM().
Referenced by Init_tcltklib(), ip_get_eventloop_tick(), and ip_set_eventloop_tick().
Definition at line 1821 of file tcltklib.c.
References INT2NUM(), and rb_ary_new3().
Referenced by Init_tcltklib(), ip_get_eventloop_weight(), and ip_set_eventloop_weight().
Definition at line 1669 of file tcltklib.c.
Referenced by Init_tcltklib().
Definition at line 766 of file tcltklib.c.
References Data_Get_Struct, tcltkip::ip, and NULL.
Referenced by call_queue_handler(), create_dummy_encoding_for_tk_core(), create_encoding_table_core(), create_ip_exc(), encoding_table_get_name_core(), eval_queue_handler(), invoke_queue_handler(), ip_allow_ruby_exit_p(), ip_allow_ruby_exit_set(), ip_cancel_eval(), ip_cancel_eval_unwind(), ip_create_console(), ip_create_console_core(), ip_create_slave(), ip_create_slave_core(), ip_delete(), ip_eval(), ip_eval_real(), ip_evloop_abort_on_exc_set(), ip_get_variable2_core(), ip_has_invalid_namespace_p(), ip_has_mainwindow_p_core(), ip_invoke_core(), ip_invoke_real(), ip_invoke_with_position(), ip_is_deleted_p(), ip_is_safe_p(), ip_is_slave_of_p(), ip_mainloop(), ip_mainloop_watchdog(), ip_make_menu_embeddable_core(), ip_make_safe(), ip_make_safe_core(), ip_restart(), ip_retval(), ip_set_eventloop_tick(), ip_set_eventloop_weight(), ip_set_no_event_wait(), ip_set_variable2_core(), ip_unset_variable2_core(), lib_do_one_event_core(), lib_fromUTF8_core(), lib_restart(), lib_restart_core(), lib_split_tklist_core(), lib_toUTF8_core(), tcltkip_init_tk(), tk_funcall(), and update_encoding_table().
Definition at line 1767 of file tcltklib.c.
References INT2NUM().
Referenced by Init_tcltklib(), ip_get_no_event_wait(), and ip_set_no_event_wait().
| void Init_tcltklib | ( | ) |
Definition at line 10754 of file tcltklib.c.
References call_original_exit(), create_dummy_encoding_for_tk(), DEFAULT_EVENTLOOP_DEPTH, get_eventloop_tick(), get_eventloop_weight(), get_eventloop_window_mode(), get_no_event_wait(), INT2FIX, ip_alloc(), ip_allow_ruby_exit_p(), ip_allow_ruby_exit_set(), ip_cancel_eval(), ip_cancel_eval_unwind(), ip_create_console(), ip_create_slave(), ip_delete(), ip_do_one_event(), ip_eval(), ip_evloop_abort_on_exc(), ip_evloop_abort_on_exc_set(), ip_fromUTF8(), ip_get_encoding_table(), ip_get_eventloop_tick(), ip_get_eventloop_weight(), ip_get_global_var(), ip_get_global_var2(), ip_get_no_event_wait(), ip_get_variable(), ip_get_variable2(), ip_has_invalid_namespace_p(), ip_has_mainwindow_p(), ip_init(), ip_invoke(), ip_invoke_immediate(), ip_is_deleted_p(), ip_is_safe_p(), ip_is_slave_of_p(), ip_mainloop(), ip_mainloop_watchdog(), ip_make_menu_embeddable(), ip_make_safe(), ip_restart(), ip_retval(), ip_set_eventloop_tick(), ip_set_eventloop_weight(), ip_set_global_var(), ip_set_global_var2(), ip_set_no_event_wait(), ip_set_variable(), ip_set_variable2(), ip_split_tklist(), ip_thread_tkwait(), ip_thread_vwait(), ip_toUTF8(), ip_unset_global_var(), ip_unset_global_var2(), ip_unset_variable(), ip_unset_variable2(), lib_conv_listelement(), lib_do_one_event(), lib_evloop_abort_on_exc(), lib_evloop_abort_on_exc_set(), lib_evloop_thread_p(), lib_fromUTF8(), lib_get_reltype_name(), lib_get_system_encoding(), lib_getversion(), lib_mainloop(), lib_mainloop_watchdog(), lib_mark_at_exit(), lib_merge_tklist(), lib_num_of_mainwindows(), lib_set_system_encoding(), lib_split_tklist(), lib_Tcl_backslash(), lib_thread_callback(), lib_toUTF8(), lib_UTF_backslash(), NO_FindExecutable, NO_TCL_DLL, Qnil, rb_argv0, rb_ary_new2(), rb_cObject, rb_const_get(), rb_define_alloc_func(), rb_define_class(), rb_define_const(), rb_define_method(), rb_define_module(), rb_define_module_function(), rb_define_module_under(), rb_eLoadError, rb_enc_find_index(), rb_enc_to_index, rb_eStandardError, rb_global_variable(), rb_intern, rb_obj_freeze(), rb_path2class(), rb_raise(), rb_set_end_proc(), rb_str_new2, rb_utf8_encoding(), RbTk_OBJ_UNTRUST, rbtk_pending_exception, RSTRING_PTR, ruby_native_thread_p(), ruby_open_tcl_dll(), set_eventloop_tick(), set_eventloop_weight(), set_eventloop_window_mode(), set_max_block_time(), set_no_event_wait(), TCL_ALPHA_RELEASE, TCL_BETA_RELEASE, TCL_FINAL_RELEASE, tcl_stubs_check(), TCLTK_STUBS_OK, tcltklib_compile_info(), and TK_WINDOWING_SYSTEM.
| int invoke_queue_handler | ( | Tcl_Event * | evPtr, | |
| int | flags | |||
| ) |
Definition at line 8973 of file tcltklib.c.
References invoke_queue::argc, invoke_queue::argv, Data_Wrap_Struct, deleted_ip(), invoke_queue::done, DUMP1, DUMP2, get_ip(), invoke_queue::interp, invoke_queue_mark(), ip_invoke_core(), ivq_safelevel_handler(), RARRAY_PTR, rb_cData, rb_funcall(), rb_gc_force_recycle(), rb_proc_new(), rb_safe_level(), rb_thread_alive_p(), rb_thread_current(), rb_thread_run(), rb_thread_schedule(), rb_thread_wakeup(), rbtk_internal_eventloop_handler, invoke_queue::result, RTEST, invoke_queue::safe_level, and invoke_queue::thread.
Referenced by ip_invoke_with_position().
| void invoke_queue_mark | ( | struct invoke_queue * | q | ) |
Definition at line 436 of file tcltklib.c.
References invoke_queue::interp, rb_gc_mark(), invoke_queue::result, and invoke_queue::thread.
Referenced by invoke_queue_handler().
Definition at line 8473 of file tcltklib.c.
References invoke_info::argc, invoke_info::argv, invoke_info::cmdinfo, CONST84, inf(), tcltkip::ip, invoke_info::ptr, Qnil, and tcltkip::return_value.
Referenced by ip_invoke_core().
Definition at line 5867 of file tcltklib.c.
References Data_Wrap_Struct, and ip_free().
Referenced by Init_tcltklib().
Definition at line 6699 of file tcltklib.c.
References tcltkip::allow_ruby_exit, deleted_ip(), get_ip(), Qfalse, Qtrue, rb_eRuntimeError, and rb_raise().
Referenced by Init_tcltklib().
Definition at line 6718 of file tcltklib.c.
References tcltkip::allow_ruby_exit, deleted_ip(), DUMP1, get_ip(), tcltkip::ip, ip_InterpExitCommand(), ip_RubyExitCommand(), Qfalse, Qtrue, rb_eRuntimeError, rb_eSecurityError, rb_raise(), rb_secure(), RTEST, and tk_stubs_init_p().
Referenced by Init_tcltklib().
| static void ip_CallWhenDeleted | ( | ClientData | clientData, | |
| Tcl_Interp * | ip | |||
| ) | [static] |
Definition at line 6109 of file tcltklib.c.
References DUMP1, ip_finalize(), and Qtrue.
Referenced by ip_create_slave_core(), and ip_init().
Definition at line 7792 of file tcltklib.c.
References get_ip(), ip_cancel_eval_core(), Qfalse, Qnil, Qtrue, and rb_scan_args().
Referenced by Init_tcltklib().
| static int ip_cancel_eval_core | ( | Tcl_Interp * | interp, | |
| VALUE | msg, | |||
| int | flag | |||
| ) | [static] |
Definition at line 7769 of file tcltklib.c.
References NIL_P, rb_eNotImpError, rb_raise(), RSTRING_LEN, RSTRING_PTR, and Tcl_IncrRefCount.
Referenced by ip_cancel_eval(), and ip_cancel_eval_unwind().
Definition at line 7813 of file tcltklib.c.
References get_ip(), ip_cancel_eval_core(), Qfalse, Qnil, Qtrue, rb_scan_args(), and TCL_CANCEL_UNWIND.
Referenced by Init_tcltklib().
Definition at line 6612 of file tcltklib.c.
References deleted_ip(), get_ip(), ip_create_console_core(), rb_eRuntimeError, rb_raise(), and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 6564 of file tcltklib.c.
References get_ip(), tcltkip::ip, rb_eRuntimeError, rb_notimplement(), rb_raise(), tcltkip_init_tk(), and tk_stubs_init_p().
Referenced by ip_create_console().
Definition at line 6495 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, ip_create_slave_core(), name, NIL_P, Qfalse, rb_eRuntimeError, rb_raise(), rb_scan_args(), rb_secure(), StringValue, and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 6383 of file tcltklib.c.
References ALLOC, tcltkip::allow_ruby_exit, CLASS_OF, Data_Wrap_Struct, deleted_ip(), DUMP1, get_ip(), tcltkip::has_orig_exit, tcltkip::ip, ip_CallWhenDeleted(), ip_free(), ip_InterpExitCommand(), ip_rb_replaceSlaveTkCmdsCommand(), ip_replace_wait_commands(), ip_wrap_namespace_command(), name, NIL_P, tcltkip::orig_exit_info, Qfalse, Qtrue, rb_eRuntimeError, rb_exc_new2(), rbtk_preserve_ip(), tcltkip::ref_count, tcltkip::return_value, RTEST, StringValuePtr, tcltkip_init_tk(), tk_stubs_init_p(), and tcltkip::tk_thread_id.
Referenced by ip_create_slave().
Definition at line 6774 of file tcltklib.c.
References deleted_ip(), DUMP1, get_ip(), tcltkip::ip, ip_finalize(), Qnil, and Qtrue.
Referenced by Init_tcltklib().
Definition at line 3073 of file tcltklib.c.
References lib_do_one_event_core().
Referenced by Init_tcltklib().
Definition at line 7590 of file tcltklib.c.
References eval_queue::done, DUMP1, DUMP2, eval_queue::ev, eval_queue_handler(), EVENT_HANDLER_TIMEOUT, get_ip(), eval_queue::interp, ip_eval_real(), eval_queue::len, long, NIL_P, Qnil, Qtrue, RARRAY_PTR, rb_ary_new3(), rb_eException, rb_exc_new3(), rb_exc_raise(), rb_funcall(), rb_obj_class(), rb_obj_is_kind_of(), rb_safe_level(), rb_thread_current(), rb_thread_wait_for(), eval_queue::result, result, RSTRING_LEN, RSTRING_PTR, RUBY_USE_NATIVE_THREAD, eval_queue::safe_level, eval_queue::str, StringValue, eval_queue::thread, tcltkip::tk_thread_id, timeval::tv_sec, and timeval::tv_usec.
Referenced by Init_tcltklib().
Definition at line 7308 of file tcltklib.c.
References create_ip_exc(), deleted_ip(), DUMP2, get_ip(), tcltkip::ip, ip_get_result_string_obj(), NIL_P, pending_exception_check1(), Qtrue, rb_eException, rb_eFatal, rb_errinfo(), rb_eRuntimeError, rb_exc_new2(), rb_protect(), rb_tainted_str_new2, rb_warn(), rb_warning(), rbtk_pending_exception, rbtk_preserve_ip(), rbtk_release_ip(), tcltkip::return_value, TAG_FATAL, TAG_RAISE, Tcl_DecrRefCount, Tcl_Eval, Tcl_GetStringResult, and Tcl_IncrRefCount.
Referenced by eval_queue_handler(), evq_safelevel_handler(), and ip_eval().
Definition at line 1917 of file tcltklib.c.
References lib_evloop_abort_on_exc().
Referenced by Init_tcltklib().
Definition at line 1939 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, lib_evloop_abort_on_exc(), lib_evloop_abort_on_exc_set(), NULL, and rb_secure().
Referenced by Init_tcltklib().
| static void ip_finalize | ( | Tcl_Interp * | ip | ) | [static] |
Definition at line 5672 of file tcltklib.c.
References delete_slaves(), DUMP1, DUMP2, ip_null_proc(), Qfalse, Qnil, Qtrue, ruby_debug, ruby_verbose, Tcl_GlobalEval, and tk_stubs_init_p().
Referenced by delete_slaves(), ip_CallWhenDeleted(), ip_delete(), ip_free(), ip_InterpExitCommand(), and ip_RubyExitCommand().
| static void ip_free | ( | struct tcltkip * | ptr | ) | [static] |
Definition at line 5814 of file tcltklib.c.
References DUMP1, DUMP2, ip_finalize(), Qtrue, and xfree.
Referenced by ip_alloc(), and ip_create_slave_core().
Definition at line 8308 of file tcltklib.c.
References lib_fromUTF8_core(), Qnil, and rb_scan_args().
Referenced by Init_tcltklib().
Definition at line 10594 of file tcltklib.c.
References create_encoding_table(), encoding_table_get_name(), encoding_table_get_obj(), NIL_P, Qnil, rb_define_singleton_method(), and rb_ivar_get().
Referenced by Init_tcltklib(), and lib_fromUTF8_core().
Definition at line 1741 of file tcltklib.c.
References get_eventloop_tick().
Referenced by Init_tcltklib().
Definition at line 1848 of file tcltklib.c.
References get_eventloop_weight().
Referenced by Init_tcltklib().
Definition at line 9636 of file tcltklib.c.
References INT2FIX, and ip_get_variable().
Referenced by Init_tcltklib().
Definition at line 9645 of file tcltklib.c.
References INT2FIX, and ip_get_variable2().
Referenced by Init_tcltklib().
Definition at line 1793 of file tcltklib.c.
References get_no_event_wait().
Referenced by Init_tcltklib().
| static VALUE ip_get_result_string_obj | ( | Tcl_Interp * | interp | ) | [static] |
Definition at line 6952 of file tcltklib.c.
References rb_tainted_str_new2, RbTk_OBJ_UNTRUST, Tcl_DecrRefCount, and Tcl_IncrRefCount.
Referenced by ip_eval_real(), and ip_invoke_core().
Definition at line 9413 of file tcltklib.c.
References ip_get_variable2(), and Qnil.
Referenced by Init_tcltklib(), and ip_get_global_var().
Definition at line 9387 of file tcltklib.c.
References ip_get_variable2_core(), NIL_P, rb_tainted_str_new2, StringValue, and tk_funcall().
Referenced by Init_tcltklib(), ip_get_global_var2(), and ip_get_variable().
Definition at line 9291 of file tcltklib.c.
References create_ip_exc(), deleted_ip(), FIX2INT, get_ip(), tcltkip::ip, NIL_P, Qtrue, rb_eRuntimeError, rb_exc_new2(), rb_tainted_str_new2, RbTk_OBJ_UNTRUST, rbtk_preserve_ip(), rbtk_release_ip(), RSTRING_PTR, Tcl_DecrRefCount, Tcl_GetStringResult, and Tcl_IncrRefCount.
Referenced by ip_get_variable2().
Definition at line 6806 of file tcltklib.c.
References get_ip(), tcltkip::ip, Qfalse, and Qtrue.
Referenced by Init_tcltklib().
Definition at line 6858 of file tcltklib.c.
References ip_has_mainwindow_p_core(), and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 6841 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, Qfalse, Qnil, Qtrue, and tk_stubs_init_p().
Referenced by ip_has_mainwindow_p().
Definition at line 6131 of file tcltklib.c.
References ALLOC, tcltkip::allow_ruby_exit, cnt, Data_Get_Struct, DATA_PTR, DUMP1, DUMP2, FAIL_CreateInterp, FAIL_Tcl_InitStubs, FAIL_Tk_Init, FAIL_Tk_InitStubs, tcltkip::has_orig_exit, tcltkip::ip, ip_CallWhenDeleted(), ip_InterpExitCommand(), ip_rb_replaceSlaveTkCmdsCommand(), ip_replace_wait_commands(), ip_ruby_cmd(), ip_ruby_eval(), ip_RubyExitCommand(), ip_wrap_namespace_command(), NIL_P, NO_CreateInterp, NO_DeleteInterp, NO_FindExecutable, NO_TCL_DLL, NO_Tk_Init, tcltkip::orig_exit_info, Qfalse, rb_eLoadError, rb_eRuntimeError, rb_eSecurityError, rb_raise(), rb_safe_level(), rb_scan_args(), rbtk_preserve_ip(), tcltkip::ref_count, tcltkip::return_value, ruby_tcl_create_ip_and_stubs_init(), ruby_tcl_stubs_init(), ruby_tk_stubs_init(), StringValuePtr, Tcl_Eval, Tcl_GetStringResult, TCLTK_STUBS_OK, and tcltkip::tk_thread_id.
Referenced by Init_tcltklib().
| static int ip_InterpExitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | argc, | |||
| argv | ||||
| ) | [static] |
Definition at line 3715 of file tcltklib.c.
References DUMP1, ip_finalize(), and TCL_NAMESPACE_DEBUG.
Referenced by ip_allow_ruby_exit_set(), ip_create_slave_core(), ip_init(), ip_make_safe_core(), and ip_rb_replaceSlaveTkCmdsCommand().
Definition at line 9269 of file tcltklib.c.
References ip_invoke_with_position().
Referenced by Init_tcltklib().
Definition at line 8547 of file tcltklib.c.
References invoke_info::argc, invoke_info::argv, invoke_info::cmdinfo, CONST84, create_ip_exc(), deleted_ip(), DUMP1, DUMP2, free, get_ip(), invoke_tcl_proc(), tcltkip::ip, ip_get_result_string_obj(), NIL_P, pending_exception_check1(), invoke_info::ptr, Qtrue, rb_eException, rb_eFatal, rb_eNameError, rb_errinfo(), rb_eRuntimeError, rb_exc_new2(), rb_protect(), rb_tainted_str_new2, rb_warn(), rb_warning(), rbtk_pending_exception, rbtk_preserve_ip(), rbtk_release_ip(), tcltkip::return_value, strdup, TAG_FATAL, TAG_RAISE, Tcl_DecrRefCount, Tcl_GetStringResult, and Tcl_IncrRefCount.
Referenced by invoke_queue_handler(), ip_invoke_real(), and ivq_safelevel_handler().
Definition at line 9278 of file tcltklib.c.
References ip_invoke_with_position(), and rb_secure().
Referenced by Init_tcltklib().
Definition at line 8921 of file tcltklib.c.
References alloc_invoke_arguments(), deleted_ip(), DUMP2, free_invoke_arguments(), get_ip(), tcltkip::ip, ip_invoke_core(), rb_tainted_str_new2, and rb_thread_current().
Referenced by ip_invoke_with_position().
| static VALUE ip_invoke_with_position | ( | int | argc, | |
| VALUE * | argv, | |||
| VALUE | obj, | |||
| Tcl_QueuePosition | position | |||
| ) | [static] |
Definition at line 9075 of file tcltklib.c.
References alloc_invoke_arguments(), DUMP1, DUMP2, EVENT_HANDLER_TIMEOUT, free_invoke_arguments(), get_ip(), invoke_queue_handler(), ip_invoke_real(), long, NIL_P, Qnil, Qtrue, RARRAY_PTR, rb_ary_new3(), rb_eArgError, rb_eException, rb_exc_new3(), rb_exc_raise(), rb_funcall(), rb_obj_class(), rb_obj_is_kind_of(), rb_raise(), rb_safe_level(), rb_thread_current(), rb_thread_wait_for(), result, RUBY_USE_NATIVE_THREAD, tcltkip::tk_thread_id, timeval::tv_sec, and timeval::tv_usec.
Referenced by ip_invoke(), ip_invoke_immediate(), ip_thread_tkwait(), and ip_thread_vwait().
Definition at line 6828 of file tcltklib.c.
References deleted_ip(), get_ip(), Qfalse, and Qtrue.
Referenced by Init_tcltklib().
Definition at line 6680 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, Qfalse, Qtrue, rb_eRuntimeError, and rb_raise().
Referenced by Init_tcltklib().
Definition at line 6530 of file tcltklib.c.
References get_ip(), Qfalse, Qtrue, rb_eArgError, rb_obj_is_kind_of(), and rb_raise().
Referenced by Init_tcltklib().
Definition at line 2744 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, lib_mainloop(), NULL, and Qnil.
Referenced by Init_tcltklib().
Definition at line 2873 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, lib_mainloop_watchdog(), NULL, and Qnil.
Referenced by Init_tcltklib().
Definition at line 10739 of file tcltklib.c.
References ip_make_menu_embeddable_core(), and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 10659 of file tcltklib.c.
References get_ip(), tcltkip::ip, rb_eArgError, rb_eRuntimeError, rb_notimplement(), rb_raise(), RSTRING_PTR, StringValue, and strlen().
Referenced by ip_make_menu_embeddable().
Definition at line 6665 of file tcltklib.c.
References deleted_ip(), get_ip(), ip_make_safe_core(), rb_eRuntimeError, rb_raise(), and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 6627 of file tcltklib.c.
References tcltkip::allow_ruby_exit, create_ip_exc(), deleted_ip(), DUMP1, get_ip(), tcltkip::ip, ip_InterpExitCommand(), rb_eRuntimeError, rb_exc_new2(), Tcl_GetStringResult, and tk_stubs_init_p().
Referenced by ip_make_safe().
| static int ip_null_proc | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | argc, | |||
| argv | ||||
| ) | [static] |
Definition at line 5659 of file tcltklib.c.
Referenced by ip_finalize().
| static int ip_rb_replaceSlaveTkCmdsCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 5955 of file tcltklib.c.
References DUMP1, ip_InterpExitCommand(), and ip_replace_wait_commands().
Referenced by ip_create_slave_core(), and ip_init().
| static int ip_rb_threadTkWaitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 5071 of file tcltklib.c.
References CONST84, DUMP1, DUMP2, EVENT_HANDLER_TIMEOUT, ip_rbTkWaitCommand(), long, NIL_P, options(), Qtrue, rb_eRuntimeError, rb_exc_new2(), rb_thread_alone(), rb_thread_current(), rb_thread_wait_for(), rb_threadVwaitProc(), rb_threadWaitVisibilityProc(), rb_threadWaitWindowProc(), rbtk_pending_exception, strlen(), Tcl_DecrRefCount, Tcl_IncrRefCount, tk_stubs_init_p(), TKWAIT_MODE_DESTROY, TKWAIT_MODE_VISIBILITY, timeval::tv_sec, and timeval::tv_usec.
Referenced by ip_rb_threadUpdateCommand(), and ip_replace_wait_commands().
| static int ip_rb_threadUpdateCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 4027 of file tcltklib.c.
References _, CONST84, DUMP1, EVENT_HANDLER_TIMEOUT, ip_rb_threadTkWaitCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbUpdateCommand(), ip_rbVwaitCommand(), long, NIL_P, rb_bug(), rb_eRuntimeError, rb_exc_new2(), rb_thread_alone(), rb_thread_current(), rb_thread_wait_for(), rb_threadUpdateProc(), rbtk_pending_exception, ruby_native_thread_p(), strlen(), timeval::tv_sec, timeval::tv_usec, and VwaitVarProc().
Referenced by ip_replace_wait_commands().
| static int ip_rb_threadVwaitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 4914 of file tcltklib.c.
References DUMP1, EVENT_HANDLER_TIMEOUT, ip_rbVwaitCommand(), long, NIL_P, Qtrue, rb_eRuntimeError, rb_exc_new2(), rb_thread_alone(), rb_thread_current(), rb_thread_wait_for(), rb_threadVwaitProc(), rbtk_pending_exception, Tcl_DecrRefCount, Tcl_IncrRefCount, timeval::tv_sec, and timeval::tv_usec.
Referenced by ip_rb_threadUpdateCommand(), ip_rbVwaitCommand(), and ip_replace_wait_commands().
| static int ip_rbTkWaitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 4458 of file tcltklib.c.
References CONST84, DUMP1, lib_eventloop_launcher(), NIL_P, options(), Qnil, Qtrue, rb_eInterrupt, rb_eRuntimeError, rb_eSystemExit, rb_exc_new2(), rb_obj_is_kind_of(), rb_thread_alone(), rb_thread_check_trap_pending(), rb_thread_current(), rbtk_pending_exception, strlen(), Tcl_DecrRefCount, Tcl_IncrRefCount, tk_stubs_init_p(), WaitVariableProc(), WaitVisibilityProc(), and WaitWindowProc().
Referenced by ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), and ip_replace_wait_commands().
| static int ip_rbUpdateCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 3873 of file tcltklib.c.
References CONST84, DUMP1, DUMP2, lib_eventloop_launcher(), NIL_P, rb_bug(), rb_eInterrupt, rb_eRuntimeError, rb_eSystemExit, rb_exc_new2(), rb_obj_is_kind_of(), rb_thread_check_trap_pending(), rbtk_pending_exception, RTEST, ruby_native_thread_p(), strlen(), and Tcl_GetStringResult.
Referenced by ip_rb_threadUpdateCommand(), and ip_replace_wait_commands().
| static int ip_rbVwaitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | objc, | |||
| objv | ||||
| ) | [static] |
Definition at line 4214 of file tcltklib.c.
References _, CONST84, th_update_param::done, DUMP1, ip_rb_threadVwaitCommand(), lib_eventloop_launcher(), NIL_P, Qnil, Qtrue, rb_bug(), rb_eInterrupt, rb_eRuntimeError, rb_eSystemExit, rb_exc_new2(), rb_obj_is_kind_of(), rb_thread_alone(), rb_thread_check_trap_pending(), rb_thread_current(), rbtk_pending_exception, RTEST, ruby_native_thread_p(), Tcl_DecrRefCount, Tcl_IncrRefCount, VwaitVarProc(), and WaitVariableProc().
Referenced by ip_rb_threadUpdateCommand(), ip_rb_threadVwaitCommand(), and ip_replace_wait_commands().
| static void ip_replace_wait_commands | ( | Tcl_Interp * | interp, | |
| Tk_Window | mainWin | |||
| ) | [static] |
Definition at line 5874 of file tcltklib.c.
References DUMP1, ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbUpdateCommand(), and ip_rbVwaitCommand().
Referenced by ip_create_slave_core(), ip_init(), and ip_rb_replaceSlaveTkCmdsCommand().
Definition at line 7916 of file tcltklib.c.
References deleted_ip(), get_ip(), tcltkip::ip, lib_restart(), Qnil, rb_eRuntimeError, rb_raise(), rb_secure(), and tcl_stubs_check().
Referenced by Init_tcltklib().
Definition at line 9252 of file tcltklib.c.
References deleted_ip(), get_ip(), INT2FIX, rb_tainted_str_new2, and tcltkip::return_value.
Referenced by Init_tcltklib().
| static int ip_ruby_cmd | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | argc, | |||
| argv | ||||
| ) | [static] |
Definition at line 3582 of file tcltklib.c.
References ALLOC, cmd_body_arg::args, DUMP2, ip_ruby_cmd_core(), ip_ruby_cmd_receiver_get(), cmd_body_arg::method, NIL_P, Qfalse, Qtrue, RARRAY, rb_ary_new2(), rb_ary_push(), rb_eArgError, rb_eRuntimeError, rb_exc_new2(), rb_gc_disable(), rb_gc_enable(), rb_intern, rb_raise(), rb_tainted_str_new(), rb_tainted_str_new2, rbtk_pending_exception, cmd_body_arg::receiver, Tcl_GetStringResult, tcl_protect(), and xfree.
Referenced by ip_init().
| static VALUE ip_ruby_cmd_core | ( | struct cmd_body_arg * | arg | ) | [static] |
Definition at line 3463 of file tcltklib.c.
References DUMP1, DUMP2, Qfalse, and rb_apply().
Referenced by ip_ruby_cmd().
| static VALUE ip_ruby_cmd_receiver_const_get | ( | char * | name | ) | [static] |
Definition at line 3483 of file tcltklib.c.
References free, Qnil, rb_cObject, rb_const_get(), rb_eval_string_protect(), rb_intern, and strdup.
Referenced by ip_ruby_cmd_receiver_get().
| static VALUE ip_ruby_cmd_receiver_get | ( | char * | str | ) | [static] |
Definition at line 3535 of file tcltklib.c.
References ALLOC_N, buf, ip_ruby_cmd_receiver_const_get(), Qnil, rb_gv_get(), rb_protect(), strlen(), and xfree.
Referenced by ip_ruby_cmd().
| static int ip_ruby_eval | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | argc, | |||
| argv | ||||
| ) | [static] |
Definition at line 3391 of file tcltklib.c.
References ALLOC_N, buf, DUMP2, Qtrue, rb_eArgError, rb_eRuntimeError, rb_eval_string(), rb_exc_new2(), rb_raise(), rbtk_pending_exception, Tcl_GetStringResult, tcl_protect(), and xfree.
Referenced by ip_init().
| static int ip_RubyExitCommand | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| int | argc, | |||
| argv | ||||
| ) | [static] |
Definition at line 3760 of file tcltklib.c.
References DUMP1, INT2FIX, ip_finalize(), rb_eSystemExit, rb_exc_new2(), rb_iv_set(), rb_safe_level(), rbtk_pending_exception, strtol(), and Tcl_GetStringResult.
Referenced by ip_allow_ruby_exit_set(), and ip_init().
Definition at line 1722 of file tcltklib.c.
References deleted_ip(), get_eventloop_tick(), get_ip(), tcltkip::ip, NULL, and set_eventloop_tick().
Referenced by Init_tcltklib().
Definition at line 1828 of file tcltklib.c.
References deleted_ip(), get_eventloop_weight(), get_ip(), tcltkip::ip, NULL, and set_eventloop_weight().
Referenced by Init_tcltklib().
| static void ip_set_exc_message | ( | Tcl_Interp * | interp, | |
| VALUE | exc | |||
| ) | [static] |
Definition at line 3083 of file tcltklib.c.
References ALLOC_N, buf, DUMP2, msg, NIL_P, Qtrue, rb_attr_get(), rb_funcall(), RSTRING_LEN, RSTRING_PTR, StringValue, T_STRING, TYPE, and xfree.
Referenced by tcl_protect_core().
Definition at line 9655 of file tcltklib.c.
References INT2FIX, and ip_set_variable().
Referenced by Init_tcltklib().
Definition at line 9665 of file tcltklib.c.
References INT2FIX, and ip_set_variable2().
Referenced by Init_tcltklib().
Definition at line 1774 of file tcltklib.c.
References deleted_ip(), get_ip(), get_no_event_wait(), tcltkip::ip, NULL, and set_no_event_wait().
Referenced by Init_tcltklib().
Definition at line 9552 of file tcltklib.c.
References ip_set_variable2(), and Qnil.
Referenced by Init_tcltklib(), and ip_set_global_var().
| static VALUE ip_set_variable2 | ( | VALUE | self, | |
| VALUE | varname, | |||
| VALUE | index, | |||
| VALUE | value, | |||
| VALUE | flag | |||
| ) | [static] |
Definition at line 9523 of file tcltklib.c.
References ip_set_variable2_core(), NIL_P, rb_tainted_str_new2, StringValue, and tk_funcall().
Referenced by Init_tcltklib(), ip_set_global_var2(), and ip_set_variable().
Definition at line 9422 of file tcltklib.c.
References create_ip_exc(), deleted_ip(), FIX2INT, get_ip(), tcltkip::ip, NIL_P, Qtrue, rb_eRuntimeError, rb_exc_new2(), rb_tainted_str_new2, RbTk_OBJ_UNTRUST, rbtk_preserve_ip(), rbtk_release_ip(), RSTRING_PTR, Tcl_DecrRefCount, Tcl_GetStringResult, and Tcl_IncrRefCount.
Referenced by ip_set_variable2().
Definition at line 9840 of file tcltklib.c.
References lib_split_tklist_core().
Referenced by Init_tcltklib().
Definition at line 5518 of file tcltklib.c.
References ip_invoke_with_position(), and rb_str_new2.
Referenced by Init_tcltklib().
Definition at line 5504 of file tcltklib.c.
References ip_invoke_with_position(), and rb_str_new2.
Referenced by Init_tcltklib().
Definition at line 8106 of file tcltklib.c.
References lib_toUTF8_core(), Qnil, and rb_scan_args().
Referenced by Init_tcltklib().
Definition at line 9676 of file tcltklib.c.
References INT2FIX, and ip_unset_variable().
Referenced by Init_tcltklib().
Definition at line 9685 of file tcltklib.c.
References INT2FIX, and ip_unset_variable2().
Referenced by Init_tcltklib().
Definition at line 9627 of file tcltklib.c.
References ip_unset_variable2(), and Qnil.
Referenced by Init_tcltklib(), and ip_unset_global_var().
Definition at line 9601 of file tcltklib.c.
References ip_unset_variable2_core(), NIL_P, rb_tainted_str_new2, StringValue, and tk_funcall().
Referenced by Init_tcltklib(), ip_unset_global_var2(), and ip_unset_variable().
Definition at line 9562 of file tcltklib.c.
References create_ip_exc(), deleted_ip(), FIX2INT, get_ip(), tcltkip::ip, NIL_P, Qfalse, Qtrue, rb_eRuntimeError, tcltkip::return_value, RSTRING_PTR, and Tcl_GetStringResult.
Referenced by ip_unset_variable2().
| static void ip_wrap_namespace_command | ( | Tcl_Interp * | interp | ) | [static] |
Definition at line 6078 of file tcltklib.c.
Referenced by ip_create_slave_core(), and ip_init().
Definition at line 8959 of file tcltklib.c.
References invoke_queue::argc, invoke_queue::argv, Data_Get_Struct, DUMP2, invoke_queue::interp, ip_invoke_core(), rb_set_safe_level(), and invoke_queue::safe_level.
Referenced by invoke_queue_handler().
Definition at line 9946 of file tcltklib.c.
References OBJ_TAINTED, Qtrue, rb_str_new(), rb_str_resize(), RbTk_OBJ_UNTRUST, RSTRING_LEN, RSTRING_PTR, StringValue, and tcl_stubs_check().
Referenced by Init_tcltklib().
Definition at line 3064 of file tcltklib.c.
References lib_do_one_event_core().
Referenced by Init_tcltklib().
Definition at line 3007 of file tcltklib.c.
References Check_Type, deleted_ip(), FIX2INT, get_ip(), tcltkip::ip, NIL_P, OBJ_TAINTED, pending_exception_check0(), Qfalse, Qtrue, rb_eRuntimeError, rb_raise(), rb_safe_level(), rb_scan_args(), T_FIXNUM, and tcl_stubs_check().
Referenced by ip_do_one_event(), and lib_do_one_event().
| static int lib_eventloop_core | ( | int | check_root, | |
| int | update_flag, | |||
| int * | check_var, | |||
| Tcl_Interp * | interp | |||
| ) | [static] |
Definition at line 2175 of file tcltklib.c.
References _timer_for_tcl(), call_DoOneEvent(), check_eventloop_interp(), CHECK_INTS, DUMP1, DUMP2, eventloop_sleep(), INT2FIX, long, NIL_P, NO_THREAD_INTERRUPT_TIME, NULL, pending_exception_check0(), Qnil, Qtrue, rb_eException, rb_eFatal, rb_errinfo(), rb_exc_new2(), rb_exc_raise(), rb_protect(), rb_thread_alone(), rb_thread_check_ints(), rb_thread_schedule(), rb_thread_sleep_forever(), rbtk_eventloop_depth, rbtk_pending_exception, RTEST, TAG_FATAL, TAG_RAISE, timer_token, tk_stubs_init_p(), TRAP_CHECK, timeval::tv_sec, and timeval::tv_usec.
Referenced by lib_eventloop_main_core().
Definition at line 2604 of file tcltklib.c.
References DUMP2, NIL_P, NULL, Qnil, rb_ary_pop(), rb_funcall(), rb_thread_alive_p(), rb_thread_current(), rb_thread_wakeup(), rbtk_EventCheckProc(), rbtk_eventloop_depth, rbtk_EventSetupProc(), RTEST, evloop_params::thr_crit_bup, timer_token, and xfree.
Referenced by lib_eventloop_launcher().
| static VALUE lib_eventloop_launcher | ( | int | check_root, | |
| int | update_flag, | |||
| int * | check_var, | |||
| Tcl_Interp * | interp | |||
| ) | [static] |
Definition at line 2670 of file tcltklib.c.
References ALLOC, evloop_params::check_root, evloop_params::check_var, DUMP1, DUMP2, DUMP3, evloop_params::interp, lib_eventloop_ensure(), lib_eventloop_main(), lib_eventloop_main_core(), NIL_P, Qfalse, rb_ary_push(), rb_ensure(), rb_funcall(), rb_thread_current(), rb_thread_run(), rbtk_eventloop_depth, RTEST, tcl_stubs_check(), evloop_params::thr_crit_bup, and evloop_params::update_flag.
Referenced by ip_rbTkWaitCommand(), ip_rbUpdateCommand(), ip_rbVwaitCommand(), lib_mainloop(), lib_thread_callback(), and watchdog_evloop_launcher().
Definition at line 2569 of file tcltklib.c.
References lib_eventloop_main_core(), NIL_P, Qnil, rb_eException, rb_eFatal, rb_errinfo(), rb_exc_new2(), rb_protect(), rbtk_pending_exception, TAG_FATAL, and TAG_RAISE.
Referenced by lib_eventloop_launcher().
Definition at line 2549 of file tcltklib.c.
References evloop_params::check_root, evloop_params::check_var, evloop_params::interp, lib_eventloop_core(), Qfalse, Qtrue, rbtk_EventCheckProc(), rbtk_EventSetupProc(), and evloop_params::update_flag.
Referenced by lib_eventloop_launcher(), and lib_eventloop_main().
Definition at line 1904 of file tcltklib.c.
References Qfalse, Qnil, and Qtrue.
Referenced by Init_tcltklib(), ip_evloop_abort_on_exc(), ip_evloop_abort_on_exc_set(), and lib_evloop_abort_on_exc_set().
Definition at line 1924 of file tcltklib.c.
References lib_evloop_abort_on_exc(), NIL_P, rb_secure(), and RTEST.
Referenced by Init_tcltklib(), and ip_evloop_abort_on_exc_set().
Definition at line 1891 of file tcltklib.c.
References NIL_P, Qfalse, Qnil, Qtrue, and rb_thread_current().
Referenced by Init_tcltklib().
Definition at line 8294 of file tcltklib.c.
References lib_fromUTF8_core(), Qnil, and rb_scan_args().
Referenced by Init_tcltklib().
Definition at line 8120 of file tcltklib.c.
References ALLOC_N, buf, encoding_table_get_obj(), get_ip(), tcltkip::ip, ip_get_encoding_table(), NIL_P, OBJ_TAINTED, Qtrue, rb_attr_get(), rb_eArgError, rb_enc_associate_index(), rb_enc_find_index(), rb_enc_get_index(), rb_funcall(), rb_ivar_set(), rb_obj_dup(), rb_raise(), rb_str_new(), rb_str_new2, rb_tainted_str_new(), rb_tainted_str_new2, rb_to_encoding_index(), rb_warning(), RbTk_OBJ_UNTRUST, RSTRING_LEN, RSTRING_PTR, StringValue, T_STRING, Tcl_DecrRefCount, Tcl_IncrRefCount, tcl_stubs_check(), TYPE, and xfree.
Referenced by ip_fromUTF8(), and lib_fromUTF8().
Definition at line 9995 of file tcltklib.c.
References rb_eRuntimeError, rb_raise(), rb_str_new2, set_tcltk_version(), TCL_ALPHA_RELEASE, TCL_BETA_RELEASE, TCL_FINAL_RELEASE, and tcltk_version.
Referenced by Init_tcltklib().
Definition at line 8418 of file tcltklib.c.
References Qnil, rb_str_new2, and tcl_stubs_check().
Referenced by Init_tcltklib(), and lib_set_system_encoding().
Definition at line 9983 of file tcltklib.c.
References INT2NUM(), rb_ary_new3(), set_tcltk_version(), and tcltk_version.
Referenced by Init_tcltklib().
Definition at line 2724 of file tcltklib.c.
References lib_eventloop_launcher(), NULL, Qfalse, Qtrue, rb_scan_args(), and RTEST.
Referenced by Init_tcltklib(), and ip_mainloop().
Definition at line 2848 of file tcltklib.c.
References lib_watchdog_core(), lib_watchdog_ensure(), Qfalse, Qnil, Qtrue, rb_eNotImpError, rb_ensure(), rb_raise(), rb_scan_args(), and RTEST.
Referenced by Init_tcltklib(), and ip_mainloop_watchdog().
| static void lib_mark_at_exit | ( | VALUE | self | ) | [static] |
Definition at line 5636 of file tcltklib.c.
Referenced by Init_tcltklib().
Definition at line 9848 of file tcltklib.c.
References OBJ_TAINTED, Qfalse, Qtrue, rb_gc_disable(), rb_gc_enable(), rb_str_new(), rb_str_new2, RbTk_OBJ_UNTRUST, result, RSTRING_LEN, RSTRING_PTR, StringValuePtr, and tcl_stubs_check().
Referenced by Init_tcltklib().
Definition at line 1972 of file tcltklib.c.
References lib_num_of_mainwindows_core(), NULL, and tk_funcall().
Referenced by Init_tcltklib().
Definition at line 1959 of file tcltklib.c.
References INT2FIX, and tk_stubs_init_p().
Referenced by lib_num_of_mainwindows().
Definition at line 7897 of file tcltklib.c.
References deleted_ip(), get_ip(), lib_restart_core(), rb_eRuntimeError, rb_raise(), rb_secure(), tcl_stubs_check(), and tk_funcall().
Referenced by ip_restart().
Definition at line 7835 of file tcltklib.c.
References deleted_ip(), DUMP2, get_ip(), tcltkip::ip, NIL_P, Qtrue, rb_eRuntimeError, rb_exc_new2(), rbtk_preserve_ip(), rbtk_release_ip(), tcltkip::return_value, Tcl_Eval, and tcltkip_init_tk().
Referenced by lib_restart().
Definition at line 8430 of file tcltklib.c.
References lib_get_system_encoding(), NIL_P, Qnil, rb_eArgError, rb_funcall(), rb_raise(), RSTRING_PTR, StringValuePtr, and tcl_stubs_check().
Referenced by Init_tcltklib().
Definition at line 9831 of file tcltklib.c.
References lib_split_tklist_core(), and Qnil.
Referenced by Init_tcltklib().
Definition at line 9697 of file tcltklib.c.
References get_ip(), tcltkip::ip, NIL_P, OBJ_TAINTED, Qfalse, Qtrue, rb_ary_new2(), rb_ary_push(), rb_enc_associate_index(), rb_enc_get_index(), rb_eRuntimeError, rb_gc_disable(), rb_gc_enable(), rb_ivar_get(), rb_ivar_set(), rb_raise(), rb_str_new2, rb_tainted_str_new2, RbTk_OBJ_UNTRUST, result, RSTRING_PTR, StringValue, Tcl_DecrRefCount, Tcl_GetStringResult, Tcl_IncrRefCount, and tcl_stubs_check().
Referenced by ip_split_tklist(), and lib_split_tklist().
Definition at line 8410 of file tcltklib.c.
References lib_UTF_backslash_core().
Referenced by Init_tcltklib().
Definition at line 2944 of file tcltklib.c.
References _thread_call_proc(), _thread_call_proc_value(), ALLOC, thread_call_proc_arg::done, lib_eventloop_launcher(), NIL_P, NULL, thread_call_proc_arg::proc, Qnil, rb_block_proc(), rb_errinfo(), rb_exc_raise(), rb_funcall(), rb_protect(), rb_scan_args(), rb_thread_alive_p(), rb_thread_create(), rb_thread_schedule(), rbtk_pending_exception, RTEST, and xfree.
Referenced by Init_tcltklib().
Definition at line 8092 of file tcltklib.c.
References lib_toUTF8_core(), Qnil, and rb_scan_args().
Referenced by Init_tcltklib().
Definition at line 7938 of file tcltklib.c.
References ALLOC_N, buf, deleted_ip(), get_ip(), tcltkip::ip, NIL_P, OBJ_TAINTED, Qtrue, rb_attr_get(), rb_eArgError, rb_enc_associate_index(), rb_funcall(), rb_ivar_set(), rb_obj_encoding(), rb_raise(), rb_str_new(), rb_str_new2, rb_warning(), RbTk_OBJ_UNTRUST, RSTRING_LEN, RSTRING_PTR, StringValue, T_STRING, tcl_stubs_check(), TYPE, and xfree.
Referenced by ip_toUTF8(), and lib_toUTF8().
Definition at line 8402 of file tcltklib.c.
References lib_UTF_backslash_core().
Referenced by Init_tcltklib().
Definition at line 8322 of file tcltklib.c.
References OBJ_TAINTED, Qtrue, rb_enc_associate_index(), rb_ivar_set(), rb_str_new(), RbTk_OBJ_UNTRUST, RSTRING_LEN, RSTRING_PTR, StringValue, and tcl_stubs_check().
Referenced by lib_Tcl_backslash(), and lib_UTF_backslash().
Definition at line 2780 of file tcltklib.c.
References DUMP2, EVLOOP_WAKEUP_CHANCE, long, NIL_P, NO_THREAD_INTERRUPT_TIME, Qnil, rb_funcall(), rb_thread_create(), rb_thread_current(), rb_thread_run(), rb_thread_wait_for(), RTEST, tk_stubs_init_p(), timeval::tv_sec, timeval::tv_usec, watchdog_evloop_launcher(), and WATCHDOG_INTERVAL.
Referenced by lib_mainloop_watchdog().
| int matherr | ( | ) |
| static int pending_exception_check0 | ( | ) | [static] |
Definition at line 1376 of file tcltklib.c.
References DUMP1, NIL_P, Qnil, rb_eException, rb_exc_raise(), rb_jump_tag(), rb_obj_is_kind_of(), rbtk_eventloop_depth, rbtk_internal_eventloop_handler, rbtk_pending_exception, TAG_REDO, TAG_RETRY, and TAG_THROW.
Referenced by lib_do_one_event_core(), and lib_eventloop_core().
| static int pending_exception_check1 | ( | int | thr_crit_bup, | |
| struct tcltkip * | ptr | |||
| ) | [static] |
Definition at line 1408 of file tcltklib.c.
References DUMP1, NIL_P, NULL, Qnil, rb_eException, rb_exc_raise(), rb_jump_tag(), rb_obj_is_kind_of(), rbtk_eventloop_depth, rbtk_internal_eventloop_handler, rbtk_pending_exception, rbtk_release_ip(), TAG_REDO, TAG_RETRY, and TAG_THROW.
Referenced by ip_eval_real(), and ip_invoke_core().
| static void rb_threadUpdateProc | ( | ClientData | clientData | ) | [static] |
Definition at line 4002 of file tcltklib.c.
References th_update_param::done, DUMP1, rb_thread_wakeup(), and th_update_param::thread.
Referenced by ip_rb_threadUpdateCommand().
| static char* rb_threadVwaitProc | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| char * | name1, | |||
| char * | name2, | |||
| int | flags | |||
| ) | [static] |
Definition at line 4851 of file tcltklib.c.
References th_vwait_param::done, rb_thread_wakeup(), and th_vwait_param::thread.
Referenced by ip_rb_threadTkWaitCommand(), and ip_rb_threadVwaitCommand().
| static void rb_threadWaitVisibilityProc | ( | ClientData | clientData, | |
| XEvent * | eventPtr | |||
| ) | [static] |
Definition at line 4876 of file tcltklib.c.
References th_vwait_param::done, rb_thread_wakeup(), th_vwait_param::thread, TKWAIT_MODE_DESTROY, and TKWAIT_MODE_VISIBILITY.
Referenced by ip_rb_threadTkWaitCommand().
| static void rb_threadWaitWindowProc | ( | ClientData | clientData, | |
| XEvent * | eventPtr | |||
| ) | [static] |
Definition at line 4893 of file tcltklib.c.
References th_vwait_param::done, rb_thread_wakeup(), th_vwait_param::thread, and TKWAIT_MODE_DESTROY.
Referenced by ip_rb_threadTkWaitCommand().
| void rbtk_EventCheckProc | ( | ClientData | clientData, | |
| int | flag | |||
| ) |
Definition at line 1992 of file tcltklib.c.
References rb_thread_schedule().
Referenced by lib_eventloop_ensure(), and lib_eventloop_main_core().
| void rbtk_EventSetupProc | ( | ClientData | clientData, | |
| int | flag | |||
| ) |
Definition at line 1983 of file tcltklib.c.
References long.
Referenced by lib_eventloop_ensure(), and lib_eventloop_main_core().
| static int rbtk_preserve_ip | ( | struct tcltkip * | ptr | ) | [static] |
Definition at line 800 of file tcltklib.c.
References NULL.
Referenced by ip_create_slave_core(), ip_eval_real(), ip_get_variable2_core(), ip_init(), ip_invoke_core(), ip_set_variable2_core(), and lib_restart_core().
| static int rbtk_release_ip | ( | struct tcltkip * | ptr | ) | [static] |
Definition at line 814 of file tcltklib.c.
References NULL.
Referenced by ip_eval_real(), ip_get_variable2_core(), ip_invoke_core(), ip_set_variable2_core(), lib_restart_core(), and pending_exception_check1().
Definition at line 1680 of file tcltklib.c.
References _timer_for_tcl(), NULL, NUM2INT, Qtrue, rb_eArgError, rb_raise(), rb_secure(), and timer_token.
Referenced by Init_tcltklib(), and ip_set_eventloop_tick().
Definition at line 1800 of file tcltklib.c.
References NUM2INT, rb_ary_new3(), rb_eArgError, rb_raise(), and rb_secure().
Referenced by Init_tcltklib(), and ip_set_eventloop_weight().
Definition at line 1653 of file tcltklib.c.
References rb_secure(), and RTEST.
Referenced by Init_tcltklib().
Definition at line 1855 of file tcltklib.c.
References INT2FIX, long, LONG2NUM, NUM2DBL, NUM2LONG(), Qnil, RARRAY_PTR, rb_eArgError, rb_funcall(), rb_intern, rb_raise(), StringValuePtr, T_BIGNUM, T_FIXNUM, T_FLOAT, and TYPE.
Referenced by Init_tcltklib().
Definition at line 1748 of file tcltklib.c.
References NUM2INT, rb_eArgError, rb_raise(), and rb_secure().
Referenced by Init_tcltklib(), and ip_set_no_event_wait().
| static void set_tcltk_version | ( | ) | [static] |
Definition at line 112 of file tcltklib.c.
References tcltk_version.
Referenced by lib_get_reltype_name(), and lib_getversion().
| static int tcl_eval | ( | Tcl_Interp * | interp, | |
| const char * | cmd | |||
| ) | [static] |
| static int tcl_global_eval | ( | Tcl_Interp * | interp, | |
| const char * | cmd | |||
| ) | [static] |
Definition at line 293 of file tcltklib.c.
References buf, free, strdup, and Tcl_GlobalEval.
Definition at line 3354 of file tcltklib.c.
References rb_bug(), ruby_native_thread_p(), and tcl_protect_core().
Referenced by ip_ruby_cmd(), and ip_ruby_eval().
Definition at line 3178 of file tcltklib.c.
References ALLOC_N, buf, DUMP1, DUMP2, ip_set_exc_message(), NIL_P, Qfalse, Qnil, Qtrue, rb_ary_join(), rb_eException, rb_eFatal, rb_eInterrupt, rb_errinfo(), rb_eSystemExit, rb_exc_new2(), rb_exc_new3(), rb_funcall(), rb_gc_disable(), rb_gc_enable(), rb_ivar_get(), rb_obj_as_string(), rb_obj_class(), rb_obj_is_kind_of(), rb_protect(), rb_str_append(), rb_str_new2, rbtk_pending_exception, RSTRING_PTR, StringValuePtr, SYM2ID, T_SYMBOL, TAG_BREAK, TAG_FATAL, TAG_NEXT, TAG_RAISE, TAG_REDO, TAG_RETRY, TAG_RETURN, TAG_THROW, TkStringValue(), TYPE, type, and xfree.
Referenced by tcl_protect().
| static void tcl_stubs_check | ( | ) | [static] |
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(), tcl_stubs_init_p(), and TCLTK_STUBS_OK.
Referenced by create_encoding_table_core(), Init_tcltklib(), ip_restart(), lib_conv_listelement(), lib_do_one_event_core(), lib_eventloop_launcher(), lib_fromUTF8_core(), lib_get_system_encoding(), lib_merge_tklist(), lib_restart(), lib_set_system_encoding(), lib_split_tklist_core(), lib_toUTF8_core(), and lib_UTF_backslash_core().
Definition at line 1302 of file tcltklib.c.
References create_ip_exc(), DUMP1, FAIL_Tk_Init, FAIL_Tk_InitStubs, get_ip(), tcltkip::ip, NO_Tk_Init, Qnil, rb_eLoadError, rb_eRuntimeError, rb_exc_new2(), ruby_tk_stubs_init(), ruby_tk_stubs_safeinit(), Tcl_GetStringResult, TCLTK_STUBS_OK, and tcltkip::tk_thread_id.
Referenced by ip_create_console_core(), ip_create_slave_core(), and lib_restart_core().
| static VALUE tcltklib_compile_info | ( | ) | [static] |
Definition at line 10014 of file tcltklib.c.
References ALLOC_N, HAVE_NATIVETHREAD, rb_obj_freeze(), rb_str_new2, RUBY_RELEASE_DATE, RUBY_VERSION, size, strlen(), TCLTKLIB_RELEASE_DATE, and xfree.
Referenced by Init_tcltklib().
Definition at line 7090 of file tcltklib.c.
References call_queue::argc, call_queue::argv, call_queue_handler(), deleted_ip(), call_queue::done, DUMP1, DUMP2, call_queue::ev, EVENT_HANDLER_TIMEOUT, call_queue::func, get_ip(), call_queue::interp, long, MEMCPY, NIL_P, Qnil, Qtrue, RARRAY_PTR, rb_ary_new3(), rb_eException, rb_exc_new3(), rb_exc_raise(), rb_funcall(), rb_obj_class(), rb_obj_is_kind_of(), rb_safe_level(), rb_thread_current(), rb_thread_wait_for(), call_queue::result, result, call_queue::safe_level, call_queue::thread, tcltkip::tk_thread_id, timeval::tv_sec, and timeval::tv_usec.
Referenced by call_DoOneEvent(), ip_create_console(), ip_create_slave(), ip_get_variable2(), ip_has_mainwindow_p(), ip_make_menu_embeddable(), ip_make_safe(), ip_set_variable2(), ip_unset_variable2(), lib_num_of_mainwindows(), and lib_restart().
Definition at line 3146 of file tcltklib.c.
References rb_funcall(), rb_respond_to(), rb_str_new2, T_ARRAY, T_FALSE, T_NIL, T_STRING, T_TRUE, and TYPE.
Referenced by tcl_protect_core().
| static int trap_check | ( | int * | check_var | ) | [static] |
Definition at line 2132 of file tcltklib.c.
References DUMP1, NULL, rb_thread_check_ints(), rb_thread_check_trap_pending(), and rb_trap_exec().
Definition at line 10128 of file tcltklib.c.
References create_dummy_encoding_for_tk_core(), deleted_ip(), enc_list(), get_ip(), tcltkip::ip, NIL_P, Qnil, rb_enc_find_index(), rb_enc_from_encoding(), rb_enc_from_index(), rb_hash_aset(), rb_hash_lookup(), rb_obj_freeze(), rb_str_new2, StringValueCStr, Tcl_DecrRefCount, and Tcl_IncrRefCount.
Referenced by encoding_table_get_name_core().
| static char* VwaitVarProc | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| char * | name1, | |||
| char * | name2, | |||
| int | flags | |||
| ) | [static] |
Definition at line 4191 of file tcltklib.c.
Referenced by ip_rb_threadUpdateCommand(), and ip_rbVwaitCommand().
| static char* WaitVariableProc | ( | ClientData | clientData, | |
| Tcl_Interp * | interp, | |||
| char * | name1, | |||
| char * | name2, | |||
| int | flags | |||
| ) | [static] |
Definition at line 4406 of file tcltklib.c.
Referenced by ip_rbTkWaitCommand(), and ip_rbVwaitCommand().
| static void WaitVisibilityProc | ( | ClientData | clientData, | |
| XEvent * | eventPtr | |||
| ) | [static] |
Definition at line 4422 of file tcltklib.c.
Referenced by ip_rbTkWaitCommand().
| static void WaitWindowProc | ( | ClientData | clientData, | |
| XEvent * | eventPtr | |||
| ) | [static] |
Definition at line 4438 of file tcltklib.c.
Referenced by ip_rbTkWaitCommand().
Definition at line 2770 of file tcltklib.c.
References lib_eventloop_launcher(), NULL, and RTEST.
Referenced by lib_watchdog_core().
int at_exit = 0 [static] |
Definition at line 181 of file tcltklib.c.
Referenced by ruby_vm_at_exit().
int check_rootwidget_flag = 0 [static] |
Definition at line 534 of file tcltklib.c.
VALUE cRubyEncoding [static] |
Definition at line 184 of file tcltklib.c.
| Tcl_Interp* current_interp |
Definition at line 476 of file tcltklib.c.
VALUE eLocalJumpError [static] |
Definition at line 209 of file tcltklib.c.
int ENCODING_INDEX_BINARY [static] |
Definition at line 188 of file tcltklib.c.
int ENCODING_INDEX_UTF8 [static] |
Definition at line 187 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.
VALUE eTkCallbackBreak [static] |
Definition at line 206 of file tcltklib.c.
VALUE eTkCallbackContinue [static] |
Definition at line 207 of file tcltklib.c.
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.
VALUE eTkCallbackThrow [static] |
Definition at line 214 of file tcltklib.c.
VALUE eTkLocalJumpError [static] |
Definition at line 211 of file tcltklib.c.
int event_loop_abort_on_exc = 1 [static] |
Definition at line 531 of file tcltklib.c.
int event_loop_max = DEFAULT_EVENT_LOOP_MAX [static] |
Definition at line 523 of file tcltklib.c.
int event_loop_wait_event = 0 [static] |
Definition at line 530 of file tcltklib.c.
Tcl_Interp* eventloop_interp [static] |
Definition at line 467 of file tcltklib.c.
VALUE eventloop_stack [static] |
Definition at line 471 of file tcltklib.c.
VALUE eventloop_thread [static] |
Definition at line 466 of file tcltklib.c.
const char finalize_hook_name[] = "INTERP_FINALIZE_HOOK" [static] |
Definition at line 177 of file tcltklib.c.
int have_rb_thread_waiting_for_value = 0 [static] |
Definition at line 495 of file tcltklib.c.
ID ID_alive_p [static] |
Definition at line 225 of file tcltklib.c.
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.
Definition at line 236 of file tcltklib.c.
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.
Definition at line 227 of file tcltklib.c.
Definition at line 226 of file tcltklib.c.
ID ID_message [static] |
Definition at line 232 of file tcltklib.c.
Definition at line 237 of file tcltklib.c.
Definition at line 235 of file tcltklib.c.
Definition at line 224 of file tcltklib.c.
Definition at line 239 of file tcltklib.c.
Definition at line 228 of file tcltklib.c.
int loop_counter = 0 [static] |
Definition at line 532 of file tcltklib.c.
| int major |
Definition at line 105 of file tcltklib.c.
Referenced by foletypelib_major_version(), foletypelib_version(), libyaml_version(), marshal_load(), rb_stat_dev_major(), rb_stat_rdev_major(), and start_document().
| int minor |
Definition at line 106 of file tcltklib.c.
Referenced by foletypelib_minor_version(), foletypelib_version(), libyaml_version(), marshal_load(), rb_stat_dev_minor(), rb_stat_rdev_minor(), and start_document().
int no_event_tick = DEFAULT_NO_EVENT_TICK [static] |
Definition at line 524 of file tcltklib.c.
int no_event_wait = DEFAULT_NO_EVENT_WAIT [static] |
Definition at line 525 of file tcltklib.c.
| int patchlevel |
Definition at line 108 of file tcltklib.c.
int rbtk_eventloop_depth = 0 [static] |
Definition at line 1371 of file tcltklib.c.
Referenced by lib_eventloop_core(), lib_eventloop_ensure(), lib_eventloop_launcher(), pending_exception_check0(), and pending_exception_check1().
int rbtk_internal_eventloop_handler = 0 [static] |
Definition at line 1372 of file tcltklib.c.
Referenced by call_queue_handler(), eval_queue_handler(), invoke_queue_handler(), pending_exception_check0(), and pending_exception_check1().
VALUE rbtk_pending_exception [static] |
Definition at line 1370 of file tcltklib.c.
Referenced by Init_tcltklib(), ip_eval_real(), ip_invoke_core(), ip_rb_threadTkWaitCommand(), ip_rb_threadUpdateCommand(), ip_rb_threadVwaitCommand(), ip_rbTkWaitCommand(), ip_rbUpdateCommand(), ip_rbVwaitCommand(), ip_ruby_cmd(), ip_ruby_eval(), ip_RubyExitCommand(), lib_eventloop_core(), lib_eventloop_main(), lib_thread_callback(), pending_exception_check0(), pending_exception_check1(), and tcl_protect_core().
int req_timer_tick = DEFAULT_TIMER_TICK [static] |
Definition at line 527 of file tcltklib.c.
int run_timer_flag = 0 [static] |
Definition at line 528 of file tcltklib.c.
| int* tclDummyMathPtr = (int *) matherr |
Definition at line 391 of file tcltklib.c.
struct { ... } tcltk_version [static] |
Referenced by lib_get_reltype_name(), lib_getversion(), and 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.
int 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 _timer_for_tcl(), lib_eventloop_core(), lib_eventloop_ensure(), and set_eventloop_tick().
| Tcl_ThreadId tk_eventloop_thread_id |
Definition at line 469 of file tcltklib.c.
| int type |
Definition at line 107 of file tcltklib.c.
Referenced by callback(), check_type_tree(), compile_length_tree(), compile_tree(), count_objects(), count_objects_size(), find_iid(), fole_type(), function_call(), generic_to_value(), get_head_value_node(), init_inetsock_internal(), initialize(), insn_data_to_s_detail(), insn_operand_intern(), invoke_block_from_c(), iseq_build_from_ary_exception(), iseq_compile_each(), iseq_data_to_ary(), iseq_load(), iseq_set_sequence(), method_entry_i(), ole_method_invoke_kind(), ole_method_return_type(), ole_method_return_type_detail(), ole_ole_type(), ole_param_ole_type(), ole_ptrtype2val(), ole_type_from_itypeinfo(), ole_type_impl_ole_types(), ole_types_from_typelib(), ole_usertype2val(), ole_variable_ole_type(), ole_variable_ole_type_detail(), ossl_digest_initialize(), ossl_x509name_add_entry(), pack_pack(), pack_unpack(), r_object0(), r_symbol(), rb_check_type(), rb_dlcfunc_initialize(), rb_feature_p(), rb_method_entry_set(), rb_search_method_entry(), rsock_sock_s_socketpair(), search_required(), set_relation(), sock_initialize(), tcl_protect_core(), typeinfo_from_ole(), unix_s_socketpair(), vm_exec(), and vm_invoke_block().
VALUE watchdog_thread [static] |
Definition at line 474 of file tcltklib.c.
int window_event_mode = ~0 [static] |
Definition at line 472 of file tcltklib.c.
1.6.1