diff src/bytecode.c @ 647:b39c14581166

[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 13e3d7ae7155
children fdefd0186b75
line wrap: on
line diff
--- a/src/bytecode.c	Wed Aug 08 12:15:04 2001 +0000
+++ b/src/bytecode.c	Mon Aug 13 04:46:48 2001 +0000
@@ -1599,8 +1599,8 @@
 		    int * const program_length,
 		    int * const varbind_count)
 {
-  size_t instructions_length = XSTRING_LENGTH (instructions);
-  size_t comfy_size = 2 * instructions_length;
+  Bytecount instructions_length = XSTRING_LENGTH (instructions);
+  Element_Count comfy_size = (Element_Count) (2 * instructions_length);
 
   int * const icounts = alloca_array (int, comfy_size);
   int * icounts_ptr = icounts;
@@ -1996,7 +1996,7 @@
 		     f2->doc_and_interactive, depth + 1));
 }
 
-static unsigned long
+static Hash_Code
 compiled_function_hash (Lisp_Object obj, int depth)
 {
   Lisp_Compiled_Function *f = XCOMPILED_FUNCTION (obj);