diff --git a/opcodes/ChangeLog b/opcodes/ChangeLog
index c325a01a0d..44d4820380 100644
--- a/opcodes/ChangeLog
+++ b/opcodes/ChangeLog
@@ -1,5 +1,7 @@
 Mon Apr  7 11:45:44 1997  Doug Evans  <dje@canuck.cygnus.com>
 
+	* cgen-opc.c (hash_keyword_name): Improve algorithm.
+
 	* disassemble.c (disassembler): Handle m32r.
 
 Fri Apr  4 12:29:38 1997  Doug Evans  <dje@canuck.cygnus.com>
diff --git a/opcodes/cgen-opc.c b/opcodes/cgen-opc.c
index cbe9d5cd46..cb622c466b 100644
--- a/opcodes/cgen-opc.c
+++ b/opcodes/cgen-opc.c
@@ -236,7 +236,7 @@ hash_keyword_name (kt, name)
   unsigned int hash;
 
   for (hash = 0; *name; ++name)
-    hash += *name;
+    hash = (hash * 97) + (unsigned char) *name;
   return hash % kt->hash_table_size;
 }