From: HaiJun Zhang <netjune@outlook.com>
To: Michael Heerdegen <michael_heerdegen@web.de>
Cc: "help-gnu-emacs@gnu.org" <help-gnu-emacs@gnu.org>,
Zhang Haijun <ccsmile2008@outlook.com>
Subject: Re: How to stop all edebug?
Date: Thu, 24 Oct 2019 14:10:45 +0000 [thread overview]
Message-ID: <PS1PR03MB3606054822A41FC08055E821B76A0@PS1PR03MB3606.apcprd03.prod.outlook.com> (raw)
In-Reply-To: <87a79qz3q4.fsf@web.de>
在 2019年10月24日 +0800 PM9:13,Michael Heerdegen <michael_heerdegen@web.de>,写道:
HaiJun Zhang <netjune@outlook.com> writes:
I tried and it didn’t work. I eval
`(edebug--edebug-on-entry-functions)` and it returns nil.
Oh well, correct again, that doesn't work as well, sorry for wasting
your time.
Ok, now I have tested that Lars' new `edebug-remove-instrumentation':
#+begin_src emacs-lisp
(defun edebug-remove-instrumentation ()
"Remove Edebug instrumentation from all functions."
(interactive)
(let ((functions nil))
(mapatoms
(lambda (symbol)
(when (and (functionp symbol)
(get symbol 'edebug))
(let ((unwrapped (edebug-unwrap* (symbol-function symbol))))
(unless (equal unwrapped (symbol-function symbol))
(push symbol functions)
(setf (symbol-function symbol) unwrapped)))))
obarray)
(if (not functions)
(message "Found no functions to remove instrumentation from")
(message "Remove edebug instrumentation from %s"
(mapconcat #'symbol-name functions ", ")))))
#+end_src
works for me at least in 26.1. Can you please try that? Just M-x
edebug-remove-instrumentation.
Regards,
Michael.
I tried. It works in 26.3.
Thanks.
next prev parent reply other threads:[~2019-10-24 14:10 UTC|newest]
Thread overview: 14+ messages / expand[flat|nested] mbox.gz Atom feed top
2019-10-23 4:56 How to stop all edebug? Zhang Haijun
2019-10-23 6:46 ` Michael Heerdegen
[not found] ` <mailman.1523.1571813205.9715.help-gnu-emacs@gnu.org>
2019-10-23 7:31 ` Lars Magne Ingebrigtsen
2019-10-24 11:09 ` Michael Heerdegen
2019-10-24 4:10 ` HaiJun Zhang
2019-10-24 11:05 ` Michael Heerdegen
2019-10-24 12:45 ` HaiJun Zhang
2019-10-24 13:13 ` Michael Heerdegen
2019-10-24 14:10 ` HaiJun Zhang [this message]
[not found] ` <70a705e7-cebf-4ac4-b7af-0fc04b383de6@Spark>
2019-10-24 13:12 ` HaiJun Zhang
2019-10-23 12:43 ` Stefan Monnier
2019-10-24 4:12 ` HaiJun Zhang
2019-10-23 15:21 ` Eli Zaretskii
2019-10-24 4:16 ` HaiJun Zhang
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=PS1PR03MB3606054822A41FC08055E821B76A0@PS1PR03MB3606.apcprd03.prod.outlook.com \
--to=netjune@outlook.com \
--cc=ccsmile2008@outlook.com \
--cc=help-gnu-emacs@gnu.org \
--cc=michael_heerdegen@web.de \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).