diff --git a/ChangeLog b/ChangeLog
index 4d7da7a418..3ff569ef98 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Jan 26 12:45:23 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
+
+	* ext/tcltklib/tcltklib.c: define CONST84 when TCL_MAJOR_VERSION == 7
+
 Mon Jan 26 11:30:58 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* ext/extmk.rb: Makefiles should depend on also rbconfig.rb.
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c
index a7de967838..1c19ae6cef 100644
--- a/ext/tcltklib/tcltklib.c
+++ b/ext/tcltklib/tcltklib.c
@@ -36,6 +36,12 @@
 #   endif
 #  endif
 # endif
+#else /* TCL_MAJOR_VERSION == 7 */
+# ifdef CONST
+#  define CONST84 CONST
+# else
+#  define CONST84
+# endif
 #endif
 
 /* for ruby_debug */