Mercurial > emacs

changeset 18735:e98b76420c85

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fcoordinates_in_window_p): Convert Fcons arguments to Lisp_Integer. (save_window_save): Convert Fset_marker argument to Lisp_Integer.
author Richard M. Stallman <rms@gnu.org>
date Sat, 12 Jul 1997 06:37:04 +0000
parents a26b6aca56ca
children e5e6647d4883
files src/window.c
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/window.c	Sat Jul 12 06:36:06 1997 +0000
+++ b/src/window.c	Sat Jul 12 06:37:04 1997 +0000
@@ -457,7 +457,7 @@
       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 @@
 	  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