# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 779933773 0
# Node ID 03597c3eb63b06ed6a01a4b538a27ff38178e4b9
# Parent  80ac0db9a77a4ca8f98ba13e964fc33e93387dfc
(direct_output_for_insert, direct_output_forward_char): Fix Lisp_Object
vs. int problems.

diff -r 80ac0db9a77a -r 03597c3eb63b src/dispnew.c
--- a/src/dispnew.c	Mon Sep 19 00:15:36 1994 +0000
+++ b/src/dispnew.c	Mon Sep 19 00:16:13 1994 +0000
@@ -1077,7 +1077,7 @@
      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 @@
 {
   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.  */