GNU bug report logs - #26440
seq-mapn fails with circular sequence

Previous Next

Package: emacs;

Reported by: "Phillip Lord" <phillip.lord <at> russet.org.uk>

Date: Tue, 11 Apr 2017 08:14:02 UTC

Severity: normal

Fixed in version 26.1

Done: Nicolas Petton <nicolas <at> petton.fr>

Bug is archived. No further changes may be made.

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 26440 in the body.
You can then email your comments to 26440 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

View this report as an mbox folder, status mbox, maintainer mbox

Report forwarded to bug-gnu-emacs <at> gnu.org:
bug#26440; Package emacs. (Tue, 11 Apr 2017 08:14:02 GMT) Full text and rfc822 format available.
Acknowledgement sent to "Phillip Lord" <phillip.lord <at> russet.org.uk>:
New bug report received and forwarded. Copy sent to bug-gnu-emacs <at> gnu.org. (Tue, 11 Apr 2017 08:14:02 GMT) Full text and rfc822 format available.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: "Phillip Lord" <phillip.lord <at> russet.org.uk>
To: bug-gnu-emacs <at> gnu.org
Subject: seq-mapn fails with circular sequence
Date: Tue, 11 Apr 2017 08:12:40 -0000

On Emacs-25 circular structures cause seq-mapn not to terminate
although the documentation suggest that they should.

Consider:

    (defvar l '(a c d))
    (setq l (nconc l l))
    (seq-mapn #'cons l '(1))

This should return '((a . 1)) but actually does not terminate.

The problem is caused by call to seq-into which includes:

    (append sequence nil)

The problem does exist on trunk which does this instead:

    (if (listp sequence)
        sequence
      (append sequence nil)))
bug Marked as fixed in versions 26.1. Request was from Glenn Morris <rgm <at> gnu.org> to control <at> debbugs.gnu.org. (Tue, 11 Apr 2017 17:23:01 GMT) Full text and rfc822 format available.
Information forwarded to bug-gnu-emacs <at> gnu.org:
bug#26440; Package emacs. (Wed, 12 Apr 2017 08:23:02 GMT) Full text and rfc822 format available.

Message #10 received at 26440 <at> debbugs.gnu.org (full text, mbox):

From: Nicolas Petton <nicolas <at> petton.fr>
To: "Phillip Lord" <phillip.lord <at> russet.org.uk>
Cc: 26440 <at> debbugs.gnu.org
Subject: Re: bug#26440: seq-mapn fails with circular sequence
Date: Wed, 12 Apr 2017 10:22:27 +0200

"Phillip Lord" <phillip.lord <at> russet.org.uk> writes:

Hi Phillip,

> The problem does exist on trunk which does this instead:

Did you mean "does not exist"?

Cheers,
Nico
Information forwarded to bug-gnu-emacs <at> gnu.org:
bug#26440; Package emacs. (Mon, 31 Jul 2017 11:35:02 GMT) Full text and rfc822 format available.

Message #13 received at 26440 <at> debbugs.gnu.org (full text, mbox):

From: Nicolas Petton <nicolas <at> petton.fr>
To: Phillip Lord <phillip.lord <at> russet.org.uk>
Cc: 26440 <at> debbugs.gnu.org
Subject: Re: bug#26440: seq-mapn fails with circular sequence
Date: Mon, 31 Jul 2017 13:34:00 +0200

[Message part 1 (text/plain, inline)]
Nicolas Petton <nicolas <at> petton.fr> writes:

>> The problem does exist on trunk which does this instead:

This is using seq.el from trunk:

  (defvar l '(a c d))
  (setq l (nconc l l))
  (seq-mapn #'cons l '(1)) ;; ((a . 1))

Cheers,
Nico

[signature.asc (application/pgp-signature, inline)]
Information forwarded to bug-gnu-emacs <at> gnu.org:
bug#26440; Package emacs. (Tue, 01 Aug 2017 18:41:01 GMT) Full text and rfc822 format available.

Message #16 received at 26440 <at> debbugs.gnu.org (full text, mbox):

From: Nicolas Petton <nicolas <at> petton.fr>
To: Phillip Lord <phillip.lord <at> russet.org.uk>
Cc: 26440-done <at> debbugs.gnu.org, 26440 <at> debbugs.gnu.org
Subject: Re: bug#26440: seq-mapn fails with circular sequence
Date: Tue, 01 Aug 2017 20:40:20 +0200

[Message part 1 (text/plain, inline)]
Nicolas Petton <nicolas <at> petton.fr> writes:

Hi Phillip,

> This is using seq.el from trunk:
>
>   (defvar l '(a c d))
>   (setq l (nconc l l))
>   (seq-mapn #'cons l '(1)) ;; ((a . 1))


I'm closing this issue, but feel free to reopen it if you can reproduce
the problem with master.

Cheers,
Nico

[signature.asc (application/pgp-signature, inline)]
Reply sent to Nicolas Petton <nicolas <at> petton.fr>:
You have taken responsibility. (Tue, 01 Aug 2017 18:41:02 GMT) Full text and rfc822 format available.
Notification sent to "Phillip Lord" <phillip.lord <at> russet.org.uk>:
bug acknowledged by developer. (Tue, 01 Aug 2017 18:41:02 GMT) Full text and rfc822 format available.
bug archived. Request was from Debbugs Internal Request <help-debbugs <at> gnu.org> to internal_control <at> debbugs.gnu.org. (Wed, 30 Aug 2017 11:24:04 GMT) Full text and rfc822 format available.
This bug report was last modified 7 years and 354 days ago.

Previous Next

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