diff options
| author | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-03-29 22:00:34 +0000 |
|---|---|---|
| committer | nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-03-29 22:00:34 +0000 |
| commit | b9bdeb035c1a182d48918c41ab13f8f122272a51 (patch) | |
| tree | 9fd56638e1f769df97cf802d3391104863d09f5d /ext | |
| parent | a51d3fd03b7b9bc40e084bdb374d27f54877930d (diff) | |
* ext/tk/tcltklib.c: rb_hash_lookup has not been backported yet.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@15857 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/tk/extconf.rb | 2 | ||||
| -rw-r--r-- | ext/tk/tcltklib.c | 4 |
2 files changed, 6 insertions, 0 deletions
diff --git a/ext/tk/extconf.rb b/ext/tk/extconf.rb index cb7621fbd4..4311aecce0 100644 --- a/ext/tk/extconf.rb +++ b/ext/tk/extconf.rb @@ -322,6 +322,8 @@ if have_header("tcl.h") && have_header("tk.h") && $INSTALLFILES ||= [] $INSTALLFILES << ["lib/tkextlib/SUPPORT_STATUS", "$(RUBYLIBDIR)", "lib"] + have_func("rb_hash_lookup", "ruby.h") + # create $defs << %[-DRUBY_VERSION=\\"#{RUBY_VERSION}\\"] $defs << %[-DRUBY_RELEASE_DATE=\\"#{RUBY_RELEASE_DATE}\\"] diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c index 18e0fd76fb..51e2b65198 100644 --- a/ext/tk/tcltklib.c +++ b/ext/tk/tcltklib.c @@ -189,6 +189,10 @@ static Tcl_ObjType *Tcl_ObjType_String; #endif #endif +#ifndef HAVE_RB_HASH_LOOKUP +#define rb_hash_lookup rb_hash_aref +#endif + /* safe Tcl_Eval and Tcl_GlobalEval */ static int #ifdef RUBY_VM |