changeset 8828:2ff6fed642b1

(Fload): Use EMACS_INT.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Sep 1994 00:36:43 +0000
parents 97bf951c0b98
children 6f0d48241807
files src/lread.c
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
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;