From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Paul Pogonyshev Newsgroups: gmane.emacs.bugs Subject: bug#26068: [PATCH] bug in generator function with pcase Date: Sun, 12 Mar 2017 09:51:23 +0100 Message-ID: NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary=94eb2c13e3ea10d81b054a84b32d X-Trace: blaine.gmane.org 1489308738 14376 195.159.176.226 (12 Mar 2017 08:52:18 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sun, 12 Mar 2017 08:52:18 +0000 (UTC) To: 26068@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Mar 12 09:52:11 2017 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 1cmzEX-0002YO-CD for geb-bug-gnu-emacs@m.gmane.org; Sun, 12 Mar 2017 09:52:09 +0100 Original-Received: from localhost ([::1]:46231 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cmzEa-0004nq-C3 for geb-bug-gnu-emacs@m.gmane.org; Sun, 12 Mar 2017 04:52:12 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:53167) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cmzER-0004nf-RS for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:52:04 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cmzEQ-0007fI-Rf for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:52:03 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:53758) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cmzEQ-0007eV-Oe for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:52:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1cmzEQ-0003MP-G0 for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:52:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Paul Pogonyshev Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 12 Mar 2017 08:52:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 26068 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.148930869512879 (code B ref -1); Sun, 12 Mar 2017 08:52:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 12 Mar 2017 08:51:35 +0000 Original-Received: from localhost ([127.0.0.1]:51957 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cmzDz-0003Lf-Hd for submit@debbugs.gnu.org; Sun, 12 Mar 2017 04:51:35 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:33921) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cmzDx-0003LL-Mw for submit@debbugs.gnu.org; Sun, 12 Mar 2017 04:51:34 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cmzDr-0005po-If for submit@debbugs.gnu.org; Sun, 12 Mar 2017 04:51:28 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:45529) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1cmzDr-0005pC-ES for submit@debbugs.gnu.org; Sun, 12 Mar 2017 04:51:27 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:53124) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cmzDq-0004kw-9g for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:51:27 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cmzDp-0005iU-Bt for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:51:26 -0400 Original-Received: from mail-pf0-x22a.google.com ([2607:f8b0:400e:c00::22a]:36202) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cmzDp-0005fs-78 for bug-gnu-emacs@gnu.org; Sun, 12 Mar 2017 04:51:25 -0400 Original-Received: by mail-pf0-x22a.google.com with SMTP id o126so57923534pfb.3 for ; Sun, 12 Mar 2017 00:51:25 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=mime-version:from:date:message-id:subject:to; bh=RXYyTtq6Lsg11FkcYlU1ZHja445EaVpQPwLCY0W6u/0=; b=K0aDLKWhF6Y8kzXtO5llEtOYg0I7WfQ2Ng1VDFvtmRkVV9QL3Prsr4BftBDmfDBBXl ls/GW++in9nXmBjAEE+/py13uvHjOfW4BtVTTIXBgfc2oyOaAQAiGPdqjF3/cwc5giP9 cI6d/UPkc6T582gdCrquJ7nPB67uUQLnC9pZU8DrC/EML0BbZM8Ftk84KgegRIOjnaFF Lq+5J2heHZjSJVNrv46if/N0iaCQ6BdWXxkbj37ybqm3EOJeG2mgIvWaASUxye6wc+Vc 5OlPO4Gvv0clZH8pd6DuTbVu3mX31Tfv7jDJlwR3KX++qzYLMI/dD4sD4HC/Mmp0J0e8 E+BQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=RXYyTtq6Lsg11FkcYlU1ZHja445EaVpQPwLCY0W6u/0=; b=M4a9gtcOAGwpPc4g9FDZO0jmruY6NI3Lcc9aPjauj54ylw1VkjOPWtiD7+GGwGRLy3 wxEXzspXItaRzK1jrrlb+Lg/uGuiAu9t4PHvell5aMFG90tt5o3f7gGXIjUpu3GqbJ+z HwxEnqVn+kqnAEtZ1Yk0wh1tYFCRJWLA9zf7NKz4Tppj5ncI073O/T6M7XzmsEJ1Vy4g kXNu2MsgGINTGvfE/HqJ/8dpwC//ZfaKKeGV/IJgUHcTzz7OpYDfWDduyfVVn/S2cP4q mZzw62TqL7lk0yUmaB1bDLsq3hgZXAPGJR2a7jgxjmMKJiWj41YMGCyWodiTkBRTWhqf iEOw== X-Gm-Message-State: AMke39kyA6J59qrYoMQQs6eR9zJ3MW7/RxUXe9wqvpOC187eWoNjnCOJSWM+oRC7DOGfwWHW9ixS6wLkbt2/rA== X-Received: by 10.84.172.1 with SMTP id m1mr38012854plb.5.1489308683909; Sun, 12 Mar 2017 00:51:23 -0800 (PST) Original-Received: by 10.100.176.176 with HTTP; Sun, 12 Mar 2017 00:51:23 -0800 (PST) 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:130508 Archived-At: --94eb2c13e3ea10d81b054a84b32d Content-Type: text/plain; charset=UTF-8 To reproduce: (iter-next (funcall (iter-lambda () (pcase (list 1 2) (`(,a ,b) (iter-yield (+ a b))))))) Patch is attached. I have no idea if it affects something else, but matching symbols with `eq' on their names (`eq' on strings?!) seems outright wrong to me. On a side note: bug report I sent yesterday with M-x report-emacs-bug was silently lost. Paul --94eb2c13e3ea10d81b054a84b32d Content-Type: text/plain; charset=US-ASCII; name="cl-macs.diff" Content-Disposition: attachment; filename="cl-macs.diff" Content-Transfer-Encoding: base64 X-Attachment-Id: f_j06fxmjy0 ZGlmZiAtLWdpdCBhL2xpc3AvZW1hY3MtbGlzcC9jbC1tYWNzLmVsIGIvbGlzcC9lbWFjcy1saXNw L2NsLW1hY3MuZWwKaW5kZXggNDAzNDJmM2ZlNC4uNThiY2RkNTJhYyAxMDA2NDQKLS0tIGEvbGlz cC9lbWFjcy1saXNwL2NsLW1hY3MuZWwKKysrIGIvbGlzcC9lbWFjcy1saXNwL2NsLW1hY3MuZWwK QEAgLTIwNTksOCArMjA1OSw4IEBAIGV4Y2VwdCB0aGF0IGl0IGFkZGl0aW9uYWxseSBleHBhbmRz IHN5bWJvbCBtYWNyb3MuIgogICAgICAgICAgIChwY2FzZSBleHAKICAgICAgICAgICAgICgocHJl ZCBzeW1ib2xwKQogICAgICAgICAgICAgIDs7IFBlcmZvcm0gc3ltYm9sLW1hY3JvIGV4cGFuc2lv bi4KLSAgICAgICAgICAgICAod2hlbiAoY2RyIChhc3NxIChzeW1ib2wtbmFtZSBleHApIGVudikp Ci0gICAgICAgICAgICAgICAoc2V0cSBleHAgKGNhZHIgKGFzc3EgKHN5bWJvbC1uYW1lIGV4cCkg ZW52KSkpKSkKKyAgICAgICAgICAgICAod2hlbiAoY2RyIChhc3NxIGV4cCBlbnYpKQorICAgICAg ICAgICAgICAgKHNldHEgZXhwIChjYWRyIChhc3NxIGV4cCBlbnYpKSkpKQogICAgICAgICAgICAg KGAoc2V0cSAuICxfKQogICAgICAgICAgICAgIDs7IENvbnZlcnQgc2V0cSB0byBzZXRmIGlmIHJl cXVpcmVkIGJ5IHN5bWJvbC1tYWNybyBleHBhbnNpb24uCiAgICAgICAgICAgICAgKGxldCogKChh cmdzIChtYXBjYXIgKGxhbWJkYSAoZikgKGNsLS1zbS1tYWNyb2V4cGFuZCBmIGVudikpCkBAIC0y MDc4LDcgKzIwNzgsNyBAQCBleGNlcHQgdGhhdCBpdCBhZGRpdGlvbmFsbHkgZXhwYW5kcyBzeW1i b2wgbWFjcm9zLiIKICAgICAgICAgICAgICAobGV0ICgobGV0ZiBuaWwpIChmb3VuZCBuaWwpIChu YnMgKCkpKQogICAgICAgICAgICAgICAgKGRvbGlzdCAoYmluZGluZyBiaW5kaW5ncykKICAgICAg ICAgICAgICAgICAgKGxldCogKCh2YXIgKGlmIChzeW1ib2xwIGJpbmRpbmcpIGJpbmRpbmcgKGNh ciBiaW5kaW5nKSkpCi0gICAgICAgICAgICAgICAgICAgICAgICAoc20gKGFzc3EgKHN5bWJvbC1u YW1lIHZhcikgZW52KSkpCisgICAgICAgICAgICAgICAgICAgICAgICAoc20gKGFzc3EgdmFyIGVu dikpKQogICAgICAgICAgICAgICAgICAgIChwdXNoIChpZiAobm90IChjZHIgc20pKQogICAgICAg ICAgICAgICAgICAgICAgICAgICAgICBiaW5kaW5nCiAgICAgICAgICAgICAgICAgICAgICAgICAg ICAobGV0ICgobmV4cCAoY2FkciBzbSkpKQpAQCAtMjE0OSw3ICsyMTQ5LDcgQEAgYnkgRVhQQU5T SU9OLCBhbmQgKHNldHEgTkFNRSAuLi4pIHdpbGwgYWN0IGxpa2UgKHNldGYgRVhQQU5TSU9OIC4u LikuCiAgICAgICAgICAgICAobGV0ICgoZXhwYW5zaW9uCiAgICAgICAgICAgICAgICAgICAgOzsg RklYTUU6IEZvciBOIGJpbmRpbmdzLCB0aGlzIHdpbGwgdHJhdmVyc2UgYGJvZHknIE4gdGltZXMh CiAgICAgICAgICAgICAgICAgICAgKG1hY3JvZXhwYW5kLWFsbCAobWFjcm9leHAtcHJvZ24gYm9k eSkKLSAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIChjb25zIChsaXN0IChzeW1i b2wtbmFtZSAoY2FhciBiaW5kaW5ncykpCisgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAoY29ucyAobGlzdCAoY2FhciBiaW5kaW5ncykKICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgIChjbC1jYWRhciBiaW5kaW5ncykpCiAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYWNyb2V4cGFuZC1hbGwtZW52aXJvbm1l bnQpKSkpCiAgICAgICAgICAgICAgIChpZiAob3IgKG51bGwgKGNkYXIgYmluZGluZ3MpKSAoY2wt Y2RkYXIgYmluZGluZ3MpKQo= --94eb2c13e3ea10d81b054a84b32d--