From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 12 Jul 1997 06:37:04 +0000 (+0000)
Subject: (Fcoordinates_in_window_p): Convert Fcons arguments to Lisp_Integer.
X-Git-Tag: emacs-20.1~1211
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=34c0dab2b7232c84f4c624a5b5a7f027687874ce;p=emacs.git

(Fcoordinates_in_window_p): Convert Fcons arguments to Lisp_Integer.
(save_window_save): Convert Fset_marker argument to Lisp_Integer.
---

diff --git a/src/window.c b/src/window.c
index 1aee0ec99f3..f082acaae7c 100644
--- a/src/window.c
+++ b/src/window.c
@@ -457,7 +457,7 @@ If they are on the border between WINDOW and its right sibling,\n\
       return Qnil;
 
     case 1:			/* In text part of window. */
-      return Fcons (x, y);
+      return Fcons (make_number (x), make_number (y));
 
     case 2:			/* In mode line of window. */
       return Qmode_line;
@@ -3522,7 +3522,8 @@ save_window_save (window, vector, i)
 	  if (EQ (window, selected_window))
 	    {
 	      p->pointm = Fmake_marker ();
-	      Fset_marker (p->pointm, BUF_PT (XBUFFER (w->buffer)),
+	      Fset_marker (p->pointm,
+			   make_number (BUF_PT (XBUFFER (w->buffer))),
 			   w->buffer);
 	    }
 	  else