Mercurial > hg > xemacs-beta

diff src/chartab.c @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents 190b164ddcac
children fdefd0186b75
line wrap: on
line diff
--- a/src/chartab.c	Wed Aug 08 12:15:04 2001 +0000
+++ b/src/chartab.c	Mon Aug 13 04:46:48 2001 +0000
@@ -121,7 +121,7 @@
   return 1;
 }
 
-static unsigned long
+static Hash_Code
 char_table_entry_hash (Lisp_Object obj, int depth)
 {
   Lisp_Char_Table_Entry *cte = XCHAR_TABLE_ENTRY (obj);
@@ -413,12 +413,12 @@
   return 1;
 }
 
-static unsigned long
+static Hash_Code
 char_table_hash (Lisp_Object obj, int depth)
 {
   Lisp_Char_Table *ct = XCHAR_TABLE (obj);
-  unsigned long hashval = internal_array_hash (ct->ascii, NUM_ASCII_CHARS,
-					       depth);
+  Hash_Code hashval = internal_array_hash (ct->ascii, NUM_ASCII_CHARS,
+					   depth);
 #ifdef MULE
   hashval = HASH2 (hashval,
 		   internal_array_hash (ct->level1, NUM_LEADING_BYTES, depth));
@@ -1612,7 +1612,7 @@
 
 int
 check_category_char (Emchar ch, Lisp_Object table,
-		     unsigned int designator, unsigned int not_p)
+		     int designator, int not_p)
 {
   REGISTER Lisp_Object temp;
   Lisp_Char_Table *ctbl;
@@ -1640,7 +1640,7 @@
 {
   Lisp_Object ctbl;
   Emchar ch;
-  unsigned int des;
+  int des;
   struct buffer *buf = decode_buffer (buffer, 0);
 
   CHECK_INT (position);
@@ -1660,7 +1660,7 @@
 {
   Lisp_Object ctbl;
   Emchar ch;
-  unsigned int des;
+  int des;
 
   CHECK_CATEGORY_DESIGNATOR (designator);
   des = XCHAR (designator);