GNU bug report logs - #60644
30.0.50; eval-defun: in specific case finds wrong function below the current one

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: emacs; Severity: wishlist; Reported by: Jean Louis <bugs@HIDDEN>; dated Sun, 8 Jan 2023 06:21:01 UTC; Maintainer for emacs is bug-gnu-emacs@HIDDEN.
Severity set to 'wishlist' from 'normal' Request was from Eli Zaretskii <eliz@HIDDEN> to control <at> debbugs.gnu.org. Full text available.

Message received at 60644 <at> debbugs.gnu.org:


Received: (at 60644) by debbugs.gnu.org; 8 Jan 2023 15:29:48 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 10:29:47 2023
Received: from localhost ([127.0.0.1]:34397 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pEXcJ-0002WY-F0
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 10:29:47 -0500
Received: from eggs.gnu.org ([209.51.188.92]:52020)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <eliz@HIDDEN>)
 id 1pEXcH-0002W5-5T; Sun, 08 Jan 2023 10:29:45 -0500
Received: from fencepost.gnu.org ([2001:470:142:3::e])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pEXcB-00079P-VE; Sun, 08 Jan 2023 10:29:39 -0500
DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org;
 s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date:
 mime-version; bh=lb7OEUCZj/KZd9czgmVz8Pc2UQdsfB5+VNOei/UjyZU=; b=R5d8dEMilWYC
 1dAT2IKeiDdhcEP2NiG6TOkKtLHyhnRZN9p6j8g/MQ3VhLOS0lSG/e6uzoxWr7+fjyqnFVGm5go9J
 agfo482np5TOydKRxgO+8nVwoz+KFHzZnxGyWfhDFmG3Uu0tZjDu4qbHDOgvXHKhyJ3SamaP2jLIw
 g1+ooEsx67NUdeyY9053RRkMiyFIMiFRgva3y2eAmmYpIeQjHbEolosaqVsTmeW2E9N80uQvT+dCs
 RCYUVSyZsc2/Gs2RlW09iuLU6req4be4RhozbBnBhbFBoZvqI/UNTxcY/fFCe1JcVZ6UZAjo6mJax
 LaBhh5//uaR08+1ZB//3xg==;
Received: from [87.69.77.57] (helo=home-c4e4a596f7)
 by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pEXcB-0003C1-6g; Sun, 08 Jan 2023 10:29:39 -0500
Date: Sun, 08 Jan 2023 17:30:01 +0200
Message-Id: <83pmbpoxhi.fsf@HIDDEN>
From: Eli Zaretskii <eliz@HIDDEN>
To: Stefan Monnier <monnier@HIDDEN>
In-Reply-To: <jwvtu1159xy.fsf-monnier+emacs@HIDDEN> (message from Stefan
 Monnier on Sun, 08 Jan 2023 10:23:41 -0500)
Subject: Re: bug#60644: 30.0.50; eval-defun: in specific case finds wrong
 function below the current one
References: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
 <83eds5qpm4.fsf@HIDDEN> <Y7qnKKyKaqY1jCn3@HIDDEN>
 <83y1qdp72d.fsf@HIDDEN> <jwvtu1159xy.fsf-monnier+emacs@HIDDEN>
X-Spam-Score: -2.3 (--)
X-Debbugs-Envelope-To: 60644
Cc: bugs@HIDDEN, 60644 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)

severity 60644 wishlist
thanks

> From: Stefan Monnier <monnier@HIDDEN>
> Cc: Jean Louis <bugs@HIDDEN>,  60644 <at> debbugs.gnu.org
> Date: Sun, 08 Jan 2023 10:23:41 -0500
> 
> > AFAIU, the top-level form (which is what C-M-x is about) is detected
> > in a way that depends on indentation.
> >
> > Stefan, any further comments, or should we close this?
> 
> Nothing more to add, other than the fact that I'm also bitten by this
> every once in a while.  I'm not sure what could be done about it, tho,
> since I'm pretty sure I'd get bitten occasionally no matter what
> semantics we pick.
> 
> Maybe C-M-x should display visually what it evaluated?
> 
> And maybe there sound be some way to force a particular choice (maybe
> using the region)?

