# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1207755512 0
# Node ID 22cfb604a455b353b92f837d3b5ebc68907b5d94
# Parent  31ff447ca1601f20a2977ec85ff98045b1c05273
(regexp-opt): Reduce max-lisp-eval-depth and max-specpdl-size to
10000.

diff -r 31ff447ca160 -r 22cfb604a455 lisp/emacs-lisp/regexp-opt.el
--- a/lisp/emacs-lisp/regexp-opt.el	Wed Apr 09 15:38:05 2008 +0000
+++ b/lisp/emacs-lisp/regexp-opt.el	Wed Apr 09 15:38:32 2008 +0000
@@ -101,8 +101,8 @@
 by \\=\\< and \\>."
   (save-match-data
     ;; Recurse on the sorted list.
-    (let* ((max-lisp-eval-depth (* 1024 1024))
-	   (max-specpdl-size (* 1024 1024))
+    (let* ((max-lisp-eval-depth 10000)
+	   (max-specpdl-size 10000)
 	   (completion-ignore-case nil)
 	   (completion-regexp-list nil)
 	   (words (eq paren 'words))