diff src/lread.c @ 8828:2ff6fed642b1

(Fload): Use EMACS_INT.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Sep 1994 00:36:43 +0000
parents ccd3c3ca2aef
children 93f3d6f5753c
line wrap: on
line diff
--- a/src/lread.c	Sat Sep 17 00:35:09 1994 +0000
+++ b/src/lread.c	Sat Sep 17 00:36:43 1994 +0000
@@ -434,7 +434,7 @@
      So malloc a full-size pointer, and record the address of that pointer.  */
   ptr = (FILE **) xmalloc (sizeof (FILE *));
   *ptr = stream;
-  XSET (lispstream, Lisp_Internal_Stream, (int) ptr);
+  XSET (lispstream, Lisp_Internal_Stream, (EMACS_INT) ptr);
   record_unwind_protect (load_unwind, lispstream);
   record_unwind_protect (load_descriptor_unwind, load_descriptor_list);
   load_descriptor_list
@@ -1616,7 +1616,8 @@
      register char *ptr;
      register int size;
 {
-  int hash, obsize;
+  int hash;
+  int obsize;
   register Lisp_Object tail;
   Lisp_Object bucket, tem;