Skip to content

Commit

Permalink
Change some Edebug specifications to ‘sexp’ to not evaluate them.
Browse files Browse the repository at this point in the history
Edebug doesn’t handle bodies rewritten by generator.el well,
cf. https://debbugs.gnu.org/cgi/bugreport.cgi?bug=40434.  Until that is fixed,
it’s better to avoid instrumented the bodies altogether to avoid spurious bugs.
  • Loading branch information
phst committed Jun 10, 2020
1 parent 9367005 commit da93523
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions aio.el
Original file line number Diff line number Diff line change
Expand Up @@ -133,7 +133,7 @@ value, or any uncaught error signal."
(doc-string 3)
(debug (&define lambda-list lambda-doc
[&optional ("interactive" interactive)]
def-body)))
&rest sexp)))
(let ((args (make-symbol "args"))
(promise (make-symbol "promise"))
(split-body (macroexp-parse-body body)))
Expand All @@ -151,7 +151,7 @@ value, or any uncaught error signal."
"Like `aio-lambda' but gives the function a name like `defun'."
(declare (indent defun)
(doc-string 3)
(debug (&define name lambda-list def-body)))
(debug (&define name lambda-list &rest sexp)))
`(progn
(defalias ',name (aio-lambda ,arglist ,@body))
(function-put ',name 'aio-defun-p t)))
Expand Down Expand Up @@ -190,7 +190,7 @@ Beware: Dynamic bindings that are lexically outside
Other global state such as the current buffer behaves likewise."
(declare (indent 0)
(debug (body)))
(debug (&rest sexp)))
`(let ((promise (funcall (aio-lambda ()
(aio-await (aio-sleep 0))
,@body))))
Expand Down

0 comments on commit da93523

Please sign in to comment.