Good ideas.  So I think I'll leave the bug open, in case someone would
like to implement these ideas, just make it a feature request.

Thanks.




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.

Message received at 60644 <at> debbugs.gnu.org:


Received: (at 60644) by debbugs.gnu.org; 8 Jan 2023 15:23:53 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 10:23:53 2023
Received: from localhost ([127.0.0.1]:34381 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pEXWb-0002NP-1j
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 10:23:53 -0500
Received: from mailscanner.iro.umontreal.ca ([132.204.25.50]:29921)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <monnier@HIDDEN>) id 1pEXWZ-0002ND-8n
 for 60644 <at> debbugs.gnu.org; Sun, 08 Jan 2023 10:23:51 -0500
Received: from pmg3.iro.umontreal.ca (localhost [127.0.0.1])
 by pmg3.iro.umontreal.ca (Proxmox) with ESMTP id 7252A440A68;
 Sun,  8 Jan 2023 10:23:45 -0500 (EST)
Received: from mail01.iro.umontreal.ca (unknown [172.31.2.1])
 by pmg3.iro.umontreal.ca (Proxmox) with ESMTP id 1F744440992;
 Sun,  8 Jan 2023 10:23:44 -0500 (EST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=iro.umontreal.ca;
 s=mail; t=1673191424;
 bh=WoQaWKwBC1Tz3ff8YGs6EA8K256xFtyGQoru79bdB0Y=;
 h=From:To:Cc:Subject:In-Reply-To:References:Date:From;
 b=JZr6u2esbAjhbjWgkzFkCl3q9E/YLYgBUkP9ZcJ6xfkffYwSU8RAGHvBPJJ6N5+ya
 5J2KtdIwihyL1lndR68vJ9PP2BahANaO2i7DTQ2Zpj6cuCbPstW362ekTq/vcA0bad
 aKb4ViTbf9Gu2r1cUOWq+JFK5HCYN6NR77cpDykVcPdUO1/yGHB25SfBJHcB6ZI5RV
 uJ4nQM7IVl/0O9/hvfeLDkrtoFrxkB0/hM4Iiu0JnocM3XcNjtXpx/fjYk31RHxN3g
 FdEM0NtIzSVMjBgdMKS8D/8iELTOpUbqnptTF5AobQbuFS9Vg6rNzHNUmR1E+YPJxW
 CnZDNzb1eMBIw==
Received: from pastel (unknown [45.72.200.228])
 by mail01.iro.umontreal.ca (Postfix) with ESMTPSA id AD7321207B1;
 Sun,  8 Jan 2023 10:23:43 -0500 (EST)
From: Stefan Monnier <monnier@HIDDEN>
To: Eli Zaretskii <eliz@HIDDEN>
Subject: Re: bug#60644: 30.0.50; eval-defun: in specific case finds wrong
 function below the current one
In-Reply-To: <83y1qdp72d.fsf@HIDDEN> (Eli Zaretskii's message of "Sun, 08 Jan
 2023 14:03:06 +0200")
Message-ID: <jwvtu1159xy.fsf-monnier+emacs@HIDDEN>
References: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
 <83eds5qpm4.fsf@HIDDEN> <Y7qnKKyKaqY1jCn3@HIDDEN>
 <83y1qdp72d.fsf@HIDDEN>
Date: Sun, 08 Jan 2023 10:23:41 -0500
User-Agent: Gnus/5.13 (Gnus v5.13)
MIME-Version: 1.0
Content-Type: text/plain
X-SPAM-INFO: Spam detection results:  0
 ALL_TRUSTED                -1 Passed through trusted hosts only via SMTP
 AWL -0.257 Adjusted score from AWL reputation of From: address
 BAYES_00                 -1.9 Bayes spam probability is 0 to 1%
 DKIM_SIGNED               0.1 Message has a DKIM or DK signature,
 not necessarily valid
 DKIM_VALID -0.1 Message has at least one valid DKIM or DK signature
 DKIM_VALID_AU -0.1 Message has a valid DKIM or DK signature from author's
 domain
X-SPAM-LEVEL: 
X-Spam-Score: -2.3 (--)
X-Debbugs-Envelope-To: 60644
Cc: Jean Louis <bugs@HIDDEN>, 60644 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)

> AFAIU, the top-level form (which is what C-M-x is about) is detected
> in a way that depends on indentation.
>
> Stefan, any further comments, or should we close this?

Nothing more to add, other than the fact that I'm also bitten by this
every once in a while.  I'm not sure what could be done about it, tho,
since I'm pretty sure I'd get bitten occasionally no matter what
semantics we pick.

Maybe C-M-x should display visually what it evaluated?

And maybe there sound be some way to force a particular choice (maybe
using the region)?


        Stefan





Information forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.

Message received at 60644 <at> debbugs.gnu.org:


Received: (at 60644) by debbugs.gnu.org; 8 Jan 2023 12:02:52 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 07:02:52 2023
Received: from localhost ([127.0.0.1]:60103 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pEUO4-0006GP-H4
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 07:02:52 -0500
Received: from eggs.gnu.org ([209.51.188.92]:37676)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <eliz@HIDDEN>) id 1pEUO2-0006G9-NJ
 for 60644 <at> debbugs.gnu.org; Sun, 08 Jan 2023 07:02:51 -0500
Received: from fencepost.gnu.org ([2001:470:142:3::e])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pEUNw-0006yX-Tp; Sun, 08 Jan 2023 07:02:45 -0500
DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org;
 s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date:
 mime-version; bh=T6xcCbaAb8iQXbUGlplC8UfnHmVpjfFBr+8QzdH+5vU=; b=VlALsy5PWmk0
 BBVwMZLsWJ/FcBEDQKUoVLUKzsL3IQjyUMhHM5BaARKXW2ESpTWW4Nn3kPo4X/ohIYim25NDOlIl6
 4tNnkP1VUVhiH7fuhoQtAlohNv1bEBozT+mwk1Da7XkSLwmJObOOzRkCUfBUh/6ebfSheQKTy4bPE
 LbOdzLGsvidqaSykpY6YbbgmgWoCVp0cfseZs/CQReSsoSwO5ovtdryatZCn2xSUXQW2sIc2bAplI
 8d3wNkbzRbAlsnQs1XMOK5NtPe179yAMCF7JQA4ylHK6Xzt3PCg6z1LpjRWNOWIUnDNtRFuHil8vg
 oj70rRd2XhTDiYncV6G19w==;
Received: from [87.69.77.57] (helo=home-c4e4a596f7)
 by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pEUNv-0005mE-8K; Sun, 08 Jan 2023 07:02:44 -0500
Date: Sun, 08 Jan 2023 14:03:06 +0200
Message-Id: <83y1qdp72d.fsf@HIDDEN>
From: Eli Zaretskii <eliz@HIDDEN>
To: Jean Louis <bugs@HIDDEN>,
 Stefan Monnier <monnier@HIDDEN>
In-Reply-To: <Y7qnKKyKaqY1jCn3@HIDDEN> (message from Jean Louis
 on Sun, 8 Jan 2023 14:21:12 +0300)
Subject: Re: bug#60644: 30.0.50; eval-defun: in specific case finds wrong
 function below the current one
References: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
 <83eds5qpm4.fsf@HIDDEN> <Y7qnKKyKaqY1jCn3@HIDDEN>
X-Spam-Score: -2.3 (--)
X-Debbugs-Envelope-To: 60644
Cc: 60644 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)

