From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 19 Sep 1994 00:16:13 +0000 (+0000)
Subject: (direct_output_for_insert, direct_output_forward_char): Fix Lisp_Object
X-Git-Tag: emacs-19.34~6951
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=254277e15d6906634686a682bfc7a163b20d7be5;p=emacs.git

(direct_output_for_insert, direct_output_forward_char): Fix Lisp_Object
vs. int problems.
---

diff --git a/src/dispnew.c b/src/dispnew.c
index 9922574920a..0faabda9298 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -1077,7 +1077,7 @@ direct_output_for_insert (g)
      At the moment we only lose at end of line or end of buffer
      and only with faces that have some background */
   /* Instead of wasting time, give up if character has any text properties */
-      || ! NILP (Ftext_properties_at (XFASTINT (point - 1), Qnil))
+      || ! NILP (Ftext_properties_at (make_number (point - 1), Qnil))
 #endif
 
   /* Give up if w is minibuffer and a message is being displayed there */
@@ -1123,7 +1123,7 @@ direct_output_forward_char (n)
 {
   register FRAME_PTR frame = selected_frame;
   register struct window *w = XWINDOW (selected_window);
-  int position;
+  Lisp_Object position;
   int hpos = FRAME_CURSOR_X (frame);
 
   /* Give up if in truncated text at end of line.  */