From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Andreas =?UTF-8?Q?R=C3=B6hler?= Newsgroups: gmane.emacs.bugs Subject: bug#33375: 27.0.50; Nested function definitions Date: Wed, 14 Nov 2018 12:46:40 +0100 Message-ID: <467f9167-eea8-5342-4f76-53943767aa6b@easy-emacs.de> References: <3de36fb2-d7e6-347e-79ec-c38950aca174@easy-emacs.de> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8; format=flowed Content-Transfer-Encoding: 8bit X-Trace: blaine.gmane.org 1542195605 12921 195.159.176.226 (14 Nov 2018 11:40:05 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Wed, 14 Nov 2018 11:40:05 +0000 (UTC) User-Agent: Mozilla/5.0 (X11; Linux i686; rv:52.0) Gecko/20100101 Thunderbird/52.9.1 To: 33375@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed Nov 14 12:40:01 2018 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gMtWb-0003FI-Di for geb-bug-gnu-emacs@m.gmane.org; Wed, 14 Nov 2018 12:40:01 +0100 Original-Received: from localhost ([::1]:59613 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gMtYh-0001FI-S3 for geb-bug-gnu-emacs@m.gmane.org; Wed, 14 Nov 2018 06:42:11 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:44162) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gMtYc-0001F6-43 for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:42:06 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gMtYY-0002Po-83 for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:42:06 -0500 Original-Received: from debbugs.gnu.org ([208.118.235.43]:46777) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gMtYX-0002PV-Th for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:42:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1gMtYX-0007or-Pm for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:42:01 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Andreas =?UTF-8?Q?R=C3=B6hler?= Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 14 Nov 2018 11:42:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 33375 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.154219567029987 (code B ref -1); Wed, 14 Nov 2018 11:42:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 14 Nov 2018 11:41:10 +0000 Original-Received: from localhost ([127.0.0.1]:51035 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gMtXh-0007nb-Og for submit@debbugs.gnu.org; Wed, 14 Nov 2018 06:41:10 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:34345) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gMtXf-0007nH-QF for submit@debbugs.gnu.org; Wed, 14 Nov 2018 06:41:08 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gMtXY-0001tF-S3 for submit@debbugs.gnu.org; Wed, 14 Nov 2018 06:41:01 -0500 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:49278) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gMtXY-0001t7-Mo for submit@debbugs.gnu.org; Wed, 14 Nov 2018 06:41:00 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:43945) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gMtXX-0001CH-R8 for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:41:00 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gMtXU-0001rb-OV for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:40:59 -0500 Original-Received: from mout.kundenserver.de ([212.227.17.24]:52151) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1gMtXU-0001qj-FY for bug-gnu-emacs@gnu.org; Wed, 14 Nov 2018 06:40:56 -0500 Original-Received: from [192.168.178.35] ([88.130.96.103]) by mrelayeu.kundenserver.de (mreue106 [212.227.15.183]) with ESMTPSA (Nemesis) id 1N1xdf-1fLbWJ1vnl-012IMs for ; Wed, 14 Nov 2018 12:40:54 +0100 In-Reply-To: Content-Language: en-US X-Provags-ID: V03:K1:nuXHpwVzBFCHxIxP11wKlHogzQZ7tRyqKAGMi9rQHXD+Ihky0eC CEUVWIF19rH4OfVHQgMdvjq1EYhdS/OrHn+ODKEsd7CODyQkMvX1ZP270EHrhWO/z9m4a9F kFiTX6iYY6HnuvfAUaCgQ0qO4ZESwrFBajBTdWUG7BvPaSzwr0RLs26D53Oh3DEp9fBPVzj hReWklzyz7ClrqV//+WdQ== X-UI-Out-Filterresults: notjunk:1;V01:K0:5P+0O8Hchac=:Cl3Np6YA+zV3+vVF8F1Ajx mC1S8PKESzm3sE86qSM7nQ26EyRxtzJoRv6YiMvRRlQSpjXUWDDzn2kA6VhbLiXHyiQQh+hMG 7qF2Pbrh9LNKdm3NpQ9nvywPmYl8Ydebl5hSXLSLv05wLT4F6Q2yGoXR0rl5E9wJmkSDL6PMx Eu/Xoaw249kQLjDHEkdSYl7vRe3uGb/oinU080SzsPg9tJIxROm8PAw9FgEdXYLodzPS+IzTP jMFJcXIbGDK4EIwS6MjpCUaNW3ysX/XCc5ve1MDiBB8OYnZdAym21UXjy5ejAFhv7G/KqyHlj pb+vfLfmIzfmieNBMVtoQvNLoLNry6gnaL1wJWd/3paQCf13r9qRMDhP4aIKFWhRKRZlBWsIg PMtiIc9fKPpShQdLQey+y56np/lkFel1KmUuVhsqb9KralID+T/D0uLJNvH0FYRjJpPiJ8/13 6jWxjBvSrkDVbpBh2T4aw+RWZDr0BN3eunzJZ+/A8a6xAE/JGbvr7SaNXYUHtoi4WmgrOEiIP gFEHwSyx9N2nypZfPt63UFdJHYw/Sim5Z2nTS46Y9padgmhUaYg5Wg7VyoY+Ntp8iuYx4uhA5 9BeiKiKskC1dIxFC/58pCBX0Xg8wcYevLihyj6wf7e/w2rJy0pt/zTOdmAa6upo/mjliUDdw2 /GI7VEAZnr77kczc6aaqmEvcAnbt4xVE4Eq6hmPFRu0J98nBrCZAOMHIW1Z0fQhg7Nz8xPbWL D6fQeK3UhIv4btvzUg2bcJQ36w8JaoKUkb+NLTKyheTQleCGSU5NlVBRhBO3ISUFwuDo/Osk X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.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.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:152379 Archived-At: On 14.11.2018 11:06, Andreas Röhler wrote: > On 14.11.2018 10:39, Andreas Röhler wrote: >> >> In GNU Emacs 27.0.50 (build 2, i686-pc-linux-gnu, GTK+ Version >> 3.14.5) of 2018-11-09 Some test which should display the issue: (ert-deftest ar-backward-defun-test-1977mjB () (with-temp-buffer (insert "(defun foo1 () \"[Some docu] \(defun other-foo \" (interactive) \;\; defining another function inside (defun foo2 () (interactive) (message \"%s\" \"Foo2\") \;\; another syntactically correct function just badly indented \(defun foo3 () (interactive) (message \"%s\" \"Foo3\")) ) (message \"%s\" \"Foo1\"))") (emacs-lisp-mode) (switch-to-buffer (current-buffer)) (goto-char (point-max)) (back-to-indentation) (if (functionp 'ar-backward-defun) (ar-backward-defun) (beginning-of-defun)) (should (looking-at "(defun foo1")))) (ert-deftest ar-backward-defun-test-1977ztH () (with-temp-buffer (insert "(defun foo1 () \"[Some docu] \(defun other-foo \" (interactive) \;\; defining another function inside (defun foo2 () (interactive) (message \"%s\" \"Foo2\") \;\; another syntactically correct function just badly indented \(defun foo3 () (interactive) (message \"%s\" \"Foo3\")) ) (message \"%s\" \"Foo1\"))") (emacs-lisp-mode) (switch-to-buffer (current-buffer)) (goto-char (point-max)) (search-backward "foo2") (if (functionp 'ar-backward-defun) (ar-backward-defun) (beginning-of-defun)) (should (looking-at " +(defun foo2")))) (ert-deftest ar-backward-defun-test-1977A4N () (with-temp-buffer (insert "(defun foo1 () \"[Some docu] \(defun other-foo \" (interactive) \;\; defining another function inside (defun foo2 () (interactive) (message \"%s\" \"Foo2\") \;\; another syntactically correct function just badly indented \(defun foo3 () (interactive) (message \"%s\" \"Foo3\")) ) (message \"%s\" \"Foo1\"))") (emacs-lisp-mode) (switch-to-buffer (current-buffer)) (goto-char (point-max)) (search-backward "Foo3") (forward-line 1) (if (functionp 'ar-backward-defun) (ar-backward-defun) (beginning-of-defun)) (should (looking-at "(defun foo2"))))