> Date: Sun, 8 Jan 2023 14:21:12 +0300
> From: Jean Louis <bugs@HIDDEN>
> Cc: 60644 <at> debbugs.gnu.org
> 
> * Eli Zaretskii <eliz@HIDDEN> [2023-01-08 13:37]:
> > > Date: Sun, 08 Jan 2023 09:19:05 +0300
> > > From: Jean Louis <bugs@HIDDEN>
> > > 
> > > Find in the file two functions, go somewhere in the middle of
> > > `hyperscope-tag-hyperdocuments-by-type' and try invoking C-M-x and you
> > > will see `rcd-db-recurse-on-table' instead of
> > > `hyperscope-tag-hyperdocuments-by-type'. In general I can't instrument
> > > this function interactively.
> > 
> > Its indentation is wrong.  Reindent the line where you have
> > "(interactive)", and your problems will likely disappear.
> 
> I get it, it works.
> 
> I was not aware that detection system should rely on indentation, but
> rather on sexp.

AFAIU, the top-level form (which is what C-M-x is about) is detected
in a way that depends on indentation.

Stefan, any further comments, or should we close this?




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.

Message received at 60644 <at> debbugs.gnu.org:


Received: (at 60644) by debbugs.gnu.org; 8 Jan 2023 11:48:13 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 06:48:13 2023
Received: from localhost ([127.0.0.1]:60061 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pEU9s-0005nh-Sh
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 06:48:13 -0500
Received: from stw1.rcdrun.com ([217.170.207.13]:52485)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <bugs@HIDDEN>) id 1pEU9q-0005nK-Hj
 for 60644 <at> debbugs.gnu.org; Sun, 08 Jan 2023 06:48:11 -0500
Received: from localhost ([::ffff:197.239.14.179])
 (AUTH: PLAIN admin, TLS: TLS1.3,256bits,ECDHE_RSA_AES_256_GCM_SHA384)
 by stw1.rcdrun.com with ESMTPSA
 id 0000000000055D52.0000000063BAAD7C.00001D93; Sun, 08 Jan 2023 04:48:11 -0700
Date: Sun, 8 Jan 2023 14:21:12 +0300
From: Jean Louis <bugs@HIDDEN>
To: Eli Zaretskii <eliz@HIDDEN>
Subject: Re: bug#60644: 30.0.50; eval-defun: in specific case finds wrong
 function below the current one
Message-ID: <Y7qnKKyKaqY1jCn3@HIDDEN>
References: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
 <83eds5qpm4.fsf@HIDDEN>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
In-Reply-To: <83eds5qpm4.fsf@HIDDEN>
User-Agent: Mutt/2.2.9+54 (af2080d) (2022-11-21)
X-Spam-Score: -0.0 (/)
X-Debbugs-Envelope-To: 60644
Cc: 60644 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.0 (-)

* Eli Zaretskii <eliz@HIDDEN> [2023-01-08 13:37]:
> > Date: Sun, 08 Jan 2023 09:19:05 +0300
> > From: Jean Louis <bugs@HIDDEN>
> > 
> > Find in the file two functions, go somewhere in the middle of
> > `hyperscope-tag-hyperdocuments-by-type' and try invoking C-M-x and you
> > will see `rcd-db-recurse-on-table' instead of
> > `hyperscope-tag-hyperdocuments-by-type'. In general I can't instrument
> > this function interactively.
> 
> Its indentation is wrong.  Reindent the line where you have
> "(interactive)", and your problems will likely disappear.

