Mercurial > emacs

diff src/editfns.c @ 10383:a7fe0fb11314

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fnarrow_to_region): Swap using temp Lisp_Object, not int.
author Karl Heuer <kwzh@gnu.org>
date Tue, 10 Jan 1995 22:03:13 +0000
parents 9738aad59697
children fbb254882b9f
line wrap: on
line diff
--- a/src/editfns.c	Tue Jan 10 20:37:38 1995 +0000
+++ b/src/editfns.c	Tue Jan 10 22:03:13 1995 +0000
@@ -1403,16 +1403,13 @@
   (b, e)
      register Lisp_Object b, e;
 {
-  register EMACS_INT i;
-
   CHECK_NUMBER_COERCE_MARKER (b, 0);
   CHECK_NUMBER_COERCE_MARKER (e, 1);
 
   if (XINT (b) > XINT (e))
     {
-      i = XFASTINT (b);
-      b = e;
-      XSETFASTINT (e, i);
+      Lisp_Object tem;
+      tem = b;  b = e;  e = tem;
     }
 
   if (!(BEG <= XINT (b) && XINT (b) <= XINT (e) && XINT (e) <= Z))