From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail From: Alan Mackenzie Newsgroups: gmane.emacs.bugs Subject: bug#40766: 27.0.91; Cannot edebug cl-lambda-list edebug spec Date: 23 Apr 2020 06:41:28 -0000 Organization: muc.de e.V. Message-ID: <20200423064128.95594.qmail@mail.muc.de> References: Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202"; logging-data="25003"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: tin/2.4.4-20191224 ("Millburn") (FreeBSD/11.3-RELEASE-p3 (amd64)) Cc: acm@muc.de, 40766@debbugs.gnu.org To: Philipp Stephani Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Thu Apr 23 08:42:16 2020 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1jRVYu-0006PI-0A for geb-bug-gnu-emacs@m.gmane-mx.org; Thu, 23 Apr 2020 08:42:16 +0200 Original-Received: from localhost ([::1]:37710 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jRVYs-0005F9-R4 for geb-bug-gnu-emacs@m.gmane-mx.org; Thu, 23 Apr 2020 02:42:14 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:36468) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jRVYh-0005F0-Vd for bug-gnu-emacs@gnu.org; Thu, 23 Apr 2020 02:42:04 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.90_1) (envelope-from ) id 1jRVYg-0007ZR-FQ for bug-gnu-emacs@gnu.org; Thu, 23 Apr 2020 02:42:03 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:42393) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1jRVYg-0007Z3-3l for bug-gnu-emacs@gnu.org; Thu, 23 Apr 2020 02:42:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1jRVYg-0006DL-00 for bug-gnu-emacs@gnu.org; Thu, 23 Apr 2020 02:42:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Alan Mackenzie Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 23 Apr 2020 06:42:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 40766 X-GNU-PR-Package: emacs Original-Received: via spool by 40766-submit@debbugs.gnu.org id=B40766.158762409423855 (code B ref 40766); Thu, 23 Apr 2020 06:42:01 +0000 Original-Received: (at 40766) by debbugs.gnu.org; 23 Apr 2020 06:41:34 +0000 Original-Received: from localhost ([127.0.0.1]:53939 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1jRVYD-0006Cg-FL for submit@debbugs.gnu.org; Thu, 23 Apr 2020 02:41:34 -0400 Original-Received: from colin.muc.de ([193.149.48.1]:11604 helo=mail.muc.de) by debbugs.gnu.org with smtp (Exim 4.84_2) (envelope-from ) id 1jRVYA-0006CV-Hu for 40766@debbugs.gnu.org; Thu, 23 Apr 2020 02:41:31 -0400 Original-Received: (qmail 95595 invoked by uid 3782); 23 Apr 2020 06:41:28 -0000 In-Reply-To: X-Newsgroups: gnu.emacs.bug X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-Received-From: 209.51.188.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:178846 Archived-At: Hello, Philipp. In article you wrote: > emacs -Q > M-x find-library RET cl-macs RET > Navigate to the form `(def-edebug-spec cl-lambda-list ...)' > Hit C-u C-M-x to edebug it. > This results in an error with backtrace: Yes, I get this too. The debug-spec definition looks like this: (def-edebug-spec cl-lambda-list (([&rest cl-lambda-arg] [&optional ["&optional" cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-arg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow-other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) symbolp]] . [&or arg nil]))) After playing around with it for a few hours, it is clear that the bug is triggered by a combination of (i) the dot on the last line; and (ii) the presence of at least one [&optional ...] before it, at the same level of nesting. Possibly the nesting of [ ... ] structures might have something to do with it. The debug-spec which we are attempting to use to parse the above is that of deb-edebug-spec itself. Let's call this "spec 2". There is a dynamically bound variable edebug-dotted-spec which gets bound to t when the parser encounters a "dotted spec" in spec 2. The criterion for making this binding is that the current fragment of spec 2, presumably the last cdr in a list is a non-nil atom. A vector is also an atom, and it might be that there is confusion about this in edebug.el. I'm still working on it. Just one other comment. Doing C-u C-M-x on an edebug-spec doesn't seem to lead to any entry into edebug, even when this bug doesn't trigger. Thanks for an interesting bug! > Debugger entered--Lisp error: (invalid-read-syntax "Expected one of" "n= il" edebug-spec-p "t" "0" (&rest edebug-spec)) > signal(invalid-read-syntax ("Expected one of" "nil" edebug-spec-p "t"= "0" (&rest edebug-spec))) > edebug-syntax-error("Expected one of" "nil" edebug-spec-p "t" "0" (&r= est edebug-spec)) > apply(edebug-syntax-error ("Expected one of" "nil" edebug-spec-p "t" = "0" (&rest edebug-spec))) > edebug-no-match((((([&rest cl-lambda-arg] [&optional ["&optional" cl-= &optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-arg]= ] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow-ot= her-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) sym= bolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619) .= 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 6671= ) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714) (= 6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (675= 4 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (6798 .= 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 68= 48) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 6883)= (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909 . = 6912) . 6913) . 6914) . 6915) . 6916) "Expected one of" "nil" edebug-spec= -p "t" "0" (&rest edebug-spec)) > apply(edebug-no-match (((([&rest cl-lambda-arg] [&optional ["&optiona= l" cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambd= a-arg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&al= low-other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-for= m) symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6= 619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 = . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6= 714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753= ) (6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (= 6798 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (684= 3 . 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) .= 6883) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6= 909 . 6912) . 6913) . 6914) . 6915) . 6916) "Expected one of" ("nil" edeb= ug-spec-p "t" "0" (&rest edebug-spec))) > edebug-match-&or((((([&rest cl-lambda-arg] [&optional ["&optional" cl= -&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-arg= ]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow-o= ther-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) sy= mbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619) = . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 667= 1) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714) = (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (67= 54 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (6798 = . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6= 848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 6883= ) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909 .= 6912) . 6913) . 6914) . 6915) . 6916) ("nil" edebug-spec-p "t" "0" (&res= t edebug-spec))) > edebug-match-specs((((([&rest cl-lambda-arg] [&optional ["&optional" = cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-a= rg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow= -other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) = symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619= ) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 6= 671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714= ) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (= 6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (679= 8 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 .= 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 68= 83) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909= . 6912) . 6913) . 6914) . 6915) . 6916) (&or "nil" edebug-spec-p "t" "0"= (&rest edebug-spec)) edebug-match-specs) > edebug-match-specs((((([&rest cl-lambda-arg] [&optional ["&optional" = cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-a= rg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow= -other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) = symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619= ) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 6= 671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714= ) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (= 6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (679= 8 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 .= 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 68= 83) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909= . 6912) . 6913) . 6914) . 6915) . 6916) (name &or "nil" edebug-spec-p "t= " "0" (&rest edebug-spec)) edebug-match-specs) > edebug-match-specs((((([&rest cl-lambda-arg] [&optional ["&optional" = cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-a= rg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow= -other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) = symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619= ) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 6= 671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714= ) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (= 6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (679= 8 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 .= 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 68= 83) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909= . 6912) . 6913) . 6914) . 6915) . 6916) (:name edebug-spec name &or "nil= " edebug-spec-p "t" "0" (&rest edebug-spec)) edebug-match-specs) > edebug-match-specs((((([&rest cl-lambda-arg] [&optional ["&optional" = cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda-a= rg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&allow= -other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form) = symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 6619= ) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 . 6= 671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 6714= ) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753) (= 6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (679= 8 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 .= 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . 68= 83) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (6909= . 6912) . 6913) . 6914) . 6915) . 6916) ("def-edebug-spec" :name edebug-= spec name &or "nil" edebug-spec-p "t" "0" (&rest edebug-spec)) edebug-mat= ch-specs) > edebug-match-sublist((((([&rest cl-lambda-arg] [&optional ["&optional= " cl-&optional-arg &rest cl-&optional-arg]] [&optional ["&rest" cl-lambda= -arg]] [&optional ["&key" [cl-&key-arg &rest cl-&key-arg] &optional "&all= ow-other-keys"]] [&optional ["&aux" &rest &or (symbolp &optional def-form= ) symbolp]] . [&or arg nil]))) (6597 (6598 (6599 (6600 . 6605) (6606 . 66= 19) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (6666 .= 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (6707 . 67= 14) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 . 6753)= (6754 (6755 . 6766) (6767 . 6772) (6773 . 6784) . 6785) (6788 . 6797) (6= 798 . 6817) . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843= . 6848) (6851 . 6854) (6855 (6856 . 6863) (6864 . 6873) (6874 . 6882) . = 6883) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904) (6905 . 6908) (69= 09 . 6912) . 6913) . 6914) . 6915) . 6916) ("def-edebug-spec" :name edebu= g-spec name &or "nil" edebug-spec-p "t" "0" (&rest edebug-spec))) > edebug-match-list((((def-edebug-spec cl-lambda-list (([&rest cl-lambd= a-arg] [&optional ["&optional" cl-&optional-arg &rest cl-&optional-arg]] = [&optional ["&rest" cl-lambda-arg]] [&optional ["&key" ... &optional "&al= low-other-keys"]] [&optional ["&aux" &rest &or ... symbolp]] . [&or arg n= il])))) (6563 (6564 . 6579) (6580 . 6594) (6597 (6598 (6599 (6600 . 6605)= (6606 . 6619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 66= 65) (6666 . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706= (6707 . 6714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6= 747 . 6753) (6754 ... ... ... . 6785) (6788 . 6797) (6798 . 6817) . 6818)= . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6848) (6851 . 68= 54) (6855 ... ... ... . 6883) (6884 . 6891) . 6892) . 6893) (6899 (6901 .= 6904) (6905 . 6908) (6909 . 6912) . 6913) . 6914) . 6915) . 6916)) ("def= -edebug-spec" :name edebug-spec name &or "nil" edebug-spec-p "t" "0" (&re= st edebug-spec))) > edebug-match-one-spec((((def-edebug-spec cl-lambda-list (([&rest cl-l= ambda-arg] [&optional ["&optional" cl-&optional-arg &rest cl-&optional-ar= g]] [&optional ["&rest" cl-lambda-arg]] [&optional ["&key" ... &optional = "&allow-other-keys"]] [&optional ["&aux" &rest &or ... symbolp]] . [&or a= rg nil])))) (6563 (6564 . 6579) (6580 . 6594) (6597 (6598 (6599 (6600 . 6= 605) (6606 . 6619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 = . 6665) (6666 . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (= 6706 (6707 . 6714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (674= 6 (6747 . 6753) (6754 ... ... ... . 6785) (6788 . 6797) (6798 . 6817) . 6= 818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6848) (6851 = . 6854) (6855 ... ... ... . 6883) (6884 . 6891) . 6892) . 6893) (6899 (69= 01 . 6904) (6905 . 6908) (6909 . 6912) . 6913) . 6914) . 6915) . 6916)) (= "def-edebug-spec" :name edebug-spec name &or "nil" edebug-spec-p "t" "0" = (&rest edebug-spec))) > edebug-match-specs((((def-edebug-spec cl-lambda-list (([&rest cl-lamb= da-arg] [&optional ["&optional" cl-&optional-arg &rest cl-&optional-arg]]= [&optional ["&rest" cl-lambda-arg]] [&optional ["&key" ... &optional "&a= llow-other-keys"]] [&optional ["&aux" &rest &or ... symbolp]] . [&or arg = nil])))) (6563 (6564 . 6579) (6580 . 6594) (6597 (6598 (6599 (6600 . 6605= ) (6606 . 6619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6= 665) (6666 . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (670= 6 (6707 . 6714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (= 6747 . 6753) (6754 ... ... ... . 6785) (6788 . 6797) (6798 . 6817) . 6818= ) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6848) (6851 . 6= 854) (6855 ... ... ... . 6883) (6884 . 6891) . 6892) . 6893) (6899 (6901 = . 6904) (6905 . 6908) (6909 . 6912) . 6913) . 6914) . 6915) . 6916)) (("d= ef-edebug-spec" :name edebug-spec name &or "nil" edebug-spec-p "t" "0" (&= rest edebug-spec))) edebug-match-specs) > edebug-match((((def-edebug-spec cl-lambda-list (([&rest cl-lambda-arg= ] [&optional ["&optional" cl-&optional-arg &rest cl-&optional-arg]] [&opt= ional ["&rest" cl-lambda-arg]] [&optional ["&key" ... &optional "&allow-o= ther-keys"]] [&optional ["&aux" &rest &or ... symbolp]] . [&or arg nil]))= )) (6563 (6564 . 6579) (6580 . 6594) (6597 (6598 (6599 (6600 . 6605) (660= 6 . 6619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (6649 . 6665) (= 6666 . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705) (6706 (670= 7 . 6714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (6746 (6747 .= 6753) (6754 ... ... ... . 6785) (6788 . 6797) (6798 . 6817) . 6818) . 68= 19) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6848) (6851 . 6854) (= 6855 ... ... ... . 6883) (6884 . 6891) . 6892) . 6893) (6899 (6901 . 6904= ) (6905 . 6908) (6909 . 6912) . 6913) . 6914) . 6915) . 6916)) (("def-ede= bug-spec" :name edebug-spec name &or "nil" edebug-spec-p "t" "0" (&rest e= debug-spec)))) > edebug-make-form-wrapper((((def-edebug-spec cl-lambda-list (([&rest c= l-lambda-arg] [&optional ["&optional" cl-&optional-arg &rest cl-&optional= -arg]] [&optional ["&rest" cl-lambda-arg]] [&optional ["&key" ... &option= al "&allow-other-keys"]] [&optional ["&aux" &rest &or ... symbolp]] . [&o= r arg nil])))) (6563 (6564 . 6579) (6580 . 6594) (6597 (6598 (6599 (6600 = . 6605) (6606 . 6619) . 6620) (6625 (6626 . 6635) (6636 (6637 . 6648) (66= 49 . 6665) (6666 . 6671) (6672 . 6688) . 6689) . 6690) (6695 (6696 . 6705= ) (6706 (6707 . 6714) (6715 . 6728) . 6729) . 6730) (6735 (6736 . 6745) (= 6746 (6747 . 6753) (6754 ... ... ... . 6785) (6788 . 6797) (6798 . 6817) = . 6818) . 6819) (6824 (6825 . 6834) (6835 (6836 . 6842) (6843 . 6848) (68= 51 . 6854) (6855 ... ... ... . 6883) (6884 . 6891) . 6892) . 6893) (6899 = (6901 . 6904) (6905 . 6908) (6909 . 6912) . 6913) . 6914) . 6915) . 6916)= ) 6563 6915 (("def-edebug-spec" :name edebug-spec name &or "nil" edebug-s= pec-p "t" "0" (&rest edebug-spec)))) > edebug-read-and-maybe-wrap-form1() > edebug-read-and-maybe-wrap-form() > edebug-read-top-level-form() > edebug-eval-defun((4)) > apply(edebug-eval-defun (4)) > eval-defun((4)) > funcall-interactively(eval-defun (4)) > call-interactively(eval-defun nil nil) > command-execute(eval-defun) > In GNU Emacs 27.0.91 (build 3, x86_64-pc-linux-gnu, GTK+ Version 3.24.1= 3) > of 2020-04-20 > Repository revision: a1040861f118881004f59866111f64cd0ae03b7a > Repository branch: emacs-27 > Windowing system distributor 'The X.Org Foundation', version 11.0.12004= 000 > System Description: Debian GNU/Linux rodete [ .... ] > --=20 > Google Germany GmbH > Erika-Mann-Stra=C3=9Fe 33 > 80636 M=C3=BCnchen --=20 Alan Mackenzie (Nuremberg, Germany).