I get it, it works.

I was not aware that detection system should rely on indentation, but
rather on sexp.

--
Jean

Take action in Free Software Foundation campaigns:
https://www.fsf.org/campaigns

In support of Richard M. Stallman
https://stallmansupport.org/





Information forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.

Message received at 60644 <at> debbugs.gnu.org:


Received: (at 60644) by debbugs.gnu.org; 8 Jan 2023 10:36:54 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 05:36:54 2023
Received: from localhost ([127.0.0.1]:59953 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pET2r-0003ax-PD
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 05:36:53 -0500
Received: from eggs.gnu.org ([209.51.188.92]:44788)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <eliz@HIDDEN>) id 1pET2p-0003aj-9S
 for 60644 <at> debbugs.gnu.org; Sun, 08 Jan 2023 05:36:52 -0500
Received: from fencepost.gnu.org ([2001:470:142:3::e])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pET2j-0002yI-U2; Sun, 08 Jan 2023 05:36:45 -0500
DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org;
 s=fencepost-gnu-org; h=References:Subject:In-Reply-To:To:From:Date:
 mime-version; bh=FG54iyQbFcnQx7R3IYXJIagWgOUTzPPg9FVHGNEbcuc=; b=X1HuB3f4p2ks
 0j0NwOtFD4updACmgEhx+Z6+yikJllDS/Ejc0MpTffv+ZDt1K9WoX5L85otscLf/JN3tLJ/HM2io3
 OdMixJNMM/3POMzDXcVulJ7037tw9QkZ1zGrQg/vnlLwFf3C5fLm/sr1iREGs2noGsHG0V1h08xEH
 Jed6vGg+B4Y9Bt0Xe9tvi+Xs5Le9u1BxUcTbZLp3hPHFMCOVuj3hycM9+2mtqYE4elT1KbXiwZFqi
 wzU09O75lJbmRNHFU3FpSRx82rovIdyCotVi9YLnV81Saur9ohiiTF6T0MlU6kumtphPB3gjcAWPV
 DHedp/InKK5WpYM9O8vXMQ==;
