From 2ca8b6c2c300e8b1c49f8061596dd697307f2867 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 23 Nov 2004 05:19:17 +0000 Subject: [PATCH] (skip_invisible): Avoid non-idempotent side-effects in macro arguments. --- src/indent.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/indent.c b/src/indent.c index ce274f65a1f..b1af03b6977 100644 --- a/src/indent.c +++ b/src/indent.c @@ -220,7 +220,7 @@ skip_invisible (pos, next_boundary_p, to, window) Lisp_Object window; { Lisp_Object prop, position, overlay_limit, proplimit; - Lisp_Object buffer; + Lisp_Object buffer, tmp; int end, inv_p; XSETFASTINT (position, pos); @@ -251,8 +251,9 @@ skip_invisible (pos, next_boundary_p, to, window) /* No matter what. don't go past next overlay change. */ if (XFASTINT (overlay_limit) < XFASTINT (proplimit)) proplimit = overlay_limit; - end = XFASTINT (Fnext_single_property_change (position, Qinvisible, - buffer, proplimit)); + tmp = Fnext_single_property_change (position, Qinvisible, + buffer, proplimit); + end = XFASTINT (tmp); #if 0 /* Don't put the boundary in the middle of multibyte form if there is no actual property change. */ -- 2.39.5