diff options
author | Daniel Colascione <dancol@dancol.org> | 2015-03-03 10:56:24 -0800 |
---|---|---|
committer | Daniel Colascione <dancol@dancol.org> | 2015-03-03 10:56:24 -0800 |
commit | cecf4afebb394351a78c48d05e81a1e55af6da32 (patch) | |
tree | 983591013d5ea7c5375546948044b519dff1680d /test | |
parent | 02eb227e8163c6212e814b5b7e191b4d34306872 (diff) | |
download | emacs-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/ChangeLog | 4 | ||||
-rw-r--r-- | test/automated/generator-tests.el | 2 |
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) |