# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 765768448 0
# Node ID 840862375e93ff4dc36c0f468923b8dda2d2ead5
# Parent  255869831639ba441c9fc552df56c4af29cd9514
(copy_part_of_rope): Replace non-glyph with 0.

diff -r 255869831639 -r 840862375e93 src/xdisp.c
--- a/src/xdisp.c	Fri Apr 08 01:24:20 1994 +0000
+++ b/src/xdisp.c	Fri Apr 08 01:27:28 1994 +0000
@@ -1928,7 +1928,7 @@
 #endif
     while (n--)
       {
-	if (to >= s) *to = XFASTINT (*fp);
+	if (to >= s) *to = (INTEGERP (*fp) ? XFASTINT (*fp) : 0);
 	++to;
 	++fp;
       }