diff --git a/ChangeLog b/ChangeLog
index 2fe93db624..0417b6524c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sat Oct 26 10:11:47 2002  Akinori MUSHA  <knu@iDaemons.org>
+
+	* node.h (nd_type): cast the value to int.
+
 Sat Oct 26 04:27:35 2002  Akinori MUSHA  <knu@iDaemons.org>
 
 	* ext/dbm/dbm.c (fdbm_indexes, fdbm_select): add a missing
diff --git a/node.h b/node.h
index dd43e21d4e..75c3615e96 100644
--- a/node.h
+++ b/node.h
@@ -154,7 +154,7 @@ typedef struct RNode {
 
 #define RNODE(obj)  (R_CAST(RNode)(obj))
 
-#define nd_type(n) (((RNODE(n))->flags>>FL_USHIFT)&0xff)
+#define nd_type(n) ((int)(((RNODE(n))->flags>>FL_USHIFT)&0xff))
 #define nd_set_type(n,t) \
     RNODE(n)->flags=((RNODE(n)->flags&~FL_UMASK)|(((t)<<FL_USHIFT)&FL_UMASK))