From dedd1182ee076e170ae102af0542b18404bc4152 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 8 Apr 1994 01:27:28 +0000
Subject: [PATCH] (copy_part_of_rope): Replace non-glyph with 0.

---
 src/xdisp.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/xdisp.c b/src/xdisp.c
index db0515d04c5..85a7f968c95 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -1903,7 +1903,7 @@ copy_part_of_rope (f, to, s, from, len, face)
   if (! FRAME_TERMCAP_P (f))
     while (n--)
       {
-	int glyph = XFASTINT (*fp);
+	int glyph = (INTEGERP (*fp) ? XFASTINT (*fp) : 0);
 	int facecode;
 
 	if (FAST_GLYPH_FACE (glyph) == 0)
@@ -1928,7 +1928,7 @@ copy_part_of_rope (f, to, s, from, len, face)
 #endif
     while (n--)
       {
-	if (to >= s) *to = XFASTINT (*fp);
+	if (to >= s) *to = (INTEGERP (*fp) ? XFASTINT (*fp) : 0);
 	++to;
 	++fp;
       }
-- 
2.39.5