From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 2 Mar 2004 21:42:03 +0000 (+0000)
Subject: (Ftranslate_region): Lisp_Object/int mixup.
X-Git-Tag: ttn-vms-21-2-B4~7379
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=34ed747a82a03e88929d38db45409e416e7240df;p=emacs.git

(Ftranslate_region): Lisp_Object/int mixup.
---

diff --git a/src/editfns.c b/src/editfns.c
index 15ee794d064..51435af0bb2 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1,5 +1,5 @@
 /* Lisp functions pertaining to editing.
-   Copyright (C) 1985,86,87,89,93,94,95,96,97,98, 1999, 2000, 2001, 02, 2003
+   Copyright (C) 1985,86,87,89,93,94,95,96,97,98,1999,2000,01,02,03,2004
 	Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
@@ -2772,7 +2772,7 @@ It returns the number of characters changed.  */)
   modify_region (current_buffer, pos, XINT (end));
 
   cnt = 0;
-  for (; pos < end; )
+  for (; pos < XINT (end); )
     {
       register unsigned char *p = BYTE_POS_ADDR (pos_byte);
       unsigned char *str;