diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-11-23 05:19:17 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-11-23 05:19:17 +0000 |
| commit | 2ca8b6c2c300e8b1c49f8061596dd697307f2867 (patch) | |
| tree | d5ffa9a49ddc7ebee8546a2b7032428632bb56a4 /src/indent.c | |
| parent | 38cbfed434294f7b3d3e1ef3598df3f38a57bd54 (diff) | |
| download | emacs-2ca8b6c2c300e8b1c49f8061596dd697307f2867.tar.gz | |
(skip_invisible): Avoid non-idempotent side-effects in macro arguments.
Diffstat (limited to 'src/indent.c')
| -rw-r--r-- | src/indent.c | 7 |
1 files 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. */ |