diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-01-10 22:03:13 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-01-10 22:03:13 +0000 |
| commit | fd29fef18eeaa279ca932a34f0313fd9398471e8 (patch) | |
| tree | 20f068798160f20d556e9600c2b3ae2cc94dac0a /src/editfns.c | |
| parent | 49c85bdb07aece31b2096ba73d85e927b8c486fd (diff) | |
| download | emacs-fd29fef18eeaa279ca932a34f0313fd9398471e8.tar.gz | |
(Fnarrow_to_region): Swap using temp Lisp_Object, not int.
Diffstat (limited to 'src/editfns.c')
| -rw-r--r-- | src/editfns.c | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/editfns.c b/src/editfns.c index a7537be357d..657aca333f9 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -1403,16 +1403,13 @@ or markers) bounding the text that should remain visible.") (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)) |