diff options
author | Karl Heuer <kwzh@gnu.org> | 1998-04-13 18:56:00 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1998-04-13 18:56:00 +0000 |
commit | 9fdae274dda00e3a0cf1284bc88daf537c2f8772 (patch) | |
tree | ba3f7bc2351c8f7856bd9c6dcbd7225fcf18139a | |
parent | 42d140b44bae98c137eafcd77ab539e24266ddce (diff) | |
download | emacs-9fdae274dda00e3a0cf1284bc88daf537c2f8772.tar.gz |
(Fcompute_motion): Check that TO and FROM are in range.
-rw-r--r-- | src/indent.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/indent.c b/src/indent.c index 2811fbde7b7..897aa8d1072 100644 --- a/src/indent.c +++ b/src/indent.c @@ -1566,6 +1566,11 @@ DEFUN ("compute-motion", Fcompute_motion, Scompute_motion, 7, 7, 0, else CHECK_LIVE_WINDOW (window, 0); + if (XINT (from) < BEGV || XINT (from) > ZV) + args_out_of_range_3 (from, make_number (BEGV), make_number (ZV)); + if (XINT (to) < BEGV || XINT (to) > ZV) + args_out_of_range_3 (to, make_number (BEGV), make_number (ZV)); + pos = compute_motion (XINT (from), XINT (XCONS (frompos)->cdr), XINT (XCONS (frompos)->car), 0, XINT (to), XINT (XCONS (topos)->cdr), |