Received: from [87.69.77.57] (helo=home-c4e4a596f7)
 by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <eliz@HIDDEN>)
 id 1pET2j-0003hF-2C; Sun, 08 Jan 2023 05:36:45 -0500
Date: Sun, 08 Jan 2023 12:37:07 +0200
Message-Id: <83eds5qpm4.fsf@HIDDEN>
From: Eli Zaretskii <eliz@HIDDEN>
To: Jean Louis <bugs@HIDDEN>
In-Reply-To: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN> (message
 from Jean Louis on Sun, 08 Jan 2023 09:19:05 +0300)
Subject: Re: bug#60644: 30.0.50;
 eval-defun: in specific case finds wrong function below the current
 one
References: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
X-Spam-Score: -2.3 (--)
X-Debbugs-Envelope-To: 60644
Cc: 60644 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)

> Date: Sun, 08 Jan 2023 09:19:05 +0300
> From: Jean Louis <bugs@HIDDEN>
> 
> Find in the file two functions, go somewhere in the middle of
> `hyperscope-tag-hyperdocuments-by-type' and try invoking C-M-x and you
> will see `rcd-db-recurse-on-table' instead of
> `hyperscope-tag-hyperdocuments-by-type'. In general I can't instrument
> this function interactively.

Its indentation is wrong.  Reindent the line where you have
"(interactive)", and your problems will likely disappear.




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 8 Jan 2023 06:20:43 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jan 08 01:20:43 2023
Received: from localhost ([127.0.0.1]:59727 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1pEP2x-00052B-0f
	for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 01:20:43 -0500
Received: from lists.gnu.org ([209.51.188.17]:43024)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <support1@HIDDEN>) id 1pEP2v-000523-1j
 for submit <at> debbugs.gnu.org; Sun, 08 Jan 2023 01:20:41 -0500
Received: from eggs.gnu.org ([2001:470:142:3::10])
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <support1@HIDDEN>)
 id 1pEP2u-0005xJ-Sh
 for bug-gnu-emacs@HIDDEN; Sun, 08 Jan 2023 01:20:40 -0500
Received: from stw1.rcdrun.com ([217.170.207.13])
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <support1@HIDDEN>)
 id 1pEP2r-0002Sw-OI
 for bug-gnu-emacs@HIDDEN; Sun, 08 Jan 2023 01:20:40 -0500
Received: from localhost ([::ffff:197.239.14.179])
 (AUTH: PLAIN admin, TLS: TLS1.3,256bits,ECDHE_RSA_AES_256_GCM_SHA384)
 by stw1.rcdrun.com with ESMTPSA
 id 0000000000055D52.0000000063BA6098.0000016A; Sat, 07 Jan 2023 23:20:08 -0700
Date: Sun, 08 Jan 2023 09:19:05 +0300
Message-ID: <413abcebc816c301ea4188c4112d27b3.support1@HIDDEN>
From: Jean Louis <bugs@HIDDEN>
To: bug-gnu-emacs@HIDDEN
Subject: 30.0.50;
 eval-defun: in specific case finds wrong function below the current
 one
Mime-Version: 1.0
Content-Type: multipart/mixed;
 boundary="=_stw1.rcdrun.com-362-1673158809-0001-2"
Received-SPF: pass client-ip=217.170.207.13; envelope-from=support1@HIDDEN;
 helo=stw1.rcdrun.com
X-Spam_score_int: -16
X-Spam_score: -1.7
X-Spam_bar: -
X-Spam_report: (-1.7 / 5.0 requ) BAYES_00=-1.9,
 HEADER_FROM_DIFFERENT_DOMAINS=0.25, SPF_HELO_PASS=-0.001,
 SPF_PASS=-0.001 autolearn=no autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.1 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.1 (--)

This is a MIME-formatted message.  If you see this text it means that your
E-mail software does not support MIME-formatted messages.

--=_stw1.rcdrun.com-362-1673158809-0001-2
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 7bit


Find in the file two functions, go somewhere in the middle of
`hyperscope-tag-hyperdocuments-by-type' and try invoking C-M-x and you
will see `rcd-db-recurse-on-table' instead of
`hyperscope-tag-hyperdocuments-by-type'. In general I can't instrument
this function interactively.


