* ext/tcltklib/tcltklib.c: define TclTkLib::COMPILE_INFO and RELEASE_DATE

* ext/tcltklib/extconf.rb: ditto
* ext/tk/lib/tkutil.c: define Tk::RELEASE_DATE
* ext/tk/lib/tk.rb: define Tk::RELEASE_DATE


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@7640 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2004-12-23 04:17:03 +00:00
parent b258364f30
commit adfb4c3ba8
5 changed files with 101 additions and 0 deletions

View file

@ -8,6 +8,8 @@
************************************************/
#define TKUTIL_RELEASE_DATE "2004-12-23"
#include "ruby.h"
#include "rubysig.h"
#include "st.h"
@ -1239,6 +1241,8 @@ tkobj_path(self)
}
/*************************************/
/* release date */
const char tkutil_release_date[] = TKUTIL_RELEASE_DATE;
void
Init_tkutil()
@ -1248,6 +1252,11 @@ Init_tkutil()
VALUE cTK = rb_define_class("TkKernel", rb_cObject);
VALUE mTK = rb_define_module("TkUtil");
/* --------------------- */
rb_define_const(mTK, "RELEASE_DATE",
rb_obj_freeze(rb_str_new2(tkutil_release_date)));
/* --------------------- */
rb_global_variable(&cMethod);
cMethod = rb_const_get(rb_cObject, rb_intern("Method"));