changeset 9335:8cf58b38d244

(validate_region): Swap using temp Lisp_Object, not int.
author Karl Heuer <kwzh@gnu.org>
date Tue, 04 Oct 1994 19:36:47 +0000
parents d949b1150e25
children d5ffd9c9edb0
files src/buffer.c
diffstat 1 files changed, 2 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/src/buffer.c	Tue Oct 04 17:35:21 1994 +0000
+++ b/src/buffer.c	Tue Oct 04 19:36:47 1994 +0000
@@ -1079,16 +1079,13 @@
 validate_region (b, e)
      register Lisp_Object *b, *e;
 {
-  register int i;
-
   CHECK_NUMBER_COERCE_MARKER (*b, 0);
   CHECK_NUMBER_COERCE_MARKER (*e, 1);
 
   if (XINT (*b) > XINT (*e))
     {
-      i = XFASTINT (*b);	/* This is legit even if *b is < 0 */
-      *b = *e;
-      XSETFASTINT (*e, i);	/* because this is all we do with i.  */
+      Lisp_Object tem;
+      tem = *b;  *b = *e;  *e = tem;
     }
 
   if (!(BEGV <= XINT (*b) && XINT (*b) <= XINT (*e)