From dbf3ef782ec4ba45580696dde90692935d91cbca Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 9 Apr 2008 15:38:32 +0000 Subject: [PATCH] (regexp-opt): Reduce max-lisp-eval-depth and max-specpdl-size to 10000. --- lisp/emacs-lisp/regexp-opt.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 51ed53e71fc..42a77de3d08 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -101,8 +101,8 @@ If PAREN is `words', then the resulting regexp is additionally surrounded 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)) -- 2.39.5