--=_stw1.rcdrun.com-362-1673158809-0001-2
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment; filename=test.el

(defun hyperscope-tag-hyperdocuments-by-type (&optional list-or-id) 
  "Tag hyperdocuments by their type.

LIST-OR-ID is list of hyperdocuments." 
(interactive)
 (let* ((list-or-id (cond ((and list-or-id 
				(listp list-or-id))
			   list-or-id)
			  (list-or-id (list list-or-id))
			  (t nil)))
	(types (cond (list-or-id 
		      (rcd-sql-list 
		       (format "SELECT DISTINCT hyobjects_hyobjectypes 
                                           FROM hyobjects 
                                          WHERE hyobjects_id IN (%s)" 
			       (mapconcat #'(lambda (id) (format "%s" id)) list-or-id ", ")) 
		       hs-db))
		     (t (rcd-sql-list "SELECT hyobjectypes_id FROM hyobjectypes" hs-db)))))
   (while types 
     (let ((tags (hyperscope-type-tags (pop types))))
       (while tags
	 (let* ((hyperscope-list-limit 10000000)
		(hyobjects (or list-or-id (mapcar #'(lambda (i) (car i)) (hyperscope-list-by-type type)))))
	   (while hyobjects 
	     (let ((hyperdocument (pop hyobjects)))
	       (hyperscope-tag-hyperdocument hyperdocument (pop tags))))))))))

;;(defun hyperscope-by-files)

(defun rcd-db-recurse-on-table (table id-column parent-column id pg &optional include-parent)
  "Return list of children of children for ID.

Optional INCLUDE-PARENT will include parent."
  (let* ((sql (format "WITH RECURSIVE recursetree AS (
                      SELECT s1.%s FROM %s s1 WHERE s1.%s = %s
                      UNION
                      SELECT s2.%s FROM %s s2 
                      JOIN recursetree ON s2.%s = recursetree.%s
                      )
                      SELECT * FROM recursetree"
		      id-column table parent-column id id-column table parent-column id-column))
	 (children (rcd-sql-list sql pg)))
    (cond (include-parent (append (list id) children))
	  (t children))))

--=_stw1.rcdrun.com-362-1673158809-0001-2
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 7bit




In GNU Emacs 30.0.50 (build 2, x86_64-pc-linux-gnu, X toolkit, cairo
 version 1.17.6, Xaw3d scroll bars) of 2023-01-08 built on
 protected.rcdrun.com
Repository revision: 5d1e14bd8b9a11ab860937d3ab97248ddeef30b1
Repository branch: master
Windowing system distributor 'The X.Org Foundation', version 11.0.12101004
System Description: Parabola GNU/Linux-libre

Configured using:
 'configure --with-x-toolkit=lucid --with-mailutils'

Configured features:
ACL CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM GSETTINGS HARFBUZZ
JPEG JSON LCMS2 LIBOTF LIBSYSTEMD LIBXML2 M17N_FLT MODULES NOTIFY
INOTIFY PDUMPER PNG RSVG SECCOMP SOUND SQLITE3 THREADS TIFF
TOOLKIT_SCROLL_BARS TREE_SITTER WEBP X11 XAW3D XDBE XIM XINPUT2 XPM
LUCID ZLIB

Important settings:
  value of $LC_ALL: en_US.UTF-8
  value of $LANG: de_DE.UTF-8
  value of $XMODIFIERS: @im=exwm-xim
  locale-coding-system: utf-8-unix

Major mode: Fundamental

Minor modes in effect:
  tooltip-mode: t
  global-eldoc-mode: t
  show-paren-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  blink-cursor-mode: t
  buffer-read-only: t
  line-number-mode: t
  indent-tabs-mode: t
  transient-mark-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t

Load-path shadows:
None found.

Features:
(shadow mailalias emacsbug message yank-media puny dired
dired-loaddefs rfc822 mml mml-sec epa derived epg rfc6068 epg-config
gnus-util text-property-search time-date mm-decode mm-bodies mm-encode
mail-parse rfc2231 mailabbrev gmm-utils mailheader sendmail rfc2047
rfc2045 ietf-drums mm-util mail-prsvr mail-utils hyperbole-autoloads
package browse-url url url-proxy url-privacy url-expand url-methods
url-history url-cookie generate-lisp-file url-domsuf url-util mailcap
url-handlers url-parse auth-source cl-seq eieio eieio-core cl-macs
password-cache json subr-x map byte-opt gv bytecomp byte-compile
url-vars cl-loaddefs cl-lib rmc iso-transl tooltip cconv eldoc paren
electric uniquify ediff-hook vc-hooks lisp-float-type elisp-mode
mwheel term/x-win x-win term/common-win x-dnd tool-bar dnd fontset
image regexp-opt fringe tabulated-list replace newcomment text-mode
lisp-mode prog-mode register page tab-bar menu-bar rfn-eshadow isearch
easymenu timer select scroll-bar mouse jit-lock font-lock syntax
font-core term/tty-colors frame minibuffer nadvice seq simple
cl-generic indonesian philippine cham georgian utf-8-lang misc-lang
vietnamese tibetan thai tai-viet lao korean japanese eucjp-ms cp51932
hebrew greek romanian slovak czech european ethiopic indian cyrillic
chinese composite emoji-zwj charscript charprop case-table epa-hook
jka-cmpr-hook help abbrev obarray oclosure cl-preloaded button
loaddefs theme-loaddefs faces cus-face macroexp files window
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget keymap hashtable-print-readable backquote threads
dbusbind inotify lcms2 dynamic-setting system-font-setting
font-render-setting cairo x-toolkit xinput2 x multi-tty
make-network-process emacs)

Memory information:
((conses 16 56113 8712)
 (symbols 48 6869 0)
 (strings 32 20665 973)
 (string-bytes 1 617054)
 (vectors 16 14338)
 (vector-slots 8 199567 9406)
 (floats 8 29 36)
 (intervals 56 341 0)
 (buffers 984 10))


-- 
Jean

Take action in Free Software Foundation campaigns:
https://www.fsf.org/campaigns

In support of Richard M. Stallman
https://stallmansupport.org/

--=_stw1.rcdrun.com-362-1673158809-0001-2--




Acknowledgement sent to Jean Louis <bugs@HIDDEN>:
New bug report received and forwarded. Copy sent to bug-gnu-emacs@HIDDEN. Full text available.
Report forwarded to bug-gnu-emacs@HIDDEN:
bug#60644; Package emacs. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Sun, 8 Jan 2023 15:45:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.