summaryrefslogtreecommitdiff
path: root/test/src/coding-tests.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-04-22 04:11:02 +0200
committerStefan Kangas <stefan@marxist.se>2021-04-22 04:11:02 +0200
commit71b14f28068d9327eb236b8577ccbddd65e3b38b (patch)
tree6bee12dd2666dc81648579ac52f2b197c3d756ed /test/src/coding-tests.el
parent94de186686662462d391dd23a4f15d43a7a33bb2 (diff)
downloademacs-71b14f28068d9327eb236b8577ccbddd65e3b38b.tar.gz
Avoid lowering gc-cons-threshold
* lisp/cedet/semantic/wisent/comp.el (wisent--compile-grammar): * lisp/international/mule-cmds.el (ucs-names): * lisp/progmodes/ebrowse.el (ebrowse-read): * test/src/coding-tests.el (benchmark-decoder): Avoid lowering gc-cons-treshold.
Diffstat (limited to 'test/src/coding-tests.el')
-rw-r--r--test/src/coding-tests.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/test/src/coding-tests.el b/test/src/coding-tests.el
index 0bdcff22ce5..0309b2b1ad6 100644
--- a/test/src/coding-tests.el
+++ b/test/src/coding-tests.el
@@ -359,7 +359,7 @@
(delete-region (point-min) (point))))))
(defun benchmark-decoder ()
- (let ((gc-cons-threshold 4000000))
+ (let ((gc-cons-threshold (max gc-cons-threshold 4000000)))
(insert "Without optimization:\n")
(dolist (files test-file-list)
(dolist (file (cdr files))