summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorDaniel Colascione <dancol@dancol.org>2015-03-03 10:56:24 -0800
committerDaniel Colascione <dancol@dancol.org>2015-03-03 10:56:24 -0800
commitcecf4afebb394351a78c48d05e81a1e55af6da32 (patch)
tree983591013d5ea7c5375546948044b519dff1680d /test
parent02eb227e8163c6212e814b5b7e191b4d34306872 (diff)
downloademacs-cecf4afebb394351a78c48d05e81a1e55af6da32.tar.gz
Address generator feedback
* doc/lispref/control.texi (Generators): Correct missing word. Clarify which forms are legal in which parts of `unwind-protect'. Fix orphaned close parenthesis. * lisp/emacs-lisp/generator.el: Make globals conform to elisp style throughout. Use more efficient font-lock patterns. (cps-inhibit-atomic-optimization): Rename from `cps-disable-atomic-optimization'. (cps--gensym): New macro; replaces `cl-gensym' throughout. (cps-generate-evaluator): Move the `iter-yield' local macro definition here (iter-defun, iter-lambda): from here. * test/automated/generator-tests.el (cps-test-iter-close-finalizer): Rename `gc-precise-p' to `gc-precise'. * test/automated/generator-tests.el (cps-testcase): Use `cps-inhibit-atomic-optimization' instead of `cps-disable-atomic-optimization'.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog4
-rw-r--r--test/automated/generator-tests.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index ea2e0eef179..55f8c6c8eb8 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,5 +1,9 @@
2015-03-03 Daniel Colascione <dancol@dancol.org>
+ * automated/generator-tests.el (cps-testcase): Use
+ `cps-inhibit-atomic-optimization' instead of
+ `cps-disable-atomic-optimization'.
+
* automated/finalizer-tests.el (finalizer-basic)
(finalizer-circular-reference, finalizer-cross-reference)
(finalizer-error): Rename `gc-precise-p' to `gc-precise'.
diff --git a/test/automated/generator-tests.el b/test/automated/generator-tests.el
index 893c0d2e724..3ee65105597 100644
--- a/test/automated/generator-tests.el
+++ b/test/automated/generator-tests.el
@@ -54,7 +54,7 @@ identical output.
(funcall (lambda () ,@body))
(iter-next
(funcall
- (let ((cps-disable-atomic-optimization t))
+ (let ((cps-inhibit-atomic-optimization t))
(iter-lambda () (iter-yield (progn ,@body)))))))))))
(put 'cps-testcase 'lisp-indent-function 1)