diff options
| author | eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-04 08:03:43 +0000 |
|---|---|---|
| committer | eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-04 08:03:43 +0000 |
| commit | d9f59963ed056dee27d6053ca5e6fffad845e514 (patch) | |
| tree | 1dd0c3ad59ae3e8a155847eada690f761fedddb6 /ext/tcltklib/tcltklib.c | |
| parent | c1dec62bbb452e6e0fc6ad8ffd5051f3618a2b49 (diff) | |
| download | ruby-d9f59963ed056dee27d6053ca5e6fffad845e514.tar.gz ruby-d9f59963ed056dee27d6053ca5e6fffad845e514.tar.xz ruby-d9f59963ed056dee27d6053ca5e6fffad845e514.zip | |
* ext/tcltklib/tcltklib.c (Init_tcltklib): moved the definition before actions.
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@2520 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tcltklib/tcltklib.c')
| -rw-r--r-- | ext/tcltklib/tcltklib.c | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c index ba7fdc500..c22893ae3 100644 --- a/ext/tcltklib/tcltklib.c +++ b/ext/tcltklib/tcltklib.c @@ -800,12 +800,6 @@ Init_tcltklib() VALUE ip = rb_define_class("TclTkIp", rb_cObject); VALUE ev_flag = rb_define_module_under(lib, "EventFlag"); - rb_define_const(ev_flag, "WINDOW", INT2FIX(TCL_WINDOW_EVENTS)); - rb_define_const(ev_flag, "FILE", INT2FIX(TCL_FILE_EVENTS)); - rb_define_const(ev_flag, "TIMER", INT2FIX(TCL_TIMER_EVENTS)); - rb_define_const(ev_flag, "IDLE", INT2FIX(TCL_IDLE_EVENTS)); - rb_define_const(ev_flag, "ALL", INT2FIX(TCL_ALL_EVENTS)); - rb_define_const(ev_flag, "DONT_WAIT", INT2FIX(TCL_DONT_WAIT)); #if defined USE_TCL_STUBS && defined USE_TK_STUBS extern int ruby_tcltk_stubs(); @@ -814,6 +808,13 @@ Init_tcltklib() rb_raise(rb_eLoadError, "tcltklib: tcltk_stubs init error(%d)", ret); #endif + rb_define_const(ev_flag, "WINDOW", INT2FIX(TCL_WINDOW_EVENTS)); + rb_define_const(ev_flag, "FILE", INT2FIX(TCL_FILE_EVENTS)); + rb_define_const(ev_flag, "TIMER", INT2FIX(TCL_TIMER_EVENTS)); + rb_define_const(ev_flag, "IDLE", INT2FIX(TCL_IDLE_EVENTS)); + rb_define_const(ev_flag, "ALL", INT2FIX(TCL_ALL_EVENTS)); + rb_define_const(ev_flag, "DONT_WAIT", INT2FIX(TCL_DONT_WAIT)); + eTkCallbackBreak = rb_define_class("TkCallbackBreak", rb_eStandardError); eTkCallbackContinue = rb_define_class("TkCallbackContinue",rb_eStandardError); |