]> code.delx.au - gnu-emacs/commitdiff
(Fcompute_motion): Check that TO and FROM are in range.
authorKarl Heuer <kwzh@gnu.org>
Mon, 13 Apr 1998 18:56:00 +0000 (18:56 +0000)
committerKarl Heuer <kwzh@gnu.org>
Mon, 13 Apr 1998 18:56:00 +0000 (18:56 +0000)
src/indent.c

index 2811fbde7b7cda96592a8c9e8a537036e2480c34..897aa8d10725f153b59e2516eaeed6443250dd42 100644 (file)
@